一段可读性非常好的MODBUS程序.doc

可读性非常好的MODBUS源代码（1）为了加快发送采用了：数据空中断 （2）为了保证最后一个字节能够发送到上位机采用了：发送完成中断#include #include #define _USART1_H #include DMS2000.h 在USART的发送端有2个寄存器，一个是程序可以看到的USART_DR寄存器(下图中阴影部分的TDR)，另一个是程序看不到的移位寄存器(下图中阴影部分Transmit Shift Register)。对应USART数据发送有两个标志，一个是TXE=发送数据寄存器空，另一个是TC=发送结束；对照下图，当TDR中的数据传送到移位寄存器后，TXE被设置，此时移位寄存器开始向TX信号线按位传输数据，但因为TDR已经变空，程序可以把下一个要发送的字节(操作USART_DR)写入TDR中，而不必等到移位寄存器中所有位发送结束，所有位发送结束时(送出停止位后)硬件会设置TC标志。另一方面，在刚刚初始化好USART还没有发送任何数据时，也会有TXE标志，因为这时发送数据寄存器是空的。TXEIE和TCIE的意义很简单，TXEIE允许在TXE标志为1时产生中断，而TCIE允许在TC标志为1时产生中断。至于什么时候使用哪个标志，需要根据你的需要自己决定。但我认为TXE允许程序有更充裕的时间填写TDR寄存器，保证发送的数据流不间断。TC可以让程序知道发送结束的确切时间，有利于程序控制外部数据流的时序。/* CRC 高位字节值表*/const UCHAR 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 低位字节值表*/const UCHAR 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 ; BOOL volatile USART1_send_mark = FALSE; UCHAR volatile USART1_sendPosi = 0; SHORT volatile USART1_receCount = 0; UCHAR volatile USART1_receTimeOut = 0; UCHAR volatile USART1_checkoutError = 0; UCHAR volatile USART1_sendCount = 0; UCHAR USART1_ch_type = 0; UCHAR USART1_set_number = 0; UCHAR USART1_send_bufferMSCOMM_BUFFER_LENGTH; UCHAR USART1_mscomm_bufferMSCOMM_BUFFER_LENGTH; USHORT CRC16(UCHAR *puchMsg, USHORT usDataLen) /CRC 简单函数/unsigned char *puchMsg ; /* 要进行CRC 校验的消息*/unsigned short usDataLen ; /* 消息中字节数*/ UCHAR uchCRCHi = 0xFF; /高CRC 字节初始化，初始化为255UCHAR uchCRCLo = 0xFF; /低CRC 字节初始化ULONG uIndex; /CRC 循环中的索引while (usDataLen-) /传输消息缓冲区/待传输数据长度，对数据进行全方位的校验 uIndex = uchCRCHi *puchMsg+; /计算CRCuchCRCHi = uchCRCLo auchCRCHiuIndex; uchCRCLo = auchCRCLouIndex; return (uchCRCHi 0x01; UCHAR me_Baud = (UCHAR)(MSCOMM_baud & 0x38) 0x03; UCSR1B = 0x00; UCSR1A = 0x00; UCSR1C = (1 UCSZ10) | (1 UCSZ11); switch (me_STOP) case 0: UCSR1C |= (0 USBS1); break; case 1: UCSR1C |= (1 USBS1); break; switch (me_UPM) case 0: case 1: UCSR1C |= (0 UPM11) | ( 0 UPM10); break; case 2: UCSR1C |= (1 UPM11) | ( 0 UPM10); break; case 3: UCSR1C |= (1 UPM11) | ( 1 UPM10); break; switch (me_Baud) case 0: UBRR1L = 0x3F; UBRR1H = 0x02; break; case 1: UBRR1L = 0x1F; UBRR1H = 0x01; break; case 2: UBRR1L = 0x8F; UBRR1H = 0x00; break; case 3: UBRR1L = 0x47; UBRR1H = 0x00; break; case 4: UBRR1L = 0x23; UBRR1H = 0x00; break; case 5: UBRR1L = 0x11; UBRR1H = 0x00; break; case 6: UBRR1L = 0x0B; UBRR1H = 0x00; break; default: UBRR1L = 0x05; UBRR1H = 0x00; break; UCSR1B = (1 RXEN1) | (1 RXCIE1) | (1 = 1 & registerAmount = 0 & startAddr = 4) if (startAddr + registerAmount - 1) = 1 & registerAmount = 0 & startAddr = 7) if (startAddr + registerAmount - 1) = 1 & registerAmount = 0 & startAddr = 7) if (startAddr + registerAmount - 1) = 1 & registerAmount = 0 & startAddr BUFFER_LENGTH) if (startAddr + registerAmount - 1) 0) USART1_receTimeOut-; if (USART1_receTimeOut = 0 & USART1_receCount 0) USART1_receCount = 0; USART1_checkoutError = 0; if (!USART1_send_mark) RS485_RECIVE(); void USART1_Begin_Send(void) RS485_SEND(); NOP(); / -| NOP(); / | NOP(); / |-等待总线释放 NOP(); / | NOP(); / -| NOP(); / -| NOP(); / | NOP(); / |-等待总线释放 NOP(); / | NOP(); / -| USART1_send_mark = TRUE; USART1_sendPosi = 0; UCSR1B |= BIT(5); void USART1_MODBUS_Error(UCHAR error_code) USHORT crcData; USART1_send_buffer0 = USART1_mscomm_buffer0; USART1_send_buffer1 = USART1_mscomm_buffer1 | 0x80; USART1_send_buffer2 = error_code; crcData = CRC16(USART1_send_buffer,3); USART1_send_buffer3 = crcData 8; USART1_send_buffer4 = crcData & 0xff; USART1_sendCount = 5; USART1_Begin_Send(); void USART1_ReadCoilRegisters(void) UCHAR i,k; UCHAR byteCount; SHORT registerAmount; SHORT startAddr; SHORT tempAddr; SHORT tempData; USHORT crcData; startAddr = (SHORT)(USART1_mscomm_buffer2 8) + (SHORT)USART1_mscomm_buffer3; registerAmount = (SHORT)(USART1_mscomm_buffer4 0x03; if (registerAmount & 0x07) byteCount+; for (k = 0 ; k byteCount ; k+) USART1_send_bufferk + 3 = 0; for (i = 0 ; i 8 ; i+) USART1_GetCoilVal(&tempData,tempAddr+); USART1_send_bufferk + 3 |= (tempData = startAddr + registerAmount) break; USART1_send_buffer0 = USART1_mscomm_buffer0; USART1_send_buffer1 = USART1_mscomm_buffer1; USART1_send_buffer2 = byteCount; byteCount += 3; crcData = CRC16(USART1_send_buffer,byteCount); USART1_send_bufferbyteCount = crcData 8; byteCount+; USART1_send_bufferbyteCount = crcData & 0xff; USART1_sendCount = byteCount + 1; USART1_Begin_Send(); else USART1_MODBUS_Error(2); void USART1_ReadDiscreteRegisters(void) UCHAR i,k; UCHAR byteCount; SHORT registerAmount; SHORT startAddr; SHORT tempAddr; SHORT tempData; USHORT crcData; startAddr = (SHORT)(USART1_mscomm_buffer2 8) + (SHORT)USART1_mscomm_buffer3; registerAmount = (SHORT)(USART1_mscomm_buffer4 0x03; if (registerAmount & 0x07) byteCount+; for (k = 0 ; k byteCount ; k+) USART1_send_bufferk + 3 = 0; for (i = 0 ; i 8 ; i+) USART1_GetDiscreteVal(&tempData,tempAddr+); USART1_send_bufferk + 3 |= (tempData = startAddr + registerAmount) break; USART1_send_buffer0 = USART1_mscomm_buffer0; USART1_send_buffer1 = USART1_mscomm_buffer1; USART1_send_buffer2 = byteCount; byteCount += 3; crcData = CRC16(USART1_send_buffer,byteCount); USART1_send_bufferbyteCount = crcData 8; byteCount+; USART1_send_bufferbyteCount = crcData & 0xff; USART1_sendCount = byteCount + 1; USART1_Begin_Send(); else USART1_MODBUS_Error(2); void USART1_ReadHoldingRegisters(void) UCHAR i; SHORT startAddr; SHORT registerAmount; SHORT byteCount; SHORT tempData; USHORT crcData; startAddr = (SHORT)(USART1_mscomm_buffer28) + (SHORT)USART1_mscomm_buffer3; registerAmount = (SHORT)(USART1_mscomm_buffer48) + (SHORT)USART1_mscomm_buffer5; if (USART1_HoldingRegisterAddr(startAddr,registerAmount,&USART1_set_number) byteCount = registerAmount 0x01; for (i = 0 ; i 8; USART1_send_buffer2*i+4 = tempData & 0xff; USART1_send_buffer0 = USART1_mscomm_buffer0; USART1_send_buffer1 = USART1_mscomm_buffer1; USART1_send_buffer2 = byteCount; byteCount += 3; crcData = CRC16(USART1_send_buffer,byteCount); USART1_send_bufferbyteCount = crcData 8; byteCount+; USART1_send_bufferbyteCount = crcData & 0xff; USART1_sendCount = byteCount + 1; USART1_Begin_Send(); else USART1_MODBUS_Error(2); void USART1_ReadInputRegisters(void) UCHAR i; SHORT startAddr; SHORT tempAddr; SHORT registerAmount; SHORT byteCount; SHORT tempData; USHORT crcData; startAddr = (SHORT)(USART1_mscomm_buffer28) + (SHORT)USART1_mscomm_buffer3; registerAmount = (SHORT)(USART1_mscomm_buffer48) + (SHORT)USART1_mscomm_buffer5; if (USART1_InputRegisterAddr(startAddr,registerAmount) tempAddr = startAddr; byteCount = registerAmount 0x01; for (i = 0 ; i 8; USART1_send_buffer2*i+4 = tempData & 0xff; USART1_send_buffer0 = USART1_mscomm_buffer0; USART1_send_buffer1 = USART1_mscomm_buffer1; USART1_send_buffer2 = byteCount; byteCount += 3; crcData = CRC16(USART1_send_buffer,byteCount); USART1_send_bufferbyteCount = crcData 8; byteCount+; USART1_send_bufferbyteCount = crcData & 0xff; USART1_sendCount = byteCount + 1; USART1_Begin_Send(); else USART1_MODBUS_Error(2); void USART1_ForceSingleCoil(void) UCHAR i; SHORT OnOff; SHORT startAddr; startAddr = (SHORT)(USART1_mscomm_buffer2 8) + (SHORT)USART1_mscomm_buffer3; if (USART1_CoilRegistersAddr(startAddr,1) OnOff = (SHORT)(USART1_mscomm_buffer4 8) + (SHORT)USART1_mscomm_buffer5; switch (OnOff) case 0x00: USART1_SetCoilVal(0,startAddr); break; case 0xFF: USART1_SetCoilVal(1,startAddr); break; if (USART1_mscomm_buffer0 = module_addr) for (i = 0 ; i 8 ; i+) USART1_send_bufferi = USART1_mscomm_bufferi; USART1_sendCount = 8; USART1_Begin_Send(); else if (USART1_mscomm_buffer0 = module_addr) USART1_MODBUS_Error(2); void USART1_PresetSingleHoldingRegister(void) UCHAR i; SHORT startAddr; SHORT tempData; startAddr = (SHORT)(USART1_mscomm_buffer28) + (SHORT)USART1_mscomm_buffer3; tempData = (SHORT)(USART1_mscomm_buffer48) + (SHORT)USART1_mscomm_buffer5; if (USART1_HoldingRegisterAddr(startAddr,1,&USART1_set_number) if (USART1_mscomm_buffer0 = module_addr) for (i = 0 ; i 8 ; i+) USART1_send_bufferi = USART1_mscomm_bufferi; USART1_sendCount = 8; USART1_Begin_Send(); if (USART1_SetHoldingRegisterVal(tempData,startAddr) QUEUE_In_CRC16(); EEPROM_START(); else if (USART1_mscomm_buffer0 = module_addr) USART1_MODBUS_Error(2); void USART1_ForceMultipleCoil(void) UCHAR i,k; UCHAR byteCount; SHORT registerAmount; SHORT startAddr; SHORT tempAddr; SHORT OnOff; USHORT crcData; startAddr = (SHORT)(USART1_mscomm_buffer28) + (SHORT)USART1_mscomm_buffer3; registerAmount = (SHORT)(USART1_mscomm_buffer4 8) + (SHORT)USART1_mscomm_buffer5; if (USART1_CoilRegistersAddr(startAddr,registerAmount) tempAddr = startAddr; byteCount = (SHORT)USART1_mscomm_buffer6; if (USART1_mscomm_buffer0 = module_addr) for (i = 0 ; i 8; USART1_send_buffer7 = crcData & 0xff; USART1_sendCount = 8; USART1_Begin_Send(); for (k = 0 ; k byteCount ; k+) for (i = 0 ; i i; if (OnOff & 0x01) USART1_SetCoilVal(1,tempAddr+); else USART1_SetCoilVal(0,tempAddr+); if (tempAddr = startAddr + registerAmount) break; else if (USART1_mscomm_buffer0 = module_addr) USART1_MODBUS_Error(2); void USART1_PresetMultipleHoldingRegisters(void) UCHAR i; SHORT registerAmount; SHORT startAddr; SHORT tempData; USHORT crcData; BOOL Enable = FALSE; startAddr = (SHORT)(USART1_mscomm_buffer28) + (SHORT)USART1_mscomm_buffer3; registerAmount = (SHORT)(USART1_mscomm_buffer48) + (SHORT)USART1_mscomm_buffer5; if (USART1_HoldingRegisterAddr(startAddr,registerAmount,&USART1_set_number) if (USART1_mscomm_buffer0 = module_addr) for (i = 0 ; i 8; USART1_send_buffer7 = crcData & 0xff; USART1_sendCoun