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

BIT Example

10    INTEGER X
20    X=12
30    PRINT "The bits for ";X;":"
40    See(X)
50    END
60    SUB See(INTEGER X)
70      FOR Loop=15 TO 0 STEP -1
80        Temp=BIT(X,Loop)
90        PRINT Temp;
100     NEXT Loop
110   SUBEND