Advertisement
Guest User

Untitled

a guest
Sep 14th, 2017
235
0
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
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement