Author: robhamerling
Date: Mon Mar 30 08:11:24 2009
New Revision: 896
Modified:
trunk/sample/16f88_serial_hw_int_cts_echo.jal
Log:
Bug fix: call to serial_hw_init() was missing
Modified: trunk/sample/16f88_serial_hw_int_cts_echo.jal
==============================================================================
--- trunk/sample/16f88_serial_hw_int_cts_echo.jal (original)
+++ trunk/sample/16f88_serial_hw_int_cts_echo.jal Mon Mar 30 08:11:24 2009
@@ -5,7 +5,7 @@
--
-- Adapted-by:
--
--- Compiler: =2.4h
+-- Compiler: =2.4j
--
-- This file is part of jallib (http://jallib.googlecode.com)
-- Released under the BSD license
(http://www.opensource.org/licenses/bsd-license.php)
@@ -58,20 +58,23 @@
var bit serial_overflow_discard = FALSE -- do not discard output!
-var bit serial_ctsinv is pin_B4 -- incoming flow ctl
-var bit serial_ctsinv_direction is pin_B4_direction
+var bit serial_ctsinv is pin_B4 -- inward flow ctl
+
+pin_B4_direction = output
include serial_hw_int_cts -- RS232 library
+serial_hw_init()
+
-- ------- ----------------------------------------------------------------
var byte x
forever loop
- if (serial_hw_read(x) == true) then -- byte available
- for SERIAL_XMTBUFSIZE + 10 loop -- more than xmt buffer!
- x = serial_send_byte(x) -- echo many 'x'
+ if (serial_hw_read(x) == true) then -- byte available
+ for SERIAL_XMTBUFSIZE + 10 loop -- more than fits in xmt
buffer!
+ x = serial_send_byte(x) -- echo every char many times
end loop
end if
--~--~---------~--~----~------------~-------~--~----~
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
-~----------~----~----~----~------~----~------~--~---
