HTBasic Help
×
Menu
Index
Search
 
   
   
   
 
  (c) TransEra Corp, 2021

store key Example

10    CLEAR SCREEN
20    STORE KEY "keys2"
30    READ KEY 1,Str$
40    PRINT "Key 1 was ";Str$;" now is QUIT -- Please type CONT"
50    SET KEY 1,"QUIT"
60    PAUSE
70    LOAD KEY "keys2"
80    PRINT "Key 1 returned to normal."
90    PURGE "keys2"
100   END