home *** CD-ROM | disk | FTP | other *** search
/ No Fragments Archive 10: Diskmags / nf_archive_10.iso / MAGS / MUCH / MSG01.MSA / SOURCE_STARS.BAS (.txt) < prev    next >
Encoding:
Atari STOS Basic  |  1993-05-31  |  960 b   |  25 lines
  1. 1 GOSUB
  2. 10 VARNAME
  3. 11 NEXT
  4. 12 LOGIC
  5. 13 CLS
  6. 14 FOR
  7. 15 PLOT
  8. 16 VARNAME
  9. 17 VARNAME
  10. 18 NEXT
  11. 19 SCREEN SWAP
  12. 2 DIM
  13. 20 GOTO
  14. 3 REM THIS BIT SETS UP THE ARRAY
  15. 4 FOR
  16. 49998 REM ~~~ CLEAR SCREEN ~~~
  17. 49999 UNKNOWN OP: 0x3A
  18. 5 VARNAME
  19. 50000 MODE
  20. 50009 RETURN
  21. 6 NEXT
  22. 7 DIM
  23. 8 REM THIS BIT SETS UP IN WHICH POSITION IN THE ARRAY EACH STAR RESIDES
  24. 9 FOR
  25.