单片机相互之间的串口通讯程序：

#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); //主机接收不正确，重新发送