' *** SeroutToLCDdemoSimple.bas *********************** 2011.10.01 ***

' This program sends variable length serial data to the LCD to
' demonstrate the advantages of the upgraded 14M2 driver software.

' Also, the receiving program allows 41 chars max, which is more
' than enough for a 16X2 LCD. If you use a larger display you can
' modify the LCD driver software to accept longer strings.

' *** Constants ****
  symbol txPin = B.4              ' serial output pin to LCD
	
' *** Directives ***
  #com 6
  #picaxe 14M2
  #no_data
  #terminal off

' *** Begin Main Program *********************************************
  setfreq m8
  wait 6                          ' give LCD time to display "ready"
  
do
' This one command fills both lines of the display
  serout txPin,N9600_8,(128,"Three jolly pigs",192,"are so annoying!")
  wait 4                          ' allow time to read display

' This command updates part of line 1, and part of line 2.
  serout txPin,N9600_8,(128,"Seven",196,"even worse!!")
  wait 4                          ' allow time to read display
loop