DEFINE OSC 4
myvar   var     byte
inbyte  var     byte

main:

serin2 portc.7, 16468, [inbyte]
    if inbyte = 65 then
        serout2 portc.6, 16468, ["you got me", 13, 10]
    else    
        serout2 portc.6, 16468, ["guess again", 13, 10]
    endif


goto main