Kantronics KAM, Instruction Manual

Page: 38 / 55

SAMPLE TERMINAL PROGRAMS
34
Sample Terminal Programs
The following BASIC programs can be used to operate the Kantronics TNCs with the computers
listed.
CAUTION: Each of the programs is a simple example of the necessary statements required to con-
figure the computer for operation with an external device via the RS-232/TTL port. These simple
terminal programs will NOT do file transfer or buffering of data and typing.
BASIC terminal program for the VIC-20/C-64
10 CLOSE2
20 OPEN2,2,3,CHR$(6)
30 GET#2,A$
40 REM
50 GET B$
55 IF B$=CHR$(133) THEN GOTO 100
60 IF B$<>""THEN PRINT#2,B$;
70 GET#2,C$
80 PRINT C$;
90 GOTO 50
100 CLOSE2
110 END
The #1 function key will return the C-64 computer to BASIC. If graphics characters appear, use the
shift key with the Commodore key to change the character set. For use with the VIC-20, change
the TNC COMMAND parameter to $05 (see Commands section of Commands Manual). The a Ctrl-2
typed on the VIC-20 will return the TNC to the Command Mode. (The VIC-20 does not have a Ctrl-
C command.)
This program uses a 3-wire cable as described in the Connecting Your Computer section. Wire only
RXD, TXD and SG.
Basic terminal program for the TRS-80 Model III
1 OUT232,0
2 OUT232,164
3 OUT233,85
4 CLS
10 IF INP(234) AND 128 THEN PRINT CHR$(INP(235));:GOTO 10
20 A$=INKEY$:IF A$="" THEN 10
30 IF INP(234)AND 64 THEN OUT 235,ASC(A$): GOTO 10 ELSE GOTO 30
Put the TRS-80 Model III in BASIC. Type and run the program. When the program is run, the
screen will go blank. At this time turn on the TNC. The TNC will send the
PRESS * FOR AUTOBAUD
routine.
This program uses a 3-wire cable as described in the Connecting Your Computer section. Wire only
RXD, TXD and SG.