#include<reg51.h>
#define uchar unsigned char
#define TR 1						//接收、發送區別值，TR=0為發送

uchar idata buf[10];
uchar sum;							//檢驗和
void init(void)
{TMOD=0x20;						//串行口初始化
 TH1=0xE8;TL1=0xE8;				//設定波特率
 PCON=0x00;
 TR1=1;							//啟動T1
 SCON=0x50;						//串行口工作在方式1，并允許接收
}

/*發送程序*/
void send(void)
{uchar i;
 do{
    SBUF=0xAA;					//發送聯絡信號"AA"
    while(TI==0);					//等待發送結束
    TI=0;
    while(RI==0);					//等待B機回答
    RI=0;
   }while((SBUF^0xBB)!=0);			//B機未準備好，繼續聯絡
do{
   sum=0;							//清檢驗和
   for(i=0;i<16;i++)
    {SBUF=buf[i];
     sum+=buf[i];					//求校驗和
     while(TI==0);
     TI=0;
    }
   SBUF=sum;						//發送校驗和
   while(TI==0);TI=0;
   while(RI==0);RI=0;				//等待B機應答
}while(SBUF!=0);					//出錯則重發
}

/*接收程序*/
void receive()
{uchar i;
 do{}while(RI==0);RI=0;
 while((SBUF^0xAA)!=0)				//判斷A機是否發出請求
    SBUF=0xBB;					//發送應答信號"BB"
    while(TI==0);					//等待發送結束
    TI=0;
    while(1)
    {sum=0;						//清校驗和
     for(i=0;i<16;i++)
     {while(RI==0);RI=0;
      buf[i]=SBUF;					//接收一個數據
      sum+=buf[i];					//求校驗和
     }
    while(RI==0);RI=0;			//接收A機校驗和
    if((SBUF^sum)==0)			//比較檢驗和
    {SBUF=0x00;break;}			//校驗和相同則發"00"
   else
    {SBUF=0xFF;				//出錯發"FF"，重新接收
     while(TI==0);TI=0;
    }
}
}

/*主程序main()*/
void main(void)
{init();
 if(TR==0) {send();}				//發送
 else{receive();}					//接收
}