422
Chapter 7, IBASIC Controller
Serial I/O from IBASIC Programs
Example IBASIC Program Using Serial Port 10
The following program illustrates I/O to both serial ports. The program sends a
prompt message to a terminal connected to Serial Port 9 and waits for a response
from the user at the terminal. When the response is received from the terminal
connected to Serial Port 9, a series of ASCII characters are sent out Serial Port 10.
10 !....ASCII CHARACTER CYCLER...........
30 !....be connected to a terminal at 9600 baud.
40 !....Outputs ASCII characters on Serial Port 10 beginning with
ASCII
50 !......character 32 (space) and ending with ASCII character 126
(~).
60 !......Characters are output with no CR/LF
70 OUTPUT 9;"When you are ready to send data on port10,press ENTER"
80 OUTPUT 800;"CONF:SPOR:SIN 'IBASIC';BAUD ‘9600'"
90 !Allows IBASIC to read port 9
100 DIM A$[10]
110 ENTER 9;A$ !Program waits here until CR/LF is received.
120 !........
130 I=32
140 HILE I<=126
150 OUTPUT 10 USING "K,#";CHR$(I)
160 !Outputs characters all on one line.
170 OUTPUT 10 USING "K,#";CHR$(I)
180 !Outputs characters all on one line.
190 END WHILE
200 OUTPUT 800;"CONF:SPOR:SIN 'Inst'" !Sets port 9 to IBASIC entry
field.
180 EXECUTE ("CURSOR HOME") !Places cursor at left of IBASIC entry
field
190 END
To Next Page
Loading...
