User`s manual

Chapter 8 265
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.
Example 8-9 Example
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 WHILE 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