'Dios IR Demo 2
func main()
   low 4
   output 4

   dim cmd


loop:
   cmd = IRread(3,9000)
   if cmd = 0 then
      low 4 
      goto loop
   endif
   high 4
   print cmd," ",IRdevice
   goto loop

endfunc

include lib\DiosIR.lib