home *** CD-ROM | disk | FTP | other *** search
/ TCE Demo 2 / TCE_DEMO_CD2.iso / demo_cd_.2 / mags / stosser / stoser01.arj / stoser01.msa / STOS_ACB / MOUSCOLO.ACB (.txt) < prev    next >
Atari STOS Basic  |  1987-04-22  |  6KB  |  85 lines
  1. 10 REM ********************************
  2. 100 KEY
  3. 1000 CLS
  4. 105 IF
  5. 11 REM *                              *
  6. 110 IF
  7. 115 WINDOPEN
  8. 12 REM *       MOUSE ACCESSORY        *
  9. 120 WINDOPEN
  10. 125 WINDOPEN
  11. 13 REM *                              *
  12. 130 GOTO
  13. 14 REM *        By  F. Lionet         *
  14. 15 REM *    Part of the Stos Basic    *
  15. 150 WINDOPEN
  16. 155 WINDOPEN
  17. 16 REM *    (c) 1988 Jawx/Mandarin    *
  18. 17 REM *                              *
  19. 18 REM *       COLOUR ACCESSORY       *
  20. 19 REM *  01\02\93 By Tony Greenwood  *
  21. 20 REM *                              *
  22. 200 VARNAME
  23. 205 VARNAME
  24. 206 IF
  25. 21 REM *         BANK GRABBER         *
  26. 210 IF
  27. 215 IF
  28. 22 REM *  07\02\93 By Tony greenwood  *
  29. 220 IF
  30. 225 VARNAME
  31. 23 REM *                              *
  32. 230 UNTIL
  33. 235 IF
  34. 24 REM ********************************
  35. 300 IF
  36. 305 IF
  37. 310 IF
  38. 315 IF
  39. 320 IF
  40. 321 IF
  41. 325 VARNAME
  42. 330 IF
  43. 335 IF
  44. 350 IF
  45. 355 HIDE
  46. 365 VARNAME
  47. 370 VARNAME
  48. 375 VARNAME
  49. 380 VARNAME
  50. 400 VARNAME
  51. 405 REPEAT
  52. 410 IF
  53. 415 IF
  54. 420 PAPER
  55. 425 IF
  56. 430 VARNAME
  57. 435 IF
  58. 440 FOR
  59. 445 GOTO
  60. 450 REM ***** GRAB ************
  61. 4500 REM ***** GRAB ************
  62. 451 MODE
  63. 452 LOCATE
  64. 453 RESTORE
  65. 454 RESTORE
  66. 455 ON ERROR
  67. 460 REPEAT
  68. 470 VARNAME
  69. 471 IF
  70. 472 IF
  71. 473 IF
  72. 474 IF
  73. 475 IF
  74. 476 IF
  75. 480 GOTO
  76. 50 DIM
  77. 55 VARNAME
  78. 600 MODE
  79. 700 BELL
  80. 720 FOR
  81. 800 MODE
  82. 900 DATA
  83. 901 DATA
  84. 902 DATA
  85.