' ============================= TV-IRinput.bas ========
' This program runs on a PICAXE-08M2 processor at 4 MHz.
' It waits for key-press from a SIRC TV remote control.
' When it's been received, it sends it to the Terminal.
' Note: "infra" is a built-in variable assigned to b13.
' ======================================================
' === Directives ===
#com 8 ' specify com port
#picaxe 08M2 ' specify PICAXE processor
#terminal 4800 ' specify terminal baud rate
' =========================== Begin Main Program =======

hi2csetup i2cmaster,18,i2cslow,i2cbyte
do
low 4
irin C.3, infra
hi2cout 0, (infra)
sertxd (#infra,CR,LF) ' send ASCII digits to Terminal
high 4
pause 250
loop