單片機與單片機串口通訊程序

#include
#defineucharunsignedchar
#defineSLAVE0x00
#defineBN16

ucharidatatdata[16];

ucharidatardata[16];
bittrdy;
bitrrdy;
voidmain(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;}//準備好發(fā)送和接收
}

voidslave(void)interrupt4using1
{
voidstr(void);
voidsre(void);
uchara;
RI=0;//關串行口中斷
ES=0;
if(SBUF!=SLAVE){ES=1;gotoreti;}//非本機地址，繼續(xù)監(jiān)聽
SM2=0;//取笑監(jiān)聽狀態(tài)
SBUF=SLAVE;//發(fā)回從機地址
while(TI!=1);TI=0;
while(RI!=1);RI=0;
if(RB8==1){SM2=1;ES=1;gotoreti;}//確認地址不符，從機復位
a=SBUF;//接收命令
if(a==1){//從機接收主機的數據
if(rrdy==1)SBUF=0x01;//接收準備好，發(fā)回0x01
else
SBUF=0x00;
while(TI!=1);TI=0;
while(RI!=1);RI=0;
if(RB8==1){SM2=1;ES=1;gotoreti;}
sre();//接收數據
}
else
{
if(a==0x02)//從機向主機發(fā)送數據
{
if(trdy==1)SBUF=0x02;//發(fā)送準備好
else
SBUF=0x00;
while(TI!=1);TI=0;
while(RI!=1);RI=0;
if(RB8==1){SM2=1;ES=1;gotoreti;}
str();//發(fā)送數據
}
else
{
SBUF=0x80;//命令非法
while(TI!=1);TI=0;
SM2=1;ES=1;//恢復監(jiān)聽
}
}
reti:;
}

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

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