//出入均設有緩沖區(qū)，大小可任意設置。
//可供使用的函數名:
//char getbyte(void);從接收緩沖區(qū)取一個byte,如不想等待則在調用前檢測inbufsign是否為1。
//getline(char idata *line, unsigned char n);
//獲取一行數據回車結束，已處理backspce和delete,必須定義最大輸入字符數
//putinbuf(uchar c);模擬接收到一個數據
//putbyte(char c);放入一個字節(jié)到發(fā)送緩沖區(qū)
//putbytes(unsigned char *outplace,j);放一串數據到發(fā)送緩沖區(qū)，自定義長度
//putstring(unsigned char code *puts);發(fā)送一個字符串到串口
//puthex(unsigned char c);發(fā)送一個字節(jié)的hex碼，分成兩個字節(jié)發(fā)。
//putchar(uchar c,uchar j);發(fā)送一個字節(jié)數據的asc碼表達方式，需要定義小數點的位置
//putint(uint ui,uchar j);發(fā)送一個整型數據的asc碼表達方式，需要定義小數點的位置
//CR;發(fā)送一個回車換行
//*************************************************************************
#include
#define uchar unsigned char
#define uint unsigned int
#define OLEN 64 /* size of serial transmission buffer */
idata unsigned char outbuf[OLEN]; /* storage for transmission buffer */
unsigned char idata *outlast=outbuf; //最后由中斷傳輸出去的字節(jié)位置
unsigned char idata *putlast=outbuf; //最后放入發(fā)送緩沖區(qū)的字節(jié)位置
#define ILEN 2 /* size of serial receiving buffer */
idata unsigned char inbuf[ILEN];
unsigned char idata *inlast=inbuf; //最后由中斷進入接收緩沖區(qū)的字節(jié)位置 unsigned
char idata *getlast=inbuf; //最后取走的字節(jié)位置
bit outbufsign; //輸出緩沖區(qū)非空標志 有=1
bit inbufsign;//接收緩沖區(qū)非空標志 有=1
bit inbufful;//輸入緩沖區(qū)滿標志 滿=1
#define CR putstring("rn") //CR=回車換行
//*****************************
//放入一個字節(jié)到發(fā)送緩沖區(qū)
putbyte(char c)
{
uchar i,j; ES=0;
/*暫停串行中斷，以免數據比較時出錯? */
if (outlast==putlast )
{
i=(0-TH1);
do
{
i--;
j=36;
do
{
j--;
}
while(j!=0);
}
while(i!=0);
//延時一個字節(jié)發(fā)送時間
}
*putlast=c; //放字節(jié)進入緩沖區(qū)
putlast++; //發(fā)送緩沖區(qū)指針加一
if(putlast==outbuf+OLEN) putlast=outbuf; //指針到了頂部換到底部
if (!outbufsign)
{
outbufsign=1;
TI=1;
}
//緩沖區(qū)開始為空置為有，啟動發(fā)送
ES=1;
}
//****************************** //放一串數據到發(fā)送緩沖區(qū)
putbytes(unsigned char *outplace,unsigned char j)
{
int i; for(i=0;i
putbyte(*outplace);
outplace++;
}
}
//******************************
//putchar(uchar c,uchar j);發(fā)送一個字節(jié)數據的asc碼表達方式，需要定義小數點的位置
putchar(uchar c,uchar j)
{
uchar idata free[4];uchar data 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);
}
//******************************
//putint(uint ui,uchar j);發(fā)送一個整型數據的asc碼表達方式，需要定義小數點的位置
putint(uint ui,uchar j)
{
uchar idata free[6];
uchar data i;
//i=0;
free[i++]=(ui/10000+0x30);
if (j==5) free[i++]='.';
free[i++]=((ui%10000)/1000+0x30);
if (j==4) free[i++]='.';
if (j==4 && free[i-3]==0x30) free[i-3]=0x20;
free[i++]=((ui%1000)/100+0x30);
if (j==3) free[i++]='.';
if (j==3 && free[i-4]==0x30) free[i-4]=0x20;
if (j==3 && free[i-4]==0x20 && free[i-3]==0x30) free[i-3]=0x20;
free[i++]=((ui%100)/10+0x30);
if (j==2) free[i++]='.';
if (j==2 && free[i-5]==0x30) free[i-5]=0x20;
if (j==2 && free[i-5]==0x20 && free[i-4]==0x30) free[i-4]=0x20;
if (j==2 && free[i-5]==0x20 && free[i-4]==0x20 && free[i-3]==0x30)
free[i-3]=0x20;
free[i++]=(ui%10+0x30);
if (j==1 && free[i-5]==0x30) free[i-5]=0x20;
if (j==1 && free[i-5]==0x20 && free[i-4]==0x30) free[i-4]=0x20;
if (j==1 && free[i-5]==0x20 && free[i-4]==0x20 && free[i-3]==0x30)
free[i-3]=0x20;
if (j==1 && free[i-5]==0x20 && free[i-4]==0x20 && free[i-3]==0x20 &&
free[i-2]==0x30) free[i-2]=0x20;
putbytes(free,i);
}
//***************************************
//發(fā)送一個字符串到串口
putstring(unsigned char *puts)
{
for (;*puts!=0;puts++) //遇到停止符0結束
putbyte(*puts);
}
//*************************************
//發(fā)送一個字節(jié)的hex碼，分成兩個字節(jié)發(fā)。
unsigned char code hex_[]=
{
"0123456789ABCDEF"
};
puthex(unsigned char c)
{
int ch;
ch=(c>>4)&0x0f; putbyte(hex_[ch]); ch=c&0x0f; putbyte(hex_[ch]);
}
//*************************************
//從接收緩沖區(qū)取一個byte,如不想等待則在調用前檢測inbufsign是否為1。
uchar getbyte (void)
{
char idata c ;
while (!inbufsign); //緩沖區(qū)空等待
ES=0;
c= *getlast; //取數據
getlast++; //最后取走的數據位置加一
inbufful=0; //輸入緩沖區(qū)的滿標志清零
if (getlast==inbuf+ILEN) getlast=inbuf; //地址到頂部回到底部
if (getlast==inlast) inbufsign=0; //地址相等置接收緩沖區(qū)空空標志，再取數前要檢該標志
ES=1;
return (c);
//取回數據
}
//***************************************** //接收一行數據，必須定義放數據串的指針位置和大小
//del=0x7f,backspace=0x08,cr=0x0d,lf=0x0a
void getline (uchar idata *line, unsigned char n)
{
unsigned char cnt = 0; //定義已接收的長度
char c;
do
{
if ((c = getbyte ()) == 0x0d)
c = 0x00; //讀一個字節(jié)，如果是回車換成結束符
if (c == 0x08 || c == 0x7f) //BACKSPACE 和 DEL 的處理
{
if (cnt != 0) //已經輸入退掉一個字符
{
cnt--; //總數目減一
line--; //指針減一
putbyte (0x08); //屏幕回顯的處理
putbyte (' ');
putbyte (0x08);
}
}
else
{
putbyte (*line = c);
//其他字符取入，回顯
line++; //指針加一
cnt++; //總數目加一
}
}
while (cnt < n - 1 && c != 0x00 && c!=0x1b); //數目到了，回車或ESC停止
*line = 0; //再加上停止符0
}
//****************************
//模擬接收到一個數據
putinbuf(uchar c)
{
ES=0;
if(!inbufful)
{
*inlast= c; //放入數據 inlast++;
//最后放入的位置加一
if (inlast==inbuf+ILEN)
inlast=inbuf;//地址到頂部回到底部
if (inlast==getlast)
inbufful=1; //接收緩沖區(qū)滿置滿標志
inbufsign=1;
}
ES=1;
}
//*****************************************
//串口中斷處理
serial () interrupt 4
{
if (TI )
{
TI = 0;
if (outbufsign) //
if (putlast==outlast)
outbufsign=0; //
else
{
SBUF=*outlast; //未發(fā)送完繼續(xù)發(fā)送
outlast++; //最后傳出去的字節(jié)位置加一
if (outlast==outbuf+OLEN)
outlast=outbuf;//地址到頂部回到底部
if (putlast==outlast)
outbufsign=0; //數據發(fā)送完置發(fā)送緩沖區(qū)空標志
}
}
if (RI)
{
RI = 0;
if(!inbufful)
{
*inlast= SBUF; //放入數據
inlast++; //最后放入的位置加一
inbufsign=1;
if (inlast==inbuf+ILEN)
inlast=inbuf;//地址到頂部回到底部
if (inlast==getlast)
inbufful=1; //接收緩沖區(qū)滿置滿標志
}
}
}
//*****************************
//串口初始化 0xfd=19200,0xfa=9600,0xf4=4800,0xe8=2400,0xd0=1200
serial_init ()
{
SCON = 0x50; /* mode 1: 8-bit UART, enable receiver */
TMOD |= 0x20; /* timer 1 mode 2: 8-Bit reload */
PCON |= 0x80;
TH1 = 0xfd;//fa, //baud*2
/* reload value 19200 baud */
TR1 = 1; /* timer 1 run */
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;
}
下載文檔
