Revision: 1620
Author: jsuijs
Date: Sun Jan 24 12:06:20 2010
Log: Debug function added
http://code.google.com/p/jallib/source/detail?r=1620
Modified:
/trunk/include/external/lcd/lcd_hd44780_4.jal
=======================================
--- /trunk/include/external/lcd/lcd_hd44780_4.jal Sat Apr 4 02:40:31 2009
+++ /trunk/include/external/lcd/lcd_hd44780_4.jal Sun Jan 24 12:06:20 2010
@@ -151,3 +151,43 @@
_hd44780_init()
end procedure
+
+
+--
----------------------------------------------------------------------------
+-- Pulse interface lines in sequence d0 .. d3, en, rs. Use an
+-- oscilloscope (speed = 1) or leds (speed = 200) to check signal.
+-- Note: procedure contains 'forever loop', so never returns.
+--
----------------------------------------------------------------------------
+procedure lcd_debug_hardware_interface(byte in speed) is
+ forever loop
+
+ lcd_dataport = 0
+ lcd_en = false
+ lcd_rs = false
+
+ lcd_dataport = 1
+ delay_1ms(speed)
+
+ lcd_dataport = 2
+ delay_1ms(speed)
+
+ lcd_dataport = 4
+ delay_1ms(speed)
+
+ lcd_dataport = 8
+ delay_1ms(speed)
+
+ lcd_dataport = 0
+ lcd_en = true
+ delay_1ms(speed)
+
+ lcd_en = false
+ lcd_rs = true
+ delay_1ms(speed)
+
+ lcd_dataport = 0
+ lcd_en = false
+ lcd_rs = false
+
+ end loop
+end procedure
--
You received this message because you are subscribed to the Google Groups
"jallib" group.
To post to this group, send email to [email protected].
To unsubscribe from this group, send email to
[email protected].
For more options, visit this group at
http://groups.google.com/group/jallib?hl=en.
