#include<reg51.h>
#define uchar unsigned char
#define SLAVE 0x00
#define BN 16

uchar idata tdata[16];
uchar idata rdata[16];
bit trdy;
bit rrdy;
void main(void)
{
  TMOD=0x20;						//定時器T1為模式2
  TL1=0xfd;						//定時器初值
  TH1=0xfd;
  PCON=0x00;
  TR1=1;
  SCON=0xf0;						//串行口方式3
  ES=1;EA=1;						//開串行口中斷
  while(1){trdy=1;rrdy=1;}				//準備好發送和接收
}

void slave(void) interrupt 4 using 1
{
  void str(void);
  void sre(void);
  uchar a;
  RI=0;							//關串行口中斷
  ES=0;
  if(SBUF!=SLAVE){ES=1;goto reti;}		//非本機地址，繼續監聽
  SM2=0;							//取笑監聽狀態
SBUF=SLAVE;					//發回從機地址
while(TI!=1);TI=0;
while(RI!=1);RI=0;
if(RB8==1){SM2=1;ES=1;goto reti;}		//確認地址不符，從機復位
a=SBUF;						//接收命令
if(a==1){						//從機接收主機的數據
if(rrdy==1) SBUF=0x01;			//接收準備好，發回0x01
else
SBUF=0x00;
while(TI!=1);TI=0;
while(RI!=1);RI=0;
if(RB8==1){SM2=1;ES=1;goto reti;}
sre();						//接收數據
}
else
{
if(a==0x02)					//從機向主機發送數據
{
if(trdy==1) SBUF=0x02;		//發送準備好
else
SBUF=0x00;
while(TI!=1);TI=0;
while(RI!=1);RI=0;
if(RB8==1){SM2=1;ES=1;goto reti;}
str( );					//發送數據
}
else
{
SBUF=0x80;				//命令非法
while(TI!=1);TI=0;
SM2=1;ES=1;				//恢復監聽
}
}
reti:;
}

void str(void)						//發送數據函數
{uchar p,i;
 trdy=0;
 do{p=0;							//初始校驗和為0
    for(i=0;i<BN;i++)
     {SBUF=tdata[i];					//發送數據
      p+=tdata[i];
      while(TI!=1);TI=0;
     }
  SBUF=p;						//發送校驗和
while(TI!=1);TI=0;
while(RI!=1);RI=0;
}while(SBUF!=0);					//主機接收不正確，重新發送
SM2=1;ES=1;
}

void sre(void)						//接收數據函數
{uchar p,i;
 rrdy=0;
 while(1)
{p=0;								//初始化校驗和為0
   for(i=0;i<BN;i++)
{while(RI!=1);RI=0;
   tdata[i]=SBUF;					//接收數據
   p+=rdata[i];
  }
  while(RI!=1);RI=0;
if(SBUF==p){SBUF=0x00;break;}		//校驗和相同，發00H
else{
SBUF=0xFF;while(TI!=1);TI=0;		//校驗和不同，發FFH，重新接收
 }
}
SM2=1;ES=1;
}