HTBasic Help
×
Menu
Index

key labels pen Example

10    CLEAR SCREEN
20    PRINT "Watch Softkey 1"
30    Blue=6                                  !  sets blue
40    White=1                                 !  sets white
50    FOR I=1 TO 100
60      IF I=20 OR I=60 THEN
70        KEY LABELS PEN Blue                 !  sets pen color to blue
80        SET KEY 1,"BLUE"                    !  sets softkey text to "Blue"
90        PRINT "Key Labels are Blue"
100     END IF
110     IF I=40 OR I=80 THEN
120       KEY LABELS PEN White                !  sets pen color to white
130       SET KEY 1,"WHITE"                   !  sets softkey text to "White"
140       PRINT "Key Labels are White"
150     END IF
160     WAIT .025
170   NEXT I
180   SET KEY 1,"EDIT"
190   END