LCD117 help sending Variables

xtech007

Senior Member
Trying to find good use of this LCD by Mr.Phanderson decided to tackle a bit more then just Msgs at key press.

Will be using a 28x1 to interact with this LCD, what I would like to do is display variables that are constantly changing.
This is what is done so Far:

; ****************************
; ** 28X1 & LCD#117-9600_8 **
; ** 2X16 **
; ** **
; ****************************

init:

setfreq m8 ' Set freq to 8MHz
High 5 ' Be sure Tx Pin is idle for some time
Pause 1000 ' wait for PICAXE LCD to boot
serout 5,T9600_8,("?G216") ' Set LCD Geometry
serout 5,T9600_8,("?f") ' clear the LCD and home the cursor
serout 5,T9600_8,(" Testing LCD?n")' Msg displayed on LCD
pause 5000
serout 5,T9600_8,("?f")

symbol X=b1
symbol Y=b2

main:

for b4 = 1 to 20
read b4,X
serout 5,T9600_8,("X="#X "Y"=#Y?n) '<<--- Need help here, How to display the Variable?
serout 5,T9600_8,("X2=#b0 Y2=#b1?n")
next b4

pause 200

goto main
 

inglewoodpete

Senior Member
Here are couple of lines from one of my programs which uses one of Peter Anderson's 117 serial driver chips, using a 20X2 running at 8MHz:

Code:
[color=Blue]SerOut [/color][color=Black]outLCD, [/color][color=Blue]T2400_8[/color][color=Black],[/color][color=Blue]([/color][color=Red]"?y1?x00"[/color][color=Blue])                 [/color][color=Green]'LCD: Point to start of second line 
[/color][color=Blue]SerOut [/color][color=Black]outLCD, [/color][color=Blue]T2400_8[/color][color=Black],[/color][color=Blue]([/color][color=Red]"Cleared: "[/color][color=Black], #EEPROMPtr[/color][color=Blue])   [/color][color=Green]'LCD: Write a numeric value[/color]
 

xtech007

Senior Member
Great News!!!
after a bit of trial and errors, finally got some results.
lots of reading, mixing and matching couple post to have a working code!
Here the video:
http://youtu.be/DssSN3no9rg

code:
Code:
; ****************************
; **  28X1 & LCD#117-9600_8 
; **         2X16           

	
init:
	setfreq m8						' Set freq to 8MHz
	High 5						' Be sure Tx Pin is idle for some time
	Pause 1000				      	
	serout 5,T9600_8,("?G216")	      	' Set LCD Geometry
	serout 5,T9600_8,("?f")				' clear the LCD and home the cursor	 
	serout 5,T9600_8,("  Testing LCD?n") 	' Msg displayed on LCD
	pause 5000
	serout 5,T9600_8,("?f")

main:
	readadc 3,b1   'Read potentiometer to X axis
	readadc 2,b2   'Read potentiometer to Y axis
	pause 50			
	'serout 5,T9600_8,("?y0?x00","X:",#b3,"--XSIM--","?y0?x11","Y:",#b4)  '<<<<---- will Be used later
	serout 5,T9600_8,("?y1?x00","X:",#b1,"--MO--","?y1?x11","Y:",#b2)     '<<<<---- this works!!
	goto main
Comments are welcomed, or any Ideas for improvements
 
Last edited:
Top