this serin doesnt work.I use max232 and get the characters on hyperterminal but cant on led.
please help.
T2400 con 0
serindata var byte
SerOut PORTB.0 , T2400 , ["1-PORTA.0 Yuksek Yap ",13,10]
SerOut PORTB.0 , T2400 , ["2-PORTA.0 Dusuk Yap",13,10]
SerOut PORTB.0 , T2400 , ["3-Program Sonu",13,10]
loop:
SerIn PORTB.1 , T2400 , [serindata]
select case serindata
case "1"
high PORTA.0
case "2"
low PORTA.0
case "3"
serout PORTB.0 , T2400 , ["Program sonlandi.",13,10]
end
end select
GoTo loop
Remove the END there, that might help.