组态王与单片机通信实例.doc

*组态协议: 字头 设备地址 标志 数据地址 数据字节数 数据 异或 CR *字头：1字节1个ASCII码，40H*设备地址：1字节2个ASCII码，0255（即0-0x0ffH）*标志：1字节2个ASCII码，bit0bit7， /把接收值将它发出即可*bit0=0:读，bit0=1:写。*bit1=0：不打包。*bit3bit2=00,数据类型为字节。*bit3bit2=01,数据类型为字。*bit3bit2=1x,数据类型为浮点数。*数据地址：2字节4个ASCII码，0x00000xffff /把接收值将它发出即可*数据字节数：1字节2个ASCII码，1100，实际读写的数据的字节数。 /把接收值将它发出即可*数据：为实际的数据转换为ASCII码，个数为字节数乘2。 *异或：异或从设备地址开始异或，到异或字节前结束得异或值，异或值转换成2个ASCII码* /如得0x4b，对应Ascll为0x34和0x42.*CR：0x0d。*/读格式为：字头设备地址标志 数据地址数据字节数 异或CR /写格式:字头设备地址标志数据地址 数据字节数 数据 异或CR#includereg52.h#defineucharunsignedchar#defineCTH00xfe#defineCTL00x0csbitled1=P27;/定义LED.sbitled2=P26;sbitled3=P25;sbitled4=P24;/unsignedchari10=0;/收数据标/unsignedintj=0; /动态显示数据用unsignedchari=0; /动态显示用 intj=0; /调试用unsignedchark=0; /调试用1100. /unsignedchark4=0; /K4为发送的数据;K6为组态下传数据标志。k6=0;intk2=0; /接收死机保护。ucharduan_tabled10=0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f;/需要显示的段选码charpp122=0x01,0x02,0x03,0x04,0x05,0x06,0x07,0x08,0x09,0x0a,0x0a,0x0a,0x0a,0x0a,0x0a,0x0a,0x0a,0x0a,0x0a,0x0a; /接收上位机读写暂存charpp210=0x40,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x0d;/数据发送暂存ucharpp38=0x40,0x00,0x00,0x2a,0x2a,0x00,0x00,0x0d;/ucharpp48=0x40,0x00,0x00,0x23,0x23,0x37,0x36,0x0d;/delay(unsignedinti)/延时子程序。unsignedintj=0;for(;j=100)j=0;k+;/j调试用if(k=100) k=0;/K调试用，1100显示voidUART()interrupt4/接收中断，只接收ucharii; unsignedinttemp;if(RI) if(SBUF=0x40)/简单判断是否为组态发送数据，否则RI=0。 for(ii=0;ii18;ii+)/不管发多少Bit，按最多收18个Bit。 pp1ii=SBUF;RI=0;if(pp1ii=0x0d)k2=1;return; /也可用break;跳出for语句temp=0; while(RI=0&temp=1000)return; RI=0; / voidwrite(uchark5)/写子程序,写的格式为：字头设备地址标志 数据地址数据字节数 异或CR ucharii;/变量ucharyihou1,yihou2,yihou3; /计算暂存变量yihou1=pp11pp12pp13pp14pp15pp16pp17pp18pp19pp110; /异或较验；组态协议。yihou2=yihou1; /转换成ACall码。如73的AsAALL为0x37和0x33yihou1=yihou14 ; yihou2=yihou2&0x0f;if(yihou20x09)yihou2=yihou2-9+0x40;elseyihou2=yihou2+0x30; if(yihou10x09)yihou1=yihou1-9+0x40;elseyihou1=yihou1+0x30; /转换if(yihou1=pp111&yihou2=pp112) /较验 pp21=pp11; pp22=pp12; /放入需发送的内容。pp23=pp19; pp24=pp110; / 组态协议。 pp25=pp26=k5; / 把数据转换成Asall码pp25=(pp254)&0x0f;pp26=pp26&0x0f;if(pp25=0x0a)pp25=pp25-9+0x40; /0x0a0x0f的转换，a对应Ascll值为0x40。elsepp25=pp25+0x30; /09的转换。if(pp26=0x0a)pp26=pp26-9+0x40;elsepp26=pp26+0x30;yihou3=pp21pp22pp23pp24pp25pp26; /取得异域较验值。pp27=yihou34;pp28=yihou3&0x0f;if(pp27=0x0a)pp27=(pp27-9)+0x40;elsepp27=pp27+0x30;if(pp28=0x0a)pp28=(pp28-9)+0x40;elsepp28=pp28+0x30;for(ii=0;ii4; /Aacll转换。pp36=yihou3&0x0f;if(pp35=0x0a)pp35=pp35-9+0x40;elsepp35=pp35+0x30;if(pp36=0x0a)pp36=pp36-9+0x40;elsepp36=pp36+0x30;for(ii=0;ii4 ; yihou2=yihou2&0x0f;if(yihou20x09)yihou2=yihou2-9+0x40;elseyihou2=yihou2+0x30; if(yihou10x09)yihou1=yihou1-9+0x40;elseyihou1=yihou1+0x30;if(yihou1=pp113&yihou2=pp114)/* if(k6=2)pp119=pp111;/取数据pp120=pp112;*/pp41=pp11; / 取设备地址pp42=pp12; /取设备地址yihou3=pp11pp12; /异或效验pp45=yihou34; /异或效验结果转换成ASCII码。pp46=yihou3&0x0f;if(pp45=0x0a)pp45=pp45-9+0x40;elsepp45=pp45+0x30;if(pp36=0x0a)pp46=pp46-9+0x40;elsepp46=pp46+0x30;for(ii=0;ii4;pp36=yihou3&0x0f;if(pp35=0x0a)pp35=pp35-9+0x40;elsepp35=pp35+0x30;if(pp36=0x0a)pp36=pp36-9+0x40;elsepp36=pp36+0