基于modbus协议的温度采集系统程序清单

《基于modbus协议的温度采集系统程序清单》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

1、#include#definesfrucharsbitucharunsignedcharAUXR=0X8E;Prg；Clkl64=P0Al;sbitDatal64=P0A2;intintucharucharucharTempture;AdValue;CovertCount;xdataDispBuf[4];〃定义头文件〃习惯性用法宏定义〃定义特殊功能寄存器，其地址为8EH〃定义变量〃在bdata区定义町寻址变量Clkl64,74LS164的脉冲端接P0」〃在bdata区定义可寻址变量Data164,74LS164的数据端接P0.2〃定义变量〃在xdata区定义一个数据缓

2、冲区externexterncodeshapeCode[10]={Oxfc,0x60,0xda,0xf2,0x66,0xb6,0xbe,0xe0,0xfe,0xf6};//字型码〃定义一个外部位标量〃外部定义externexternexternexternexternextemexternextemexternucharucharexternbitfig_10ms;voidinitUart(void);voidinitTimer(void);intAdSample();ucharStorcO;ucharStore1;ucharStore2;ucharStore3;ucharStore4;

3、ucharStore5;bitbMaySendData;xdataxdatabitRecBuffflO];SendBuff[10];fig_10ms;〃接受数据缓冲区〃发送数据缓冲区〃接受函数//发送准备函数//AD转换函数voidDiap(unsignedcharInData){unsignedcharj;chari;j=〜InData;for(i=0;i<8;i++){Clk164=0;if((j&()x()l)==()x01)Data164=1;elseData164=0;Clkl64=l;〃定义局部变量〃采用共阳数码管，取反〃循环移入寄存器74LS164//按位与〃上升沿脉冲vo

4、idRecProcess(ucharInData);voidSendPrepare();extemintAdSample();〃###############################字型码送显示了程丿〃接受函数//发送准备函数//AD转换函数voidDiap(unsignedcharInData){unsignedcharj;chari;j=〜InData;for(i=0;i<8;i++){Clk164=0;if((j&()x()l)==()x01)Data164=1;elseData164=0;Clkl64=l;〃定义局部变量〃采用共阳数码管，取反〃循环移入寄存器74LS164

5、//按位与〃上升沿脉冲voidRecProcess(ucharInData);voidSendPrepare();extemintAdSample();〃###############################字型码送显示了程丿Y############################〃卄卄卄卄卄卄卄卄卄卄卄卄卄卄卄卄卄卄卄卄卄卄卄卄卄卄卄卄、池ftF/ih"i关畀7k缰｝xhIx卄卄卄卄卄卄卄卄卄卄卄卄卄卄卄卄卄卄卄卄卄卄卄卄卄卄卄//TTTrTrTrTrTrTrTrTrTrTrTrTTTrTTTrTTTrTrTrTrTrTTTrTrTrTrTTtjui/x,LH.人仝丁匕，卄卄

6、仃卄片卄卄片仃仃卄存廿TtrrrrrrftrrTTTrTrTTTrTrTrrrvoidTempToDispBuf(intTemp)ucharxdataj;j=Temp/1000;DispBuf[3]=j;Temp=Temp%1000;//得到温度值的最高位〃温度值的最高位送显示缓冲区〃温度值取余，j=Temp/100;DispBuf[2]=j;〃得到温度值的次高位〃温度值的次高位送显示缓冲区Temp=Temp%100;〃取余j=Temp/10;DispBuf[l]=j;〃得到温度值的次低位〃温度值的次低位送显示缓冲区j=Temp%10;DispBuflO]=j;〃得到温度值的低位〃温度值

7、的低位送显示缓冲区//########################显示调用字码子程序##################################voidDisp4(ucharDot){uchari;ucharj;for(j=0;j<4;j++)〃循环取显示缓冲区的数值四次，并将显示缓冲区的数按照字型码送显i=DispBuf[j];i=shapeCode[il;if(j==(3-Dot))il=0x01;Diap(i);〃