51单片机实现的485通讯程序

标签：modbus8051源程序modbus协议--51端程序的实现RTU需要一个定时器来判断3.5个流逝时间。

#define ENABLE 1#define DISABLE 0#define TRUE 1#define FAULT 0#define RECEIVE_EN 0#define TRANSFER_EN 1#define MAX_RXBUF 0x20extern unsigned char emissivity;extern unsigned char tx_count,txbuf[15];extern unsigned char rx_count,rxbuf[15];extern unsigned char tx_number,rx_number;extern bit rx_ok;unsigned char rx_temp;void InitTimer1() //针对标准8051{TMOD=(TMOD|0xf0)&0x1f; //将T1设为16位定时器TF1=0;TH1=0x62; //设T1位3.5位的接收时间35bit/9600bit/s=3.646msTL1=0x80;//晶振为11.0592MHz，T＝65535-3.646ms*11.0592MHz/12=0xf2df//0x6280是22.1184M下LPC9XX下的值。

ET1=1;//允许T1中断TR1=1;//T1开始计数}void timer1() interrupt 3 using 2 //定时器中断{TH1=0x62; //3.646ms interruptTL1=0x80;if(rx_count>=5) //超时后，若接收缓冲区有数则判断为收到一帧{rx_ok=TRUE;}}void scomm() interrupt 4 using 3 //modbus RTU模式{if(TI){TI = 0;if(tx_count < tx_number) //是否发送结束{SBUF = txbuf[tx_count];}tx_count++;}if(RI){rx_temp=SBUF;if(rx_ok==FAULT) //已接收到一帧数据，在未处理之前收到的数舍弃{if(rx_countrxbuf[rx_count]=rx_temp;rx_count++;}TH1=0x62; //timer1 reset,count againTL1=0x80;RI=0;}}在主循环中判断标志rx_ok来执行帧处理。

