home *** CD-ROM | disk | FTP | other *** search
/ No Fragments Archive 10: Diskmags / nf_archive_10.iso / MAGS / ST_USER / 1990 / USERJN90.MSA / LISTINGS_CHASE.BAS (.txt) < prev    next >
Atari STOS Basic  |  1990-03-20  |  2KB  |  26 lines
  1. 10 REM simple chase game
  2. 1000 REM play the game
  3. 1010 VARNAME
  4. 1030 ANIM
  5. 1040 VARNAME
  6. 1050 IF
  7. 1060 GOSUB
  8. 1070 WEND
  9. 20 MODE
  10. 2000 VARNAME
  11. 2010 SPRITE
  12. 2020 RETURN
  13. 26000 REM set up screen and colours
  14. 26010 VARNAME
  15. 26020 FOR
  16. 26030 RETURN
  17. 30 GOSUB
  18. 40 GOSUB
  19. 50 GOSUB
  20. 500 REM initialisation
  21. 510 DIM
  22. 520 RESTORE
  23. 530 ANIM
  24. 580 RETURN
  25. 590 DATA
  26.