I want to make something like this,when I receiv data from RS232 immediatelu send back to the sender,i write code but It can't compile it.Why?
define OSC 8
INCLUDE "Modedefs.bas"
TRISA = %00000100
TRISB = %00000000
DEFINE LCD_DREG PORTB
DEFINE LCD_DBIT 0
DEFINE LCD_RSREG PORTB
DEFINE LCD_RSBIT 4
DEFINE LCD_EREG PORTB
DEFINE LCD_EBIT 5
DEFINE LCD_BITS 4
DEFINE LCD_LINES 2

Primi var BYTE
Prati var Byte
Isprati var BYTE

Main:
PORTA = $00
SERIN PORTA.3,N2400,Primi
pause 3000
IF Primi <> 0 Then Prati
ENDIF
Goto Main


Prati:
Primi = Isprati
Serout PORTA.2,N2400,Isprati
Goto Main


END