' Serial LCD
		Remarks on
		Device 16F84					' We are using a PIC16F84
		Declare XTAL 4					' And a 4MHz crystal
        Declare RSIN_PIN	PortA.0		' Serial in at PORTA bit-0
        Declare SERIAL_BAUD	9600		' 9600 Baud
        Declare RSOUT_MODE	Inverted    ' Inverted    

		Dim Byte_In	as Byte            
' ** THE MAIN PROGRAM LOOP STARTS HERE **
Again:	Byte_In = Rsin					' Read the serial data
        Print Byte_In					' Display the serial data		
		Goto Again						' Do it forever