home *** CD-ROM | disk | FTP | other *** search
/ Falcon 030 Power 2 / F030_POWER2.iso / ST_STE / MAGS / ICTARI10.ARJ / ictari.10 / STOS / PUZZLE / MAKEPUZZ.BAS (.txt) < prev    next >
Atari STOS Basic  |  1989-07-29  |  4KB  |  73 lines
  1. 100 VARNAME
  2. 110 CLS
  3. 120 VARNAME
  4. 130 IF
  5. 140 EXTENSION (Index #0) (Token 0x80)
  6. 150 SCREEN COPY
  7. 160 PEN
  8. 170 GOSUB
  9. 180 OPEN OUT
  10. 190 VARNAME
  11. 20 DIM
  12. 200 FOR
  13. 210 PRINT
  14. 220 CLOSE
  15. 230 VARNAME
  16. 250 VARNAME
  17. 260 LOCATE
  18. 270 VARNAME
  19. 280 IF
  20. 290 IF
  21. 30 MODE
  22. 300 IF
  23. 310 IF
  24. 320 IF
  25. 330 IF
  26. 340 VARNAME
  27. 370 IF
  28. 380 LOCATE
  29. 390 IF
  30. 40 FLASH
  31. 400 GOTO
  32. 410 REM backspace
  33. 420 IF
  34. 430 IF
  35. 440 FOR
  36. 450 LOCATE
  37. 460 LOCATE
  38. 470 REM delete
  39. 480 IF
  40. 490 FOR
  41. 50 VARNAME
  42. 500 LOCATE
  43. 510 LOCATE
  44. 520 REM right
  45. 530 IF
  46. 540 LOCATE
  47. 55 CLS
  48. 550 REM left
  49. 560 IF
  50. 570 LOCATE
  51. 580 REM insert
  52. 590 IF
  53. 60 ERASE
  54. 600 SHOOT
  55. 610 IF
  56. 620 IF
  57. 630 FOR
  58. 640 LOCATE
  59. 650 LOCATE
  60. 660 VARNAME
  61. 670 VARNAME
  62. 680 WHILE
  63. 690 VARNAME
  64. 70 IF
  65. 700 IF
  66. 710 RETURN
  67. 720 VARNAME
  68. 730 IF
  69. 740 VARNAME
  70. 750 NEXT
  71. 80 PAPER
  72. 90 SCREEN COPY
  73.