485通信程序(51单片机)
#include
#defineucharunsignedchar
#defineuintunsignedint
/*通信命令*/
#define_ACTIVE_0x01//主机询问从机是否存在
#define_GETDATA_0x02//主机发送读设备请求
#define_OK_0x03//从机应答
#define_STATUS_0x04//从机发送设备状态信息
#define_MAXSIZE0x08//缓冲区长度
#define_ERRLEN12//任何通信帧长度超过12则表示出错
uchardbuf[MAXSIZE]; //该缓冲区用于保存设备状态信息
uchardev;//该字节用于保存本机设备号
sbitM_DE=P1^0;//驱动器使能，1有效
sbitM_RE=P1^1;//接收器使能，0有效
voidget_status();//调用该函数获得设备状态信息，函数全码未给出
voidsend_data(uchartype,ucharlen,uchar*buf);//发送数据帧
bitrecv_cmd(uchar*type);//接收主机命令，主机请求包含命令信息。
voidsend_byte(ucharda);//该函数发送一帧数据中的一个字节，由send_data()函数调用
voidmain()
{
uchartype;
ucharlen;
/*系统初始化*/
P1=0xff;//读取本机设备号
dev=(P1>>2);
TMOD=0x20;//定时器T1使用方式2
TH1=250;
TL1=250;
TR1=1;//开始计时
PCON=0x80;//SMOD=1;
SCON=0x50;//工作方式1，波特优选法9600bps,允许接收
ES=0; //关闭串品中断
IT0=0;//外部中断0使有电平触发模式
EX0=1;//开启外部中断0
EA=0;//开启总中断
/*主程序流程*/
while(1)
{
if(recv_cmd(&type)==0)//发送帧错误或帧地址与本机地址不符，丢弃当前帧后返回
continue;
switch(type)
{
case_ACTIVE_://主机询问从机是否存在
send_data(_OK_,0,dbuf);//发送应答信息，这里的buf的内容并未用到
break;
case_GETDATA_://主机发送读设备请求
len=strlen(dbuf);
snd_data(_STATUS_,len,dbuf);//发送设备信息
break;
default:
break;//命令类型错误，丢弃当前帧返回
｝
}
}
}
voidREADSTATUS()interrput0using1//产生外部中断0时表示设备状态发生改变，该函数使用寄存器组1
{
get_status();//获得设备状态信息，并将其存入dbuf指向的存储区，数据最后一个字节置0表示数据结束
}
｝
/*该函数接收一帧数据度进行检测，无论该帧是否错误，函数均会返回。
*函数参数type保存接收到的命令字
*当接收的数扭帧错误或其地址位不为0时（非主机发送帧），快活数返回0，反之返回1
*/
bitrecv_cmd(uchar*type)
{
bitdb=0;//当接收到的上一个字节为0xdb时，该位置位
bitc0=0;//当接慢到的上一个字节为0xc0时，该位置位
uchardata_buf［_ERRLEN］;//保存接收到的帧
uchartmp;
ucharecc=0;
uchari;
M_DE=0;//置发送禁止，接收允许
M_RE=0;
/*接收一帧数据*/
i=0;
while(!c0)//循环直至帧接收完毕
｛
RI=0;
while(RI);
tmp=SBUF;
RI=0;
if(db==1)//接收到的上一个字节为0xdb
{
swithc(tmp)
｛
case0xdd:
data_buf[i]=0xdb;//0xdbdd表示0xdb
ecc=ecc^0xdb;
db=0;
break;
case0xdc:
data_buf[i]=0xc0;//0xdbdc表示0xc0
ecc=0;
db=0;
break;
default:
return0;//帧错误，返回
｝
i++;
}
switch(tmp)//正常情况下
{
case0xc0://帧结束
c0=1;
break;
case0xdb: //检测到转义字符
db=1;
break;
default://普通数据
data_buf[i]=tmp;//保存数据
ecc=ecc^tmp;//计算校验字节
i++;
}
if(i==_ERRLEN)//帧超长，错误，返回
return0;
｝
/*判断帧是否错误*/
if(i<4)//帧过短，错误，返回
return0;
if(ecc!=0)//校验错误，返回
return0;
if(data_buf［i!=dev) //非访问本机命令，错误，返回
return0;
*type=data_buf[1];//获得命令字
return1;//函数成功返回
}
/*该函数发送一数据帧，参数type为命令字，len为数据长度，buf为要发送的数据内容*/
voidsend_data(uchartype,ucharlen,uchar*buf)
{
uchari;
ucharecc=0;
M_DE=1;//置发送允许，接收禁止
M_RE=1;
send_byte(dev);//发送本机地址
ecc=dev;
send_byte(type);//发送命令字
ecc=ecc^type;
send_byte(len);//发送长度
ecc=ecc^len;
for(i=0;i
{
send_byte(*buf);
ecc=ecc^(*buf);
buff++;
}
send_byte(ecc);//发送校验字节
TI=0;//发送帧结束标志
SBUF=0xc0;
while(!TI);
TI=0;
}
/*该函数发送一个数据字节，若该字节为0xdb,则发送0xdbdd,若该字节为0xc0,则发送0xdbdc*/
voidsend_byte(ucharda)
{
switch(da)
{
case0xdb://字节为0xdb,发送0xdbdd
TI=0;
SBUF=0xdb;
while(!TI);
TI=0;
SBUF=0xdd;
while(!TI);
TI=0;
break;
case0xc0://字节为0xc0,则发送0xdbdc
TI=0;
SBUF=0xdb;
while(!TI);
TI=0;
SBUF=0xdc;
while(!TI);
TI=0;
break;
default://普通数据刚直接发送
TI=0;
SBUF=da;
while(!TI);
TI=0;
}
}
评论