10 REM THIS PROGRAM DEMONSTRATES HOW TO SEND A SIMPLE
20 REM MESSAGE TO THE GRANDWELL INDUSTRIES SLC16H-IR DISPLAY.
30 REM REFER TO THE "SERIAL COMMUNICATION PROTOCOL FOR THE
40 REM SLC16H-IR DISPLAY" DOCUMENT AVAILABLE FROM GRANDWELL.
50 REM NOTE: THE COMMUNICATION PROTOCOL DOCUMENT CONTAINS
60 REM ERRORS AND OMISSIONS. THIS PROGRAM WAS WRITTEN WITH
70 REM THE HELP OF A SERIAL PORT MONITOR TO OBSERVE THE
80 REM COMMANDS SENT FROM THE MESSAGING PROGRAM AVAILABLE
90 REM FROM GRANDWELL CALLED EDITOR.EXE
100 OPEN "COM1:2400,N,8,1,CS,DS,CD" AS 1
200 PRINT #1,CHR$(0);:REM DATA FOR SIGN ADDRESS FILE
210 PRINT #1,CHR$(255)+CHR$(255);:REM ADDRESS ALL SIGNS
220 PRINT #1,CHR$(1);:REM CLEAR ALL EXISTING MESSAGES
230 PRINT #1,CHR$(&H0B);:REM DATA FOR SIGNS LIST FILE
240 PRINT #1,CHR$(0);:REM SIGNS LIST ADDRESS (0 FOR ALL)
250 PRINT #1,CHR$(255);:REM END OF FILE
300 PRINT #1,CHR$(1);:REM DATA FOR MESSAGE FILE
310 PRINT #1,"01";:REM FILE 01 (00 TO 99)
320 PRINT #1,CHR$(&H02);:REM DISPLAY MODE
330 PRINT #1,CHR$(&HEF);:REM NEXT BYTE IS A PROPERTY
340 PRINT #1,CHR$(&HB1);:REM COLOR (B0-BF)
350 PRINT #1,"Hello World";:REM TEXT
370 PRINT #1,CHR$(255);:REM END OF FRAME
380 PRINT #1,CHR$(255);:REM END OF FILE
400 PRINT #1,CHR$(0);:REM END CODE
410 CLOSE #1