单片机相互之间的串口通讯程序：
 
#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;
 }