SHARE
TWEET

Untitled

a guest Sep 14th, 2017 88 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. 10 ON ERROR GOTO 100
  2. 20 CLS
  3. 30 FOR I=0 TO 1439
  4. 40 LOCATE 10,1:PRINT I:B$=DSKI$(0,I)
  5. 50 NEXT
  6. 60 END
  7. 70 RESUME  40
  8. 100 RESUME  40
RAW Paste Data
Top