Hello
I need help
I need to send temperature data to the PC
And receive PC data to drive 2 relays
More when I send the data the program crashes
I'm using timerout
When I send data to relay to it hangs
Thank you
Code:LOOP_PRINCIPAL: Serin2 RX_IN,84,1000,TIMEOUT,[WAIT("CMD"),RX] SELECT CASE RX CASE "A" HIGH RELE1 CASE "B" LOW RELE1 CASE "C" HIGH rele2 CASE "D" LOW rele2 END SELECT PAUSE 300 GOTO LOOP_PRINCIPAL TIMEOUT: 'DS18B20 'OWOUT DQ,1,[$CC, $44] 'Start temperature conversion 'pause 1000 'OWOUT DQ,1,[$CC, $BE] 'Read the temperature 'OWIN DQ,0,[temperature.LOWBYTE,temperature.HIGHBYTE] 'temperature = temperature*/1600 'Serout2 XT_OUT,84,[DEC2 (temperature/100),".",DEC2 temperature,13,10] 'GOTO LOOP_PRINCIPAL '----------------------------------




Bookmarks