serial.c.bak

拼音输入法用在单片机上.rar

//本函数集来自“51单片机世界”，作者斑竹丁丁（聂小猛）。
//主页地址http://www.mcu51.com
//串口中断服务程序，仅需做简单调用即可完成串口输入输出的处理
//出入均设有缓冲区，大小可任意设置。
//可供使用的函数名:
/*
extern char getbyte(void);//从接收缓冲区取一个byte,如不想等待则在调用前检测inbufsign是否为1。
extern putbyte(char c);//放入一个字节到发送缓冲区
extern putstring(uchar  *puts);//发送一个定义在程序存储区的字符串到串口
extern puthex(uchar c);//发送一个字节的hex码，分成两个字节发。
extern  bit   inbufsign;
#define CR putstring("\r\n")//发送一个回车换行
extern void serial_init (void);
*/

//*************************************************************************
#pragma small

#include <reg52.h>
#define  uchar  unsigned char
#define  uint   unsigned int

#define  ILEN  4 //32            /* size of serial receiving buffer      */
idata uchar  inbuf[ILEN];
data uchar idata *inlast=inbuf;  //最后由中断进入接收缓冲区的字节位置
data uchar idata *getlast=inbuf;  //最后取走的字节位置
bit   inbufsign;      //接收缓冲区非空标志   有=1
bit   inbufful;       //输入缓冲区满标志  满=1
#define CR putstring("\r\n")   //CR=回车换行


//*****************************
//放入一个字节到发送缓冲区
putbyte(unsigned char c)
{
SBUF=c;
while(!TI);TI=0;
}
//******************************
/*/放一串数据到发送缓冲区,需要定义发送的字节数
putbytes(uchar *outplace,uint j) 
{ 	int i;
	for(i=0;i<j;i++)
	{
		putbyte(*outplace);
		outplace++;
	}
}
*/
//***************************************
//发送一个定义在程序存储区的字符串到串口
putstring(uchar  *puts)
{
	for(;*puts!=0;puts++)   //遇到停止符0结束
	putbyte(*puts);
}
//*************************************
/*/发送一个字节的hex码，分成两个字节发。
uchar code hex_[]={"0123456789ABCDEF"};
puthex(unsigned char c)
{
	int  ch;
	ch=(c>>4)&0x0f;
	putbyte(hex_[ch]);
	ch=c&0x0f;
	putbyte(hex_[ch]);
}
*/
//*************************************
//从接收缓冲区取一个byte,如不想等待则在调用前检测inbufsign是否为1。
uchar getbyte (void)
{
	char idata c ;
	uint delay=0;
	while (!inbufsign) //缓冲区空等待
	{
		delay++;
		if(delay==0xffff) return (0);
	}    
 
	ES=0;
	c= *getlast;            //取数据
	getlast++;              //最后取走的数据位置加一
	inbufful=0;            //输入缓冲区的满标志清零
	if (getlast==inbuf+ILEN) getlast=inbuf; //地址到顶部回到底部
	if (getlast==inlast) inbufsign=0;       //地址相等置接收缓冲区空空标志，再取数前要检该标志
	ES=1;
	return (c);        //取回数据
}
//**************
/*/模拟接收到一个字符
putinbuf(uchar c)
{ES=0;  if(!inbufful)
     	{*inlast= c;            //·?è?êy?Y
    	inlast++;                    //×?oó·?è?μ??????óò?
    	if (inlast==inbuf+ILEN) inlast=inbuf;//μ??·μ??￥2???μ?μ×2?
    	if (inlast==getlast)	inbufful=1;  //?óê??o3????ú???ú±ê??
    	 inbufsign=1;
	}
ES=1;
}
*/
/*
uchar getkey(uint t)
{
	uchar c,c1,i;
	bit iskey=0;
	uchar dout[4]={0xdf,0xef,0xf7,0xfb};
	uchar din[8]={0,1,0,2,0,0,0,3};
	uchar code key[4][4]={{'3','6','9',0x0d},{'d','u','r','l'},{'2','5','8','0'},{'1','4','7',0x08}};

	while(1)
	{
		for(i=0;i<4;i++)
		{
			P3=dout[i];
			p1=0xff;
			c=P1 & 0x0f;
			if (c!=0x0f)
			{
				c1=(key[din[14-c]][i]);
				iskey=1;
			}
		}
		if(t==0)
		{
			if (iskey)return(c1);
			else return(0);
		}
		t--;
	}
}
*/
//*****************************************
//串口中断处理

serial () interrupt 4
{
	if (RI)
	{
		RI = 0;
		if(!inbufful)
		{
			*inlast= SBUF;            //放入数据
			inlast++;                    //最后放入的位置加一
			inbufsign=1;
			if (inlast==inbuf+ILEN) inlast=inbuf;//地址到顶部回到底部
			if (inlast==getlast)	inbufful=1;  //接收缓冲区满置满标志
		}
	}
}

//*****************************
//串口初始化                0xfd=19200,0xfa=9600,0xf4=4800,0xe8=2400,0xd0=1200 110592
void serial_init (void)
{
	//用t1作波特率
	
	SCON  = 0x50;                     // mode 1: 8-bit UART, enable receiver
	TMOD |= 0x20;                      // timer 1 mode 2: 8-Bit reload
	SCON1 = 0x70;
	//PCON |= 0x80; 
	TH1 = 0xfa;//fa,          //baud*2    /* reload value 19200 baud
	TR1   = 1;                         // timer 1 run

	//用t2作波特率
/*
	T2CON=0x30;
	RCAP2H=0xFF;
	RCAP2L=0xb8;//70=4800,b8=9600,dc=19200,ee=38400,f4=57600,fa=115200
	TR2=1;ET2=1;
	SCON=0x50;//SCON=0xd0;
*/

	ES = 1;
	REN=1;
	EA=1;
	SM2=1;          //SM2=1时收到的第9位为1才置位RI标志

	//TMOD |=0x01;  //th1 auto load 2X8,th0 1X16
	//TH0=31; TL0=0; //X 32 =1S
	//TR0=1; ET0=1;
	//putstring("com is ready!");
}
//*****************
//测试用主函数
/*
void main(void)
{
	char c;
	unsigned  char  free[16];
	unsigned char idata *freep=free;
	serial_init();

	putstring("com is ready!");
	puthex('a');

	//delay(10);
	CR;
	while(1)
 	{
		putstring("\r\nHELP：'r':输出输入缓冲区的内容，'g':读取一行字符串。\r\nC:\\>");
 		c=getbyte();

		switch(c)
		{
			case 'r':
				putstring("\r\n下面是输入缓冲区的内容：");
				//putbytes(inbuf,ILEN);
				CR;
           	break;
			case 'g':
				putstring("\r\n请读取一行字符，最大十个，回车结束：");
				//getline(freep,10);
				CR;
				putstring(freep);
				CR;
			break;
			default:
				putbyte(c);
				putstring("\r\nbad command or file name.\r\n");
		}
	}
}
*/
uchar getchar(void)
{
        uchar c;
        RI_1 = 0;
        while(!RI_1);
        c= SBUF1;
        SBUF1 = c;
        RI_1 = 0;
        return c;
}