//******************************************************************************
****
//楊屹    2002/08/20    第一版
//基于中斷的串口驅動及顯示程序
//聯系方法：gdtyy@ri.gdt.com.cn（2003/07/31以前有效）
//******************************************************************************
****
//程序特點：
//        1.基于中斷，可并發執行
//        2.參數可配置（收發緩沖區大小，最大字符串長度，TAB鍵移動距離）
//******************************************************************************
****
//使用方法：（此范例自包含，獨立于其他程序。）
//        先配制收發緩沖區大小等可變參數（在serial.h中的宏定義）
//        1.開頭加入#include <reg51.h>語句，一定要有。
//        2.初始化串口        InitSerial();//本例中為20MHz晶體，300波特率，模式2
初始化
//        3.初始化串口緩沖區  InitSerialBuffer();
//        4.使用顯示字節，字，長字，字符，字符串，清屏函數。
//自包含
//******************************************************************************
****
//波特率計算公式：
//        TH1=256-(2^SMOD/32*Fosc/12*1/Bound)
//    其中：SMOD=0，1；Fosc=晶體或晶振頻率；Bound=波特率
//    本例中，SMOD=0；Fosc=20*10E6；Bound=300，所以TH1=0x52。
//Baud rate(20Mhz)
//300(52);1200(D5);2400(EA);4800(F5);9600(FB);19200(FD);38400(FF);
//******************************************************************************
****
//書寫風格：
//        1.帶yy前綴標志的函數為楊屹改寫的等效C庫函數。
//        2.單個單詞用小寫，yy定義為前綴，不算一個單詞。
//        3.多個單詞（2個及以上），每個單詞首字母大寫。(有時變量名第一個單詞首字
母小寫)
//        4.采用內縮風格，每次縮進一個TAB。
//******************************************************************************
****
//應用舉例：（可在KEIL仿真環境下運行）
//源程序文件：serial.h/serial.c/main.c
//main.c內容：
//#include <reg51.h>//Note:It must be added.必須在serial.c之前
//#include <serial.c>//Note:It's ".c",not ".h"
//main()
//{
// unsigned char ch;
//
// InitSerial();
// InitSerialBuffer();
// while(1){
// PrintStr("\n");
// PrintByte(90);PrintStr(" ");
// PrintWord(90);PrintStr(" ");
// PrintLong(90);PrintStr(" ");
// PrintChar('y');PrintChar(' ');//千萬別寫成雙引號，否則打印
0（亂字符）。
// PrintStr("\nHello!\nI'm YangYi.\n");
// PrintStr("Press any key to continue...");
// while(!yygetch(&ch));
// }
//}
//******************************************************************************
****
//建議：
//    你完全可以把該子程序當作函數庫使用，以便減少重復勞動，提高代碼質量。
//******************************************************************************
****
//#include <general.h>
#include <serial.h>
//#include <reg51.h>

unsigned char TxBuf[LenTxBuf],RxBuf[LenRxBuf];//收發緩沖區實體
unsigned char *inTxBuf,*outTxBuf,*inRxBuf,*outRxBuf;//收發緩沖區讀寫指針
bit TIflag=1;//Note:It must be 1.

void InitSerial()//串口初始化
{
TMOD=TMOD&0x0F;
TMOD=TMOD|0x20;
TL1=0xf4,TH1=0xf4;//9600,22.1184M
SCON=0x50;PCON=0x80;
TR1=1;
}

void InitSerialBuffer(void)//串口緩沖區初始化
{
inTxBuf=TxBuf;outTxBuf=TxBuf;
inRxBuf=RxBuf;outRxBuf=RxBuf;
EA=1;ES=1;
}

void serial(void) interrupt 4{//串口中斷服務子程序
unsigned char *t;

if(TI){
TI=0;
if(inTxBuf==outTxBuf) {TIflag=1;return;}//TxBuf Empty
SBUF=*outTxBuf; outTxBuf++;
if(outTxBuf==TxBuf+LenTxBuf) outTxBuf=TxBuf; 
}
if(RI){
RI=0;
t=inRxBuf;t++;
if(t==RxBuf+LenRxBuf) t=RxBuf;
if(t==outRxBuf) return; 
//RxBuf Full
*inRxBuf=SBUF;
inRxBuf=t;
}
}

bit yygetch(unsigned char *ch)//從串口緩沖區讀1字節數據
{
ES=0;
if(inRxBuf==outRxBuf) {ES=1;return 0;}    //RxBuf Empty
*ch=*outRxBuf;  outRxBuf++;
if(outRxBuf==RxBuf+LenRxBuf) outRxBuf=RxBuf;
ES=1;
return 1;
}

void PrintChar(unsigned char ch)//顯示字符
{
unsigned char *t;

ES=0;
if(TIflag){ 
TIflag=0;
TI=1;
}
t=inTxBuf;t++;
if(t==TxBuf+LenTxBuf) t=TxBuf;
if(t==outTxBuf) {ES=1;return;} //TxBuf Full
*inTxBuf=ch;
inTxBuf=t;
ES=1;
}

void PrintCh(unsigned char ch)//內部使用，不建議用戶看到。
{
if(ch>=0&&ch<=9) ch=ch+'0';
else if(ch>=10&&ch<=15) ch=ch+'A'-10;
PrintChar(ch);
}

void PrintByte(unsigned char Byte)//以十六進制格式顯示1個字節數據
{
unsigned char c;
c=Byte;
c=c>>4;PrintCh(c);
c=Byte;c=c&0x0F;PrintCh(c);
}

void PrintWord(unsigned int Word)//以十六進制格式顯示1個字數據
{
PrintByte(Word>>8);
PrintByte(Word&0xFF);
}

void PrintLong(unsigned long LongWord)//以十六進制格式顯示1個長字數據
{
PrintWord(LongWord>>16);
PrintWord(LongWord&0xFFFF);
}

void PrintStr(unsigned char *str)//顯示字符串
{
int i;
unsigned char j;
unsigned char ch;
for(i=0;i<MaxLenStr;i++){
ch=*(str+i);
if(ch=='\0') break;
else if(ch=='\n'){PrintChar(10);PrintChar(13);} 
else if(ch=='\t'){
for(j=0;j<TABNum;j++)
PrintChar(' ');
}
else PrintChar(ch);
}
}

void clrscr()//清屏
{
int i;
for(i=0;i<25;i++)
PrintStr("\n"); 
}


/****************************************************************************

serial.h
*****************************************************************************/
//******************************************************************************
****
//楊屹    2002/08/20    第一版
//基于中斷的串口驅動及顯示程序
//聯系方法：gdtyy@ri.gdt.com.cn（2003/07/31以前有效）
//******************************************************************************
****
//使用方法：（此范例自包含，獨立于其他程序。）
//        1.開頭加入#include <reg51.h>語句，一定要有。
//        2.初始化串口        InitSerial();//本例中為20MHz晶體，300波特率，模式2
初始化
//        3.初始化串口緩沖區  InitSerialBuffer();
//        4.使用顯示字節，字，長字，字符，字符串，清屏函數。
//******************************************************************************
****
//波特率計算公式：
//        TH1=256-(2^SMOD/32*Fosc/12*1/Bound)
//    其中：SMOD=0，1；Fosc=晶體或晶振頻率；Bound=波特率
//    本例中，SMOD=0；Fosc=20*10E6；Bound=300，所以TH1=0x52。
//******************************************************************************
****
//書寫風格：
//        1.帶yy前綴標志的函數為楊屹改寫的等效C庫函數。
//        2.單個單詞用小寫，yy定義為前綴，不算一個單詞。
//        3.多個單詞（2個及以上），每個單詞首字母大寫。(有時變量名第一個單詞首字
母小寫)
//        4.采用內縮風格，每次縮進一個TAB。
//******************************************************************************
****

void InitSerial();//串口初始化
void InitSerialBuffer(void);//串口緩沖區初始化
bit  yygetch(unsigned char *ch);//從串口緩沖區讀1字節數據
void PrintChar(unsigned char ch);//顯示字符
void PrintCh(unsigned char ch);//內部使用，不建議用戶使用。
void PrintByte(unsigned char Byte);//以十六進制格式顯示1個字節數據
void PrintWord(unsigned int Word);//以十六進制格式顯示1個字數據
void PrintLong(unsigned long LongWord);//以十六進制格式顯示1個長字數據
void PrintStr(unsigned char *str);//顯示字符串
void clrscr();//清屏

//收發緩沖區長度
#define LenTxBuf 2000 //Don't too small,because it will cause display 
abnormal.
#define LenRxBuf 50

#define MaxLenStr 100 /*buf[MaxLenStr+1] for '\0'*/

#define TABNum 4 //TAB鍵移動長度

/*************************************************************************/