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