CRBasic Example 7: CS240DM RS-485 modbus program
SerialOpen
(ComC1,19200,2,0,50,4)
Scan
(1,Sec,0,0)
PanelTemp
(PTemp,15000)
Battery
(batt_volt)
ModbusMaster
(ResultCode(1),ComC1,19200,111,4,CS240DM(1),1,5,3,100,2)
ModbusMaster
(ResultCode(2),ComC1,19200,2,4,CS240DM(6),1,5,3,100,2)
ModbusMaster
(ResultCode(3),ComC1,19200,3,4,CS240DM(11),1,5,3,100,2)
ModbusMaster
(ResultCode(4),ComC1,19200,4,4,CS240DM(16),1,5,3,100,2)
AveTemp(1) = CS240DM(2)
AveTemp(2) = CS240DM(7)
AveTemp(3) = CS240DM(12)
AveTemp(4) = CS240DM(17)
AvgTemp = (AveTemp(1) + AveTemp(2) + AveTemp(3) + AveTemp(4))/4
StdDevSpa
(SD_Temp,4,AveTemp())
CallTable
Hourly
NextScan
EndProg
CS240 and CS240DM PT-1000 Class A, Back-of-Module Temperature
Sensors 32