rs485.txt

C51系列

#include<reg51.h>
#define uchar unsigned char
#define BN 16      //传送一次的字节数
uchar master(uchar addrs,uchar comnd);
uchar SLAVE=0x00;     //从机地址
uchar idata rdata[16];
uchar idata tdata[16]={"abcdefghijklmnop"};
void main(void)
{
 uchar i;
 for(i=0;i<10;i++)
 TMOD=0x20;      //定时器T1定义为模式2
  TL1=0xfd;TH1=0xfd;    //置初值
  PCON=0x00;
TR1=1;
SCON=0xD0;     //设置串行口控制字，方式3，允许接收
master(SLAVE,0x01);
master(SLAVE,0x02);
SLAVE++;
}
void error(void)
{
  SBUF=0xFF;     //发给从机数据出错标志
  while(TI!=1);      //等待发送完
  TI=0;
}
uchar master(uchar addrs,uchar comnd)
{ uchar a,i,p;
while(1)
{
  SBUF=SLAVE;     //发呼叫地址 
  while(TI!=1);      //等待发送完
  TI=0;
while(RI!=1);      //等待从机应答
RI=0;
if(SBUF!=addrs)
error();       //若地址出错，发出错标志，从机复位
else{
TB8=0;      //清地址标志位，准备接收数据
SBUF=comnd;     //发命令帧
while(TI!=1);TI=0;
while(RI!=1);RI=0;
a=SBUF;      //接收从机的返回地址帧
if((a&0x80)==0x80){TB8=1;error();} //若主机命令非法，发复位信号给从机
else
{
  if(comnd==0x01)    //主机发送的命令是请求从机接收数据
       {if((a&0x01)==0x01)   //从机准备接收就绪
{do{
            p=0;     //清校验和
   for(i=0;i<BN;i++)
{SBUF=tdata[i];   //发送数据
 p=p+tdata;    //计算校验和
 while(TI!=1);TI=0;
   }
   SBUF=p;    //发送校验和给从机
   while(TI!=1);TI=0;
while(RI!=1);RI=0;
}while(SBUF!=0);   //从机接收不正确，主机重新发送
TB8=1;    //重置地址标志位
return(0);
}
}
    else{
if(comnd==0x02)   //主机发送的是接收命令，从机发送数据
{if((a&0x02)==0x02)      //从机准备发送就绪
{while(1)
{p=0;
 for(i=0;i<BN;i++)
{while(RI!=1);RI=0;
rdata[i]=SBUF;  //主机接收数据
p+=rdata[i];
}
while(RI==0);RI=0;
if(SBUF==p)
{
SBUF=0x00;  //校验和相同，发0x00给从机
while(TI!=1);TI=0;
}
else
{SBUF=0x0F;   //校验和不同，发0x0F给从机
 while(TI!=1);TI=0;
}
}
 TB8=1;    //重置地址标志位
 return(0);
}
}
}
}
}
}
}
slave.c清单[upload=rar]viewFile.asp?ID=1101[/upload]
#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;
}