I've made a few changes to your code. I haven't checked for correctness, but, you get the idea
Code:id var byte[8] for i = 0 to 8 ' read from eeprom address for the channel to ID for h=0 to 7 read i*8+h, id+h next OWOUT DQ, 1,[$55,id+0,id+1,id+2,id+3,id+4,id+5,id+6,id+7,$BE] OWIN DQ, 2, [Temps.LOWBYTE(i),Temps.LOWBYTE(i+1)] TEMPnows[i] = Temps[i] + ofst30 if Temps[i] = 65535 then Temps[i] = 0 tempnows[i] = 480 else hserout ["TEMP",dec i," Raw:= ",dec4 TEMPs[i],13] endif i=i+1 next
Bookmarks