serial.c

汉显液晶模块的c程序

//本函数集来自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  OLEN  8                    /* size of serial transmission buffer   */
idata uchar  outbuf[OLEN];          /* storage for transmission buffer      */
data uchar idata *outlast=outbuf;    //最后由中断传输出去的字节位置
data uchar idata *putlast=outbuf;    //最后放入发送缓冲区的字节位置
#define  ILEN  30 //32            /* size of serial receiving buffer      */
idata uchar  inbuf[ILEN];
data uchar idata *inlast=inbuf;  //最后由中断进入接收缓冲区的字节位置
data uchar idata *getlast=inbuf;  //最后取走的字节位置
bit   outbufsign0;     //最后一个数据覵BUF发完标志  发完＝0
bit   outbufsign;     //输出缓冲区非空标志   有=1
bit   inbufsign;      //接收缓冲区非空标志   有=1
bit   inbufful;       //输入缓冲区满标志  满=1
#define CR putstring("\r\n")   //CR=回车换行


//*****************************
//放入一个字节到发送缓冲区
putbyte(unsigned char c)
{
	ES=0;            /*暂停串行中断，以免数据比较时出错    */
	while((((outlast-putlast)==2) && (outlast > putlast )) || ((outlast < putlast) && (OLEN-(putlast-outlast)==2)))
	{
		ES=1;
		c++;c--;
		ES=0;
	}
	*putlast=c;            //放字节进入缓冲区
	putlast++;          //发送缓冲区指针加一
	if (putlast==outbuf+OLEN) putlast=outbuf;  //指针到了顶部换到底部
	outbufsign=1;
	if (!outbufsign0)
	{
		outbufsign0=1;
		TI=1;
	}   //缓冲区开始为空置为有，启动发送
	ES=1;
}

//***************************************
//发送字符串到串口
putstring(uchar  *puts)
{
	for(;*puts!=0;puts++)   //遇到停止符0结束
		putbyte(*puts);
}
//******************************
//放一串数据到发送缓冲区,需要定义发送的字节数
putbytes(uchar *outplace,uint j) 
{ 	int i;
	for(i=0;i<j;i++)
	{
		putbyte(*outplace);
		outplace++;
	}
}
//*************************************
//发送一个字节的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 ;
	while (!inbufsign);     //缓冲区空等待
	ES=0;
	c= *getlast;            //取数据
	getlast++;              //最后取走的数据位置加一
	inbufful=0;            //输入缓冲区的满标志清零
	if (getlast==inbuf+ILEN) getlast=inbuf; //地址到顶部回到底部
	if (getlast==inlast) inbufsign=0;       //地址相等置接收缓冲区空空标志，再取数前要检该标志
	ES=1;
	return (c);        //取回数据
}
//*****************************************
//串口中断处理

serial () interrupt 4
{
	if (TI)
	{
		TI = 0;
		if (outbufsign)
		{
			SBUF=*outlast; //未发送完继续发送
			outlast++;            //最后传出去的字节位置加一
			if (outlast==outbuf+OLEN) outlast=outbuf;//地址到顶部回到底部
			if (putlast==outlast) outbufsign=0;   //数据发送完置发送缓冲区空标志
		}
		else
		{
			outbufsign0=0;
		}

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

//*****************************
//串口初始化                
void serial_init (void)
{
	//用t1作波特率
	SCON  = 0x50;                     // mode 1: 8-bit UART, enable receiver
	TMOD |= 0x20;                      // timer 1 mode 2: 8-Bit reload
	PCON |= 0x80; TH1 = 0xf4;          //baud*2    /* reload value 9600 baud －22118400HZ
	TR1   = 1;                         // timer 1 run

	ES = 1;
	REN=1;
	EA=1;

}