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

readio Example

10  ! LOAD BIN "SERIAL32"
20    LIST BIN
30    WAIT 1
40    CLEAR SCREEN
50    ON ERROR GOTO Recover
60    FOR I=0 TO 6
70      PRINT READIO(9,I);I
80      DISP I
90 Recover: DISP I
100   NEXT I
110   OFF ERROR
120   WRITEIO 9,1;2400
130   PRINT READIO(9,1)
140   END