home *** CD-ROM | disk | FTP | other *** search
/ TCE Demo 2 / TCE_DEMO_CD2.iso / demo_cd_.2 / mags / stosser / stoser08.arj / stoser08.msa / EXTPT1 / EG.BAS (.txt) < prev    next >
Atari STOS Basic  |  1987-04-22  |  1KB  |  43 lines
  1. 10 REM Program using all three new commands from the EG extension
  2. 100 MODE
  3. 110 CENTRE
  4. 120 LOCATE
  5. 130 EXTENSION (Index #22) (Token 0x80)
  6. 140 PRINT
  7. 150 PRINT
  8. 160 PRINT
  9. 170 PRINT
  10. 180 LOCATE
  11. 190 PRINT
  12. 20 REM By Martin Cubitt    15/10/1993
  13. 200 LOCATE
  14. 210 PRINT
  15. 220 LOCATE
  16. 230 PRINT
  17. 240 LOCATE
  18. 250 PRINT
  19. 260 LOCATE
  20. 270 PRINT
  21. 280 FOR
  22. 290 VARNAME
  23. 30 REM 
  24. 300 VARNAME
  25. 310 LOCATE
  26. 320 PRINT
  27. 330 LOCATE
  28. 340 PRINT
  29. 350 LOCATE
  30. 360 PRINT
  31. 370 LOCATE
  32. 380 PRINT
  33. 390 LOCATE
  34. 400 CENTRE
  35. 410 CLEAR KEY
  36. 420 WAIT KEY
  37. 430 CLEAR KEY
  38. 440 LOCATE
  39. 450 CENTRE
  40. 460 NEXT
  41. 470 DEFAULT
  42. 480 END
  43.