04 ' APPLIED TECHNICAL SYSTEMS ; SAMPLE PROGRAM FOR RS232 DISPLAYS
06 ' AEADD2.BAS - THIS PROGRAM DISPLAYS THE ADDRESS OF ALL AE DISPLAYS CONNECTED TO
08 ' THE SERIAL DEVICE.
10 OPEN "COM2:2400,N,8,1" FOR RANDOM AS 1
20 FOR A = 0 TO 15
30 PRINT #1, CHR$(0); CHR$(0); CHR$(17); CHR$(A); CHR$(0); "AD"; LEFT$(STR$(A), 4); CHR$(0)
35 PRINT MID$(STR$(A), 1, 4),
100 NEXT A
101 FOR B = 1 TO 1000
102 NEXT B
110 CLOSE 1
115 SYSTEM
120 END