serial.c

这是关于DX516仿真器的资料

//本函数集来自551单片机世界”，作者斑竹丁丁（聂小猛）。
//主页地址http://www.mcu51.com
//串口中断服务程序，仅需做简单调用即可完成串口输入输出的处理
//出入均设有缓冲区，大小可任意设置。
//可供使用的函数名:
/*
extern char getbyte(void);//从接收缓冲区取一个byte,如不想等待则在调用前检测inbufsign是否为1。
extern getline(uchar *line, uchar n); //获取一行数据回车结束，必须定义最大输入字符数
extern putbyte(char c);//放入一个字节到发送缓冲区
extern putbytes(uchar *outplace,uchar j);//放一串数据到发送缓冲区，自定义长度
extern putstring(uchar  *puts);//发送一个定义在程序存储区的字符串到串口
extern puthex(uchar c);//发送一个字节的hex码，分成两个字节发。
extern putchar(uchar c,uchar j);//输出一个无符号字符数的十进制表示，必须标示小数点的位置,自动删除前面无用的零
extern putint(uint ui,uchar j);//输出一个无符号整型数的十进制表示，必须标示小数点的位置,自动删除前面无用的零
extern  bit   inbufsign; 
extern putinbuf(uchar c);//人工输入一个字符到输入缓冲区
#define CR putstring("\r\n")//发送一个回车换行
extern  void delay_ms(unsigned int ms);
extern void serial_init (void);
*/
//*************************************************************************
#pragma small

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

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

//延时
void delay(unsigned char d)  
{	
	unsigned char j;
	do
	{ 
		d--; 
		j=42;  
		do {j--;} while(j!=0);
	}while(d!=0);
}
//*****************************
//放入一个字节到发送缓冲区
putbyte(unsigned char c)
{
	ES=0;            /*暂停串行中断，以免数据比较时出错 */
	//缓冲区还有2个字节时，就等待发送到大于2个字节，以免冲爆。
	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;
}

//******************************
//放一串数据到发送缓冲区
putbytes(unsigned char *outplace,unsigned char j)
{
	int i;
	for(i=0;i<j;i++)
	{
		putbyte(*outplace);
		outplace++;
	}
}

//******************************
//输出一个无符号字符数的十进制表示，必须标示小数点的位置,自动删除前面无用的零
//例如putchar(0x32,2),输出"4.8".
//putchar(0x32,3),输出"0.48".
//putchar(0x32,1),输出"48".
putchar(uchar c,uchar j)
{
	uchar  free[4];
	uchar i;
	i=0;
	free[i++]=(c/100+0x30);
	if (j==3) free[i++]='.';
	free[i++]=(c%100)/10+0x30;
	if (j==2) free[i++]='.';
	if (j==2 && free[i-3]==0x30) free[i-3]=0x20;
	free[i++]=(c%10)+0x30;
	if (j==1 && free[i-3]==0x30) free[i-3]=0x20;
	if (j==1 && free[i-3]==0x20 && free[i-2]==0x30) free[i-2]=0x20;
	putbytes(free,i);
}
//***************************************
//发送一个字符串到串口
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 ;
	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;  //接收缓冲区满置满标志
		}
	}
}

//*****************************
//串口初始化                0xfd=19200,0xfa=9600,0xf4=4800,0xe8=2400,0xd0=1200
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 = 0xfa;//fa,          //baud*2    /* reload value 19200 baud
	TR1   = 1;                         // timer 1 run

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

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

}