無私開源
單片機(jī)源程序如下:
- //#include <reg52.h> //頭文件不能雙重包含否則全盤錯誤(此處不刪除謹(jǐn)記)
- #include "modbus06.h"
- #include <string.h>
- #include <intrins.h>
- #include "STC15Fxxxx.H"
- #include "ADC.H"
- #define uint8 unsigned char
- #define uint16 unsigned int
- sbit led=P1^0;//暫時測試使用
- sbit led2=P1^2;
- sbit led3=P1^3;
- char buf_string[8]; //定義數(shù)據(jù)包長度為15個字符
- uint16 dzbl;//取06地址
- uint16 xrz;//取寫入寄存器地址的值
- /*定義成unsigned char類型可以顯示足夠大的數(shù)據(jù),不然會出現(xiàn)錯誤*/
- uint8 receBuf[40];// 詢問數(shù)據(jù)包 此處記住因為詢問數(shù)據(jù)包都是8位 所以可以給數(shù)組規(guī)定元素數(shù)量
- uint8 sendBuf[40];// 響應(yīng)數(shù)據(jù)包 相應(yīng)數(shù)據(jù)包 嚴(yán)雨在此 規(guī)定最多連所以數(shù)據(jù)在內(nèi) 最多20個元素
- uint16 BAUD=9600;
- uint16 TEMP_Alert=1000;
- uint16 TempRegister; //用于測試 字址址16
- uint8 gnmbl=7;//功能碼變量
- uint8 localAddr = 0x01; //單片機(jī)控制板的地址
- uint8 sendCount; //發(fā)送字節(jié)個數(shù) 發(fā)送函數(shù)中決定發(fā)送字節(jié)個數(shù)
- uint8 receCount=25; //接收到的字節(jié)個數(shù)
- //uint8 sendPosi; //發(fā)送位置
- void checkComm0Modbus(void);//查詢uart接收的數(shù)據(jù)包內(nèi)容函數(shù)
- uint16 getRegisterVal(uint16 addr,uint16 *tempData);//讀取寄存器內(nèi)容函數(shù)
- uint16 adc;
- uint16 adc_001;
- //串口發(fā)送函數(shù)
- /*void PutString(unsigned char *TXStr,unsigned char len) //挨個字節(jié)發(fā)送需要給變量定義成char類型
- {
- ES=0; //關(guān)閉串口中斷
- while(len--)
- {
- SBUF=*TXStr;//指針指向地址上面的值 賦 給 SBUF
- while(TI==0);
- TI=0;
- TXStr++;//地址+1
- }
- ES=1; //打開串口中斷
- }*/
- //串口接收函數(shù)
- bit ReceiveString()
- {
-
- char * RecStr=receBuf;//給這個地址賦一個變量名
- char num=0;
- unsigned char count=0;
- loop:
- //接收到一位數(shù)據(jù)馬上存入這個地址
- *RecStr=SBUF;//假設(shè)SBUF里面的值是一位一位發(fā)來,每一次都存入這個地址
- RI=0;
- count=0;
-
- if(num<gnmbl) //gnmbl數(shù)據(jù)長度變量,根據(jù)每一次接收到的數(shù)據(jù)進(jìn)行變化,嘗試連續(xù)接收15個字符 03=7 16=10
- {
- num++;
- RecStr++;
-
- while(!RI)
- {
- count++;
- if(count>1592)return 0; //接收數(shù)據(jù)等待延遲,等待時間太久會導(dǎo)致CPU運(yùn)算閑置,太短會出現(xiàn)"數(shù)據(jù)包被分割",默認(rèn)count=130
- } //由于stc15系列比89c52運(yùn)行速度快 所以循環(huán)次數(shù)增加10倍 1300
- goto loop;
- }
- return 1;
- }
- //定時器1用作波特率發(fā)生器
- void Init_USART()
- {
- PCON &= 0x3f; //波特率不倍速,串行口工作方式由SM0、SM1決定
- SCON = 0x50; //8位數(shù)據(jù),可變波特率,啟動串行接收器
- AUXR |= 0x40; //定時器1時鐘為Fosc,即1T
- AUXR &= 0xfe; //串口1選擇定時器1為波特率發(fā)生器
- TMOD &= 0x0f; //清除定時器1模式位
- TMOD |= 0x20; //設(shè)定定時器1為8位自動重裝方式
- TL1 = 0xDC; //設(shè)定定時初值
- TH1 = 0xDC; //設(shè)定定時器重裝值
- ET1 = 0; //禁止定時器1中斷
- TR1 = 1; //啟動定時器1
- ES = 1; // 串口1中斷打開
- EA = 1;
-
- }
- /* CRC 高位字節(jié)值表 */
- /*const*/ uint8 code auchCRCHi[] = {
- 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x01, 0xC0/**/,
- 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41,
- 0x00, 0xC1, 0x81, 0x40, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0,
- 0x80, 0x41, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40,
- 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1,
- 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x01, 0xC0, 0x80, 0x41,
- 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1,
- 0x81, 0x40, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41,
- 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x01, 0xC0,
- 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x00, 0xC1, 0x81, 0x40,
- 0x01, 0xC0, 0x80, 0x41, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1,
- 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40,
- 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x01, 0xC0,
- 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x00, 0xC1, 0x81, 0x40,
- 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0,
- 0x80, 0x41, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40,
- 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x01, 0xC0,
- 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41,
- 0x00, 0xC1, 0x81, 0x40, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0,
- 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41,
- 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0,
- 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x00, 0xC1, 0x81, 0x40,
- 0x01, 0xC0, 0x80, 0x41, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1,
- 0x81, 0x40, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41,
- 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x01, 0xC0,
- 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40
- } ;
- /* CRC低位字節(jié)值表*/
- /*const*/ uint8 code auchCRCLo[] = {
- 0x00, 0xC0, 0xC1, 0x01, 0xC3, 0x03, 0x02, 0xC2, 0xC6, 0x06/**/,
- 0x07, 0xC7, 0x05, 0xC5, 0xC4, 0x04, 0xCC, 0x0C, 0x0D, 0xCD,
- 0x0F, 0xCF, 0xCE, 0x0E, 0x0A, 0xCA, 0xCB, 0x0B, 0xC9, 0x09,
- 0x08, 0xC8, 0xD8, 0x18, 0x19, 0xD9, 0x1B, 0xDB, 0xDA, 0x1A,
- 0x1E, 0xDE, 0xDF, 0x1F, 0xDD, 0x1D, 0x1C, 0xDC, 0x14, 0xD4,
- 0xD5, 0x15, 0xD7, 0x17, 0x16, 0xD6, 0xD2, 0x12, 0x13, 0xD3,
- 0x11, 0xD1, 0xD0, 0x10, 0xF0, 0x30, 0x31, 0xF1, 0x33, 0xF3,
- 0xF2, 0x32, 0x36, 0xF6, 0xF7, 0x37, 0xF5, 0x35, 0x34, 0xF4,
- 0x3C, 0xFC, 0xFD, 0x3D, 0xFF, 0x3F, 0x3E, 0xFE, 0xFA, 0x3A,
- 0x3B, 0xFB, 0x39, 0xF9, 0xF8, 0x38, 0x28, 0xE8, 0xE9, 0x29,
- 0xEB, 0x2B, 0x2A, 0xEA, 0xEE, 0x2E, 0x2F, 0xEF, 0x2D, 0xED,
- 0xEC, 0x2C, 0xE4, 0x24, 0x25, 0xE5, 0x27, 0xE7, 0xE6, 0x26,
- 0x22, 0xE2, 0xE3, 0x23, 0xE1, 0x21, 0x20, 0xE0, 0xA0, 0x60,
- 0x61, 0xA1, 0x63, 0xA3, 0xA2, 0x62, 0x66, 0xA6, 0xA7, 0x67,
- 0xA5, 0x65, 0x64, 0xA4, 0x6C, 0xAC, 0xAD, 0x6D, 0xAF, 0x6F,
- 0x6E, 0xAE, 0xAA, 0x6A, 0x6B, 0xAB, 0x69, 0xA9, 0xA8, 0x68,
- 0x78, 0xB8, 0xB9, 0x79, 0xBB, 0x7B, 0x7A, 0xBA, 0xBE, 0x7E,
- 0x7F, 0xBF, 0x7D, 0xBD, 0xBC, 0x7C, 0xB4, 0x74, 0x75, 0xB5,
- 0x77, 0xB7, 0xB6, 0x76, 0x72, 0xB2, 0xB3, 0x73, 0xB1, 0x71,
- 0x70, 0xB0, 0x50, 0x90, 0x91, 0x51, 0x93, 0x53, 0x52, 0x92,
- 0x96, 0x56, 0x57, 0x97, 0x55, 0x95, 0x94, 0x54, 0x9C, 0x5C,
- 0x5D, 0x9D, 0x5F, 0x9F, 0x9E, 0x5E, 0x5A, 0x9A, 0x9B, 0x5B,
- 0x99, 0x59, 0x58, 0x98, 0x88, 0x48, 0x49, 0x89, 0x4B, 0x8B,
- 0x8A, 0x4A, 0x4E, 0x8E, 0x8F, 0x4F, 0x8D, 0x4D, 0x4C, 0x8C,
- 0x44, 0x84, 0x85, 0x45, 0x87, 0x47, 0x46, 0x86, 0x82, 0x42,
- 0x43, 0x83, 0x41, 0x81, 0x80, 0x40
- } ;
- /***************************CRC校驗碼生成函數(shù) ********************************/
- //函數(shù)功能:生成CRC校驗碼
- //本代碼中使用查表法,以提高運(yùn)算速度
- /****************************************************************************/
- uint16 crc16(uint8 *puchMsg, uint16 usDataLen) //定義了recebuf首地址 和一個 5
- {
- uint8 uchCRCHi = 0xFF ; /* 高CRC字節(jié)初始化 */
- uint8 uchCRCLo = 0xFF ; /* 低CRC 字節(jié)初始化 */
- uint16 uIndex ; /* CRC循環(huán)中的索引 */
- while (usDataLen--) /* 傳輸消息緩沖區(qū) */
- { /* 計算CRC */
- uIndex = uchCRCHi ^ *puchMsg++ ;//CRC 通用算法
- uchCRCHi = uchCRCLo ^ auchCRCHi[uIndex] ; //
- uchCRCLo = auchCRCLo[uIndex] ; //
- }
- return (uchCRCLo << 8 | uchCRCHi) ;
- }
- /*******************************串口發(fā)送函數(shù) ********************************/
- //函數(shù)功能:將數(shù)據(jù)包通過串口發(fā)送至主機(jī)
- //有待修改......
- /****************************************************************************/
- //開始發(fā)送
- void Begin_send(void)
- {
- uint16 i=0;
- ES=0; //關(guān)閉串口中斷
- while(sendCount--)
- {
- SBUF = sendBuf[i++];// 響應(yīng)數(shù)據(jù)包發(fā)送
- while(!TI); //發(fā)送中斷標(biāo)志位
- TI=0;
- }
- ES=1; //打開串口中斷
- }
- /********從機(jī)響應(yīng)主機(jī)問詢函數(shù),function code : 03,讀取多個寄存器值 ********/
- //函數(shù)功能:叢機(jī)根據(jù)串口接收到的數(shù)據(jù)包receBuf[]里面的內(nèi)容,根據(jù)被讀取寄存器
- //的起始地址和讀取的寄存器個數(shù),去讀相應(yīng)的寄存器的值,并將讀取的數(shù)據(jù)以MODBUS
- //響應(yīng)數(shù)據(jù)的標(biāo)準(zhǔn)格式打包,經(jīng)過串口發(fā)送到主機(jī)。數(shù)據(jù)包格式同上。
- /****************************************************************************/
- // 詢問數(shù)據(jù)包格式:
- //receBuf[0] receBuf[1] receBuf[2] receBuf[3] receBuf[4] receBuf[5] receBuf[6] receBuf[7]
- //詢問數(shù)據(jù)格式:receBuf[]={從站地址, 功能碼, 起始地址高位,起始地址低位,寄存器數(shù)高位, 寄存器數(shù)低位, 校驗碼低位, 校驗碼高位}
- // 響應(yīng)數(shù)據(jù)包格式:
- // sendBuf[0] sendBuf[1] sendBuf[[2] sendBuf[3] sendBuf[4] sendBuf[5]... receBuf[6] receBuf[7]
- //響應(yīng)數(shù)據(jù)格式:receBuf[]={從站地址, 功能碼, 字節(jié)計數(shù), 數(shù)據(jù)1, 數(shù)據(jù)2, 數(shù)據(jù)3,... 校驗碼低位, 校驗碼高位}
- void readRegisters(void)
- {
- uint8 addr; //起始地址復(fù)制轉(zhuǎn)換變量
- uint8 tempAddr; //起始地址轉(zhuǎn)換變量
- uint16 crcData; //crc 校驗碼生成變量
- uint8 readCount; //寄存器數(shù)復(fù)制變量
- uint8 byteCount; //數(shù)據(jù)個數(shù)變量
- uint16 i; //循環(huán)變量
- uint16 tempData = 0;
- //addr = (receBuf[2]<<8) + receBuf[3];
- //tempAddr = addr & 0xfff;
- addr = receBuf[3]; //相當(dāng)于復(fù)制發(fā)送來的起始地址低位0
- tempAddr = addr;//tempAddr =起始地址地位 00
- //readCount = (receBuf[4]<<8) + receBuf[5]; //要讀的個數(shù)
- readCount = receBuf[5]; //相當(dāng)于復(fù)制發(fā)送來寄存器數(shù)低位 02
- byteCount = readCount * 2;//byteCount = 寄存器數(shù) X 2 02 每個寄存器內(nèi)容占高,低兩個字節(jié)2
- for(i=0;i<byteCount;i+=2,tempAddr++)
- {
- getRegisterVal(tempAddr,&tempData); //0 0&tempData 等于給出tempData變量的地址 讀取寄存器內(nèi)容函 函數(shù)功能:根據(jù)寄存器地址讀取相應(yīng)寄存器內(nèi)容?
- sendBuf[i+3] = tempData >> 8;
- sendBuf[i+4] = tempData & 0xff;
- }
- sendBuf[0] = localAddr;//單片機(jī)控制板的地址
- sendBuf[1] = 3; //功能碼: 03
- sendBuf[2] = byteCount;//2此次賦值發(fā)送數(shù)據(jù)個數(shù)
- byteCount += 3; //=5加上前面的地址,功能碼,地址 共3+byteCount個字節(jié)
- crcData = crc16(sendBuf,byteCount);
- sendBuf[byteCount] = crcData & 0xff; // CRC代碼低位在前7
- byteCount++;
- sendBuf[byteCount] = crcData >> 8 ; //高位在后8
- sendCount = byteCount + 1; //例如byteCount=49,則sendBuf[]中實際上有49+1個元素待發(fā)
- Begin_send(); //調(diào)用發(fā)送函數(shù)把計算出來的數(shù)據(jù)發(fā)送出去
- }//void readRegisters(void)
- /*************************查詢uart接收的數(shù)據(jù)包內(nèi)容函數(shù) **************************/
- //函數(shù)功能:叢機(jī)根據(jù)串口接收到的數(shù)據(jù)包receBuf[1]里面的內(nèi)容,即function code執(zhí)行
- //相應(yīng)的命令
- /********************************************************************************/
- void checkComm0Modbus(void)//查詢uart接收的數(shù)據(jù)包內(nèi)容函數(shù)
- {
- uint16 crcData; //取CRC校驗碼變量
- uint16 ccc; //ccc判斷CRC校驗碼變量
- //tempData,
- receCount=25; //比較多余
- if(receCount > 4) //接收到的字節(jié)個數(shù)
- {
- switch(receBuf[1])
- {
- case 3: //讀取保持寄存器(一個或多個)
- {led=0;
- gnmbl=7; //功能碼03循環(huán)次數(shù)固定7次,接收函數(shù)中判?
-
-
- if(receCount >= 8) //從詢問數(shù)據(jù)包格式可知,receCount應(yīng)該等于8
- { //接收完成一組數(shù)據(jù)
- //應(yīng)該關(guān)閉接收中斷
-
- if(receBuf[0]==localAddr) //核對地址
- {led2=0;
- crcData = crc16(receBuf,6); //核對校驗碼
- ccc=receBuf[7]<<8 | receBuf[6]; //CRC校驗碼 是兩個16進(jìn)制8位二進(jìn)制數(shù)
- if(crcData == ccc) //如果校驗碼正確 執(zhí)行讀寄存器函數(shù)
- { led3=0;
- if(receBuf[1] == 3)
- readRegisters(); //function code : 03?//讀取保持寄存器(一個或多個)
- }
-
- }
- }
- receCount = 0;
- break;
- }
- case 6:
- {
- gnmbl=7;
- crcData = crc16(receBuf,6); //核對校驗碼
- ccc=receBuf[7]<<8 | receBuf[6];
- if(crcData == ccc) //如果校驗碼正確 執(zhí)行讀寄存器函數(shù)
- {dzbl=receBuf[2]<<8 | receBuf[3];//取寄存器地址
- xrz=receBuf[4]<<8 | receBuf[5];//取寫入值
- modbusRTU06(&dzbl,&xrz);}//取dzbl和xrz 的地址 并被此函數(shù)調(diào)用
- sendBuf[0] = localAddr;
- sendBuf[1] = 0x06;
- sendBuf[2] = receBuf[2];
- sendBuf[3] = receBuf[3];
- sendBuf[4] = receBuf[4];
- sendBuf[5] = receBuf[5];
- sendBuf[6] = receBuf[6];
- sendBuf[7] = receBuf[7];
- sendCount = 8;
- Begin_send();
- receCount = 0;
- break;
- }
-
- default: break;
- }
- }
- }//void checkComm0(void)
- /*******************************讀取寄存器內(nèi)容函數(shù) **************************/
- //函數(shù)功能:根據(jù)寄存器地址讀取相應(yīng)寄存器內(nèi)容
- /****************************************************************************/
- //取寄存器值 返回0表示成功
- uint16 getRegisterVal(uint16 addr,uint16 *tempData)
- {
- uint16 result = 0;
- uint8 qq=0xff;
- uint16 tempAddr;
- tempAddr = addr & 0xfff;
- switch(tempAddr & 0xff)
- {
- case 0x00:{ *tempData = adc; break; }//讀取01開關(guān)A溫度
- 省略
- 省略
- 省略
- case 0x80:{ *tempData = TempRegister; break; }//讀取秒寄存器
- default: break;
- }
- return result;
- }//uint16 getRegisterVal(uint16 addr,uint16 &data)
- /***************************
- 主函數(shù)
- ***************************/
- void main()
- {
- unsigned int TempPhoto,adc_01;
-
- /*進(jìn)入主函數(shù)打開串口中斷,然后初始化一次,發(fā)送一組數(shù)據(jù),然后進(jìn)入空循環(huán)*/
- EA=1;
- Init_USART();
- P3M1 &= 0xFE; P3M0 &= 0xFE; //設(shè)置P3.0為準(zhǔn)雙向口
- P3M1 &= 0xFD; P3M0 |= 0x02; //設(shè)置P3.1為推挽輸出
-
- //ADC_config(); //ADC初始化 如果只調(diào)用一個AD端口可以使用初始化,避免反復(fù)開關(guān)AD寄存器
- delay_ms(10); //初始化后延時
- //PutString("ABCDEFGHRJKLNMOPQRSTUVWXYZ\r\n",sizeof("ABCDEFGHRJKLNMOPQRSTUVWXYZ\r\n"));//測試發(fā)送函數(shù),我的keil沒破解代碼量已超
- while(1)
- {
- TempPhoto=0;
- adc_01=0;
- delay_ms(20);
-
- //ADC_config();
- TempPhoto = Get_ADC12bitResult()*123/2004; //實時讀取P0.6通道的AD轉(zhuǎn)換結(jié)果
- adc=TempPhoto;
- delay_ms(200);
-
- adc_01=adc_p01()*123/2004;
- adc_001=adc_01;
- delay_ms(200);
- //空循環(huán)中如果接收到串口數(shù)據(jù),立馬進(jìn)入串口中斷程序
- //PutString(buf_string);//空格20H,回車0DH
-
-
- }
- }
- /************************
- 中斷函數(shù)
- ************************/
- //串口中斷服務(wù)函數(shù)-----------
- void USART() interrupt 4 //標(biāo)志位TI和RI需要手動復(fù)位,TI和RI置位共用一個中斷入口
- {
- if(ReceiveString()) //進(jìn)入串口中斷首先進(jìn)入串口接收函數(shù)進(jìn)行判斷
- {
- //數(shù)據(jù)包長度正確則執(zhí)行以下代碼
- //Deal_UART_RecData();
-
-
- checkComm0Modbus();}
-
- else
- {
- //數(shù)據(jù)包長度錯誤則執(zhí)行以下代碼
- //LED1=~LED1;
- }
- RI=0; //接收并處理一次數(shù)據(jù)后把接收中斷標(biāo)志清除一下,拒絕響應(yīng)在中斷接收忙的時候發(fā)來的請求
- }
復(fù)制代碼
所有程序51hei提供下載:
stc8 ADC兩路采集modbus0306從機(jī)程序20201224更新.rar
(89.13 KB, 下載次數(shù): 405)
2021-1-22 19:39 上傳
點(diǎn)擊文件名下載附件
|