if(rx_ok){ParseFrame();KB0=1;REN=0;tx_count=0;TI=1; //启动发送响应帧rx_count=0;rx_ok=0;}WORD MAKEWORD(a, b){int_byte itemp;itemp.items.high=a;itemp.items.low=b;return (itemp.item);// 解析帧并发送响应帧 (在帧完整的前提下调用)bit ParseFrame(){unsigned char byAddr ; // 地址unsigned char byFunCode ; // 功能代码int_byte wCRC;wCRC.item = MAKEWORD(rxbuf[rx_count-1], rxbuf[rx_count-2]);if(wCRC.item != CRC(rxbuf, rx_count-2)) // 判断校验是否正确return FALSE;// 正式解析byAddr = rxbuf[0]; // 地址byFunCode = rxbuf[1]; // 功能代码// 如果地址不对if( (byAddr != m_byAddress) && (byAddr != 0) )return FALSE;if(byAddr == m_byAddress){AddSendByte(m_byAddress) ; // 地址switch( byFunCode ){case 3: // 读保持寄存器Fun3(3);break;....// 添加命令散转......default:ErroRespond(1);return FALSE;break;}}wCRC.item = CRC(txbuf,tx_number);AddSendByte(wCRC.items.low);AddSendByte(wCRC.items.high);return TRUE;// 根据接收帧模式发送相应，模式的数据BOOL AddSendByte(const BYTE byData){txbuf[tx_number]=byData;tx_number++;if(tx_number>30)return FALSE;return TRUE;}// 异常响应描述响应解释// 01 无效功能变送器不允许执行收到的功能// 02 无效地址数据栏中的地址是不允许的// 03 无效数据数据栏中的数据是不允许的// 06 忙收到的消息没错，但从机正在执行一个长的程序命令bit ErroRespond(const unsigned char byErroCode){// printf("\nErroRespond%02X \n", byErroCode);if( !AddSendByte(rxbuf[1] | 0x80) )return FALSE;return AddSendByte(byErroCode);}//***CRC Calculation for MODBUS Protocol for VC++***////数组snd为地址等传输字节，num为字节数//unsigned int CRC(unsigned char *snd, unsigned char num){unsigned char i, j;unsigned int c,crc=0xFFFF;for(i = 0; i < num; i ++){c = snd[i] & 0x00FF;crc ^= c;for(j = 0;j < 8; j ++){if (crc & 0x0001){crc>>=1;crc^=0xA001;}else crc>>=1;}}return(crc);}51单片机实现的485通讯程序单片机2009-08-31 14:17:48 阅读722 评论0 字号：大中小订阅#ifndef __485_C__#define __485_C__#include <reg51.h>#include <string.h>#define unsigned char uchar#define unsigned int uint/* 通信命令*/#define __ACTIVE_ 0x01 // 主机询问从机是否存在#define __GETDATA_ 0x02 // 主机发送读设备请求#define __OK_ 0x03 // 从机应答#define __STATUS_ 0x04 // 从机发送设备状态信息#define __MAXSIZE 0x08 // 缓冲区长度#define __ERRLEN 12 // 任何通信帧长度超过12则表示出错uchar dbuf[__MAXSIZE]; // 该缓冲区用于保存设备状态信息uchar dev; // 该字节用于保存本机设备号sbit M_DE = P1^0; // 驱动器使能，1有效sbit M_RE = P1^1; // 接收器使能，0有效void get_status(); // 调用该函数获得设备状态信息，函数代码未给出void send_data(uchar type, uchar len, uchar *buf); // 发送数据帧bit recv_cmd(uchar *type); // 接收主机命令，主机请求仅包含命令信息void send_byte(uchar da); // 该函数发送一帧数据中的一个字节，由send_data()函数调用void main(){uchar type;uchar len;/* 系统初始化*/P1 = 0xff; // 读取本机设备号dev = (P1>>2);TMOD = 0x20; // 定时器T1使用工作方式2TH1 = 250; // 设置初值TL1 = 250;TR1 = 1; // 开始计时PCON = 0x80; // SMOD = 1SCON = 0x50; // 工作方式1，波特率9600bps，允许接收ES = 0; // 关闭串口中断IT0 = 0; // 外部中断0使用电平触发模式EX0 = 1; // 开启外部中断0EA = 1; // 开启中断/* 主程序流程*/while(1) // 主循环{if(recv_cmd(&type) == 0) // 发生帧错误或帧地址与本机地址不符，丢弃当前帧后返回continue;switch(type){case __ACTIVE_: // 主机询问从机是否存在send_data(__OK_, 0, dbuf); // 发送应答信息，这里buf的内容并未用到break;case __GETDATA_:len = strlen(dbuf);send_data(__STATUS_, len, dbuf); // 发送设备状态信息break;default:break; // 命令类型错误，丢弃当前帧后返回}}}void READSTATUS() interrupt 0 using 1 // 产生外部中断0时表示设备状态发生改变，该函数使用寄存器组1{get_status(); // 获得设备状态信息，并将其存入dbuf指向的存储区，数据最后一字节置0表示数据结束}/* 该函数接收一帧数据并进行检测，无论该帧是否错误，函数均会返回* 函数参数type保存接收到的命令字* 当接收到数据帧错误或其地址位不为0时（非主机发送帧），函数返回0，反之返回1*/bit recv_cmd(uchar *type)bit db = 0; // 当接收到的上一个字节为0xdb时，该位置位bit c0 = 0; // 当接收到的上一个字节为0xc0时，该位置位uchar data_buf[__ERRLEN]; // 保存接收到的帧uchar tmp;uchar ecc = 0;uchar i;M_DE = 0; // 置发送禁止，接收允许M_RE = 0;/* 接收一帧数据*/i = 0;while(!c0) // 循环直至帧接收完毕{RI = 0;while(!RI);tmp = SBUF;RI = 0;if(db == 1) // 接收到的上一个字节为0xdb{switch(tmp){case 0xdd:data_buf[i] = 0xdb; // 0xdbdd表示0xdbecc = ecc^0xdb;db = 0;break;case 0xdcdata_buf[i] = 0xc0; // 0xdbdc表示0xc0ecc = ecc^0xc0;db = 0;break;defaultreturn 0; // 帧错误，返回}i++;}switch(tmp) // 正常情况{case 0xc0: // 帧结束c0 = 1;break;case 0xdb: // 检测到转义字符break;default: // 普通数据data_buf[i] = tmp; // 保存数据ecc = ecc^tmp; // 计算校验字节i++;}if(i == __ERRLEN) // 帧超长，错误，返回return 0;}/* 判断帧是否错误*/if(i<4) // 帧过短，错误，返回return 0;if(ecc != 0) // 校验错误，返回return 0;if(data_buf[0] != dev) // 非访问本机命令，错误，返回return 0;*type = data_buf[1]; // 获得命令字return 1; // 函数成功返回}/* 该函数发送一帧数据帧，参数type为命令字、len为数据长度、buf为要发送的数据内容*/ void send_data(uchar type, uchar len, uchar *buf){uchar i;uchar ecc = 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<len; i++) // 发送数据{send_byte(*buf);ecc = ecc^(*buf);buf++;}send_byte(ecc); // 发送校验字节TI = 0; // 发送帧结束标志while(!TI);TI = 0;}/* 该函数发送一个数据字节，若该字节为0xdb，则发送0xdbdd，若该字节为0xc0则，发送0xdbdc */void send_byte(uchar da){switch(da){case 0xdb: // 字节为0xdb，发送0xdbddTI = 0;SBUF = 0xdb;while(!TI);TI = 0;SBUF = 0xdd;while(!TI)TI = 0;break;case 0xc0: // 字节为0xc0，发送0xdbdcTI = 0;SBUF = 0xdb;while(!TI);TI = 0;SBUF = 0xdc;while(!TI)TI = 0;break;default: // 普通数据则直接发送TI = 0;SBUF = da;while(!TI);TI = 0;}}#endif关于CT极性的若干相关问题看到旺友leilin0902关于线圈极性测试方法的帖子，有一小小想法，开新贴讨论CT极性的相关问题，我会慢慢提问，欢迎大家讨论。