Author: jsuijs
Date: Sat Aug 30 01:48:51 2008
New Revision: 245
Modified:
trunk/tools/test_setup/board_16f648a_js.jal
trunk/tools/test_setup/board_16f877a_dwarf.jal
trunk/tools/test_setup/test_hello_world_lcd.jal
Log:
lcd_init procedure removed
Modified: trunk/tools/test_setup/board_16f648a_js.jal
==============================================================================
--- trunk/tools/test_setup/board_16f648a_js.jal (original)
+++ trunk/tools/test_setup/board_16f648a_js.jal Sat Aug 30 01:48:51 2008
@@ -48,18 +48,17 @@
;var bit pwm_direction = pin_b0_direction
-- LCD setup
-var bit RS is pin_b4 -- LCD command/data select.
-var bit EN is pin_b0 -- LCD data trigger
+var bit RS is pin_b4 -- LCD command/data select.
+var bit lcd_RS_direction is pin_b4_direction
+var bit EN is pin_b0 -- LCD data trigger
+var bit lcd_EN_direction is pin_b0_direction
+
var byte data_port is porta_low -- LCD data port
+var bit lcd_d4_direction is pin_a0_direction
+var bit lcd_d5_direction is pin_a1_direction
+var bit lcd_d6_direction is pin_a2_direction
+var bit lcd_d7_direction is pin_a3_direction
-procedure set_lcd_io () is
- pin_a0_direction = output
- pin_a1_direction = output
- pin_a2_direction = output
- pin_a3_direction = output
- pin_b0_direction = output
- pin_b4_direction = output
-end procedure
-- ----------------------------------------------
-- setup end; include generic test programs below
Modified: trunk/tools/test_setup/board_16f877a_dwarf.jal
==============================================================================
--- trunk/tools/test_setup/board_16f877a_dwarf.jal (original)
+++ trunk/tools/test_setup/board_16f877a_dwarf.jal Sat Aug 30 01:48:51 2008
@@ -29,9 +29,16 @@
;pin_b0_direction = output
-- LCD setup
-var bit RS is pin_b5 -- LCD command/data select.
-var bit EN is pin_b4 -- LCD data trigger
+var bit RS is pin_b5 -- LCD command/data select.
+var bit lcd_RS_direction is pin_b5_direction
+var bit EN is pin_b4 -- LCD data trigger
+var bit lcd_EN_direction is pin_b4_direction
+
var byte data_port is portb_low -- LCD data port
+var bit lcd_d4_direction is pin_b0_direction
+var bit lcd_d5_direction is pin_b1_direction
+var bit lcd_d6_direction is pin_b2_direction
+var bit lcd_d7_direction is pin_b3_direction
procedure set_lcd_io () is
pin_b0_direction = output
Modified: trunk/tools/test_setup/test_hello_world_lcd.jal
==============================================================================
--- trunk/tools/test_setup/test_hello_world_lcd.jal (original)
+++ trunk/tools/test_setup/test_hello_world_lcd.jal Sat Aug 30 01:48:51 2008
@@ -3,8 +3,13 @@
enable_digital_io()
-;delay_1ms(20)
-set_lcd_io()
+lcd_RS_direction = output
+lcd_EN_direction = output
+lcd_d4_direction = output
+lcd_d5_direction = output
+lcd_d6_direction = output
+lcd_d7_direction = output
+
include lcd -- LCD library
include print -- output library
--~--~---------~--~----~------------~-------~--~----~
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
-~----------~----~----~----~------~----~------~--~---
