home *** CD-ROM | disk | FTP | other *** search
/ No Fragments Archive 10: Diskmags / nf_archive_10.iso / MAGS / ST_USER / 1990 / USERJL90.MSA / LISTINGS.ARC / STOS3.BAS (.txt) < prev    next >
Atari STOS Basic  |  1990-05-16  |  3KB  |  27 lines
  1. 25000 REM program 3
  2. 25010 MODE
  3. 25020 CURS
  4. 25030 GOSUB
  5. 25040 DIM
  6. 25050 FOR
  7. 25060 VARNAME
  8. 25070 NEXT
  9. 25080 FOR
  10. 25090 VARNAME
  11. 25100 NEXT
  12. 25110 FOR
  13. 25120 VARNAME
  14. 25130 NEXT
  15. 25140 FOR
  16. 25150 VARNAME
  17. 25160 NEXT
  18. 25170 FOR
  19. 25180 SPRITE
  20. 25190 IF
  21. 25200 IF
  22. 25210 UPDATE
  23. 26000 REM set up screen and colours
  24. 26010 VARNAME
  25. 26020 FOR
  26. 26030 RETURN
  27.