//PC讀MCU指令結構：(中斷方式，ASCII碼表示)
//幀： 幀頭標志|幀類型|器件地址|啟始地址|長度n|效驗和|幀尾標志
//值： 'n' 'y'| 'r' | 0x01 | x | x | x |0x13 0x10
//字節數： 2 | 1 | 1 | 1 | 1 | 1 | 2
//求和：


/////////////////////////////////////////////////////////////////////
//公司名稱：***
//模 塊 名：protocol.c
//創 建 者：1
//修 改 者：
//功能描述：中斷方式：本程序為mcu的串口通訊提供(貞結構)函數接口，包括具體協議部分
//其他說明：只提供對AT89c51具體硬件的可靠訪問接口
//版 本：1.0
//信 息：QQ 75011221 C51BBS匿名:niuyi
/////////////////////////////////////////////////////////////////////


#include <reg51.h>
#include <config.h>
//預定義
//幀
#define F_ST1 0x6e //幀頭標志 n
#define F_ST2 0x79 //幀頭標志 y
#define F_R 0x72 //幀類型 讀 
r
#define F_W 0x77 //幀類型 寫 
w
#define F_D 0x64 //幀類型 數據幀 d
#define F_B 0x62 //幀類型 寫回應幀 b
#define F_C 0x63 //幀類型 重發命令幀 c
#define F_Q 0x71 //幀類型 放棄幀 q
#define F_ADDR 0x31 //器件地址 0-9
#define F_END 0x7a //幀尾標志 z
#define F_SPACE 0x30 //空標志 0
#define F_ERR1 0x31 //錯誤標志1,flagerr 1
#define F_ERR2 0x32 //錯誤標志2 
2
//常數
#define S_MAXBUF 16 //接收/發送數據的最大緩存量
#define FIELD_MAXBUF 48 //最小場緩存,可以大于48字節，因為協議是以20字節為單
位傳輸的
#define communicationing P1_7//正在通訊（1）標志
#define ERRFRAME_MAX 5 //連續NOFRAME_CNT次幀不正確 
#define ERR_NOCNTMAX_RESEND if(++errframe_cnt<=ERRFRAME_MAX)resend_frame(); 
else errframe_cnt=communicationing=0;
//若超過 
ERRFRAME_MAX 次則令通訊停止ERR_NOCNTMAX_RESEND

//public 變量
unsigned char databuf[FIELD_MAXBUF],errframe_cnt;
//函數

/////////////////////////////////////////////////////////////////////
//函 數 名：send()
//功能描述：向串口發送一個字符
//函數說明：
//調用函數：
//全局變量：
//輸 入：ch-要發送的ASCII字符
//返 回：無

//修 改 者：
//版 本：
/////////////////////////////////////////////////////////////////////
void send(unsigned char ch)
{SBUF=ch;while(TI==0);TI=0;}

/////////////////////////////////////////////////////////////////////
//函 數 名：receive()
//功能描述：從串口接收一個字符
//函數說明：
//調用函數：
//全局變量：
//輸 入：無
//返 回：一個ASCII字符

//修 改 者：
//版 本：
/////////////////////////////////////////////////////////////////////
unsigned char receive(void)
{while(RI==0);RI=0;return SBUF;}

/////////////////////////////////////////////////////////////////////
//函 數 名：CharToHex()
//功能描述：把ASCII字符轉換為16進制
//函數說明：
//調用函數：
//全局變量：
//輸 入：ASCII字符
//返 回：16進制

//修 改 者：
//版 本：
/////////////////////////////////////////////////////////////////////
unsigned char CharToHex(unsigned char bChar){
if((bChar>=0x30)&&(bChar<=0x39))
bChar -= 0x30;
else if((bChar>=0x41)&&(bChar<=0x46))//大寫字母
bChar -= 0x37;
else if((bChar>=0x61)&&(bChar<=0x66))//小寫字母
bChar -= 0x57;
else bChar = 0xff;
return bChar;
}

/////////////////////////////////////////////////////////////////////
//函 數 名：HexToChar()
//功能描述：把16進制轉換為ASCII字符
//函數說明：
//調用函數：
//全局變量：
//輸 入：16進制
//返 回：ASCII字符

//修 改 者：
//版 本：
/////////////////////////////////////////////////////////////////////
unsigned char HexToChar(unsigned char bHex){
if((bHex>=0)&&(bHex<=9))
bHex += 0x30;
else if((bHex>=10)&&(bHex<=15))//大寫字母
bHex += 0x37;
else bHex = 0xff;
return bHex;
}

/////////////////////////////////////////////////////////////////////
//函 數 名：com_int()
//功能描述：初始化串口
//函數說明：默認其他參數為[baud_rate],n,8,1
//調用函數：
//全局變量：
//輸 入：baud_rate 波特率
//返 回：無

//修 改 者：
//版 本：
/////////////////////////////////////////////////////////////////////
void com_init(unsigned int baud_rate){
EA=1;ES=1;//ET1=1; 
SCON = 0x50; /* 0x52;//SCON */
TMOD = 0x20; /*0x20;// TMOD */
TCON = 0x60; /*0x60;// TCON */
PCON=PCON&0x7f;
switch(baud_rate){ //波特率設置
case 1200:
TL1=0xe8;TH1=0Xe8;break;//1200
case 2400:
TL1=0xf4;TH1=0Xf4;break;//2400
case 4800:
TL1=0xfa;TH1=0Xfa;break;//4800
case 9600:
TL1=0xfd;TH1=0Xfd;break;//9600
case 19200:
PCON=PCON|0x80;TL1=0xfd;TH1=0Xfd;break;//19200
case 38400:
PCON=PCON|0x80;TL1=0xfe;TH1=0Xfe;break;//38400
default:
TL1=0xfd;TH1=0Xfd;break;//9600
}
}
/////////////////////////////////////////////////////////////////////
//函 數 名：resend_frame()
//功能描述：發送重發幀
//函數說明：通知PC重發
//調用函數：
//全局變量：
//輸 入：無
//返 回：無

//修 改 者：
//版 本：
/////////////////////////////////////////////////////////////////////
void resend_frame(void){
send(F_ST1);send(F_ST2);send(F_C);send(F_SPACE);send(F_SPACE);//發送效
驗和
send(F_END);
}

/////////////////////////////////////////////////////////////////////
//函 數 名：quit_frame()
//功能描述：發送放棄幀
//函數說明：通知PC放棄通訊
//調用函數：
//全局變量：
//輸 入：無
//返 回：無

//修 改 者：
//版 本：
/////////////////////////////////////////////////////////////////////
void quit_frame(void){
send(F_ST1);send(F_ST2);send(F_Q);send(F_ERR1);send(F_ERR1);//發送效驗
和
send(F_END);
}

/////////////////////////////////////////////////////////////////////
//函 數 名：com_int()
//功能描述：串口中斷
//函數說明：
//調用函數：
//全局變量：
//輸 入：無
//返 回：無

//修 改 者：
//版 本：
/////////////////////////////////////////////////////////////////////
void com_int()interrupt 4{
unsigned char i,csaddr,clen,csum,tempbuf[S_MAXBUF];
csum=0;
if(receive()==F_ST1){//是偵
if(receive()==F_ST2){//頭判斷完
communicationing=1;//設置通訊狀態為正常 即啟動通訊
switch(receive()){
case F_R://是讀指令幀r
if(receive()==F_ADDR){P1_2=!P1_2;//地址
正確 
csaddr=CharToHex(receive())<<4;csaddr+=CharToHex
(receive());
clen=CharToHex(receive())
<<4;clen+=CharToHex(receive());
csum=csaddr+clen;
i=CharToHex(receive())
<<4;i+=CharToHex(receive());
if(i==csum){//效驗和正確
if(receive()
==F_END){//結束標志正確 //開始發送數據幀

csum=0;send(F_ST1);send(F_ST2);send(F_D);
send
(HexToChar((clen&0xf0)>>4));send(HexToChar(clen&0x0f));csum+=clen;
for
(i=0;i<clen;i++){

send(HexToChar((databuf[i+csaddr]&0xf0)>>4));send(HexToChar(databuf
[i+csaddr]&0x0f));

csum+=databuf[i+csaddr];
}
//if
(csum>127)csum-=128;
send
(HexToChar((csum&0xf0)>>4));send(HexToChar(csum&0x0f));send(F_END);

//發送數據幀完畢
P1_0=!
P1_0;
}else 
{ERR_NOCNTMAX_RESEND break;}//結束標志錯誤
}else {ERR_NOCNTMAX_RESEND 
break;}//效驗和錯誤
}//地址不正確
break;
case F_W://是PC寫指令幀w
if(receive()==F_ADDR){//地址正確
csaddr=CharToHex(receive())
<<4;csaddr+=CharToHex(receive());
clen=CharToHex(receive())
<<4;clen+=CharToHex(receive());
csum=csaddr+clen;
for(i=0;i<clen;i++){
tempbuf[i+csaddr]
=CharToHex(receive())<<4;tempbuf[i+csaddr]+=CharToHex(receive());
csum+=tempbuf
[i+csaddr];
}
i=CharToHex(receive())
<<4;i+=CharToHex(receive());
if(csum!=i)
{ERR_NOCNTMAX_RESEND break;}//效驗和錯誤
if(F_END!=receive())
{ERR_NOCNTMAX_RESEND break;}//結束標志錯誤
for
(i=csaddr;i<clen+csaddr;i++)databuf[i-csaddr]=tempbuf[i-csaddr];//正確則保存數據
}//從PC獲得數據寫完畢//開始發送寫回應幀
send(F_ST1);send(F_ST2);send(F_B);send
(F_SPACE);send(F_SPACE);//發送效驗和
send(F_END);//寫回應幀發送完畢
P1_1=!P1_1;
break;
case F_Q://檢測接收放棄幀
csaddr=receive();csum+=csaddr;//csaddr
兼做放棄幀碼標志
if(csaddr!=F_ERR1 && csaddr!=F_ERR2)
{ERR_NOCNTMAX_RESEND break;}
if(csum!=receive())
{ERR_NOCNTMAX_RESEND break;}
if(F_END!=receive())
{ERR_NOCNTMAX_RESEND break;}
communicationing=0;//出錯退出通訊
break;
default:
resend_frame();//要求從發
}
}//忽略 
}//忽略
if(!communicationing)quit_frame();//調用放棄幀，通知PC 放棄通訊
}
/////////////////////////////////////////////////////////////////

//主函數

/////////////////////////////////////////////////////////////////
void main(void){
unsigned char i;
for (i=0;i<FIELD_MAXBUF;i++)databuf[i]=i+0x30;
com_init(38400);
while(1){
/*可以處理非串口任務*/
}
}