home *** CD-ROM | disk | FTP | other *** search
/ Falcon 030 Power 2 / F030_POWER2.iso / ST_STE / MAGS / STOSBTS1.ARJ / stosbts1.msa / PROGRAMM / MESSAGE.BAS (.txt) < prev    next >
Atari STOS Basic  |  1987-04-22  |  1KB  |  31 lines
  1. 10 REM scrollines eddie's way yeah
  2. 100 SCREEN COPY
  3. 1000 REM eddies bit to scroll message up screen
  4. 1010 FOR
  5. 1020 SCREEN COPY
  6. 1030 WAIT VBL
  7. 1040 NEXT
  8. 1050 RETURN
  9. 11 REM adapted from ST User Dec 1989
  10. 110 FOR
  11. 120 SCREEN COPY
  12. 130 WAIT VBL
  13. 140 NEXT
  14. 150 GOTO
  15. 158 REM put message here, plus speed (1-6), and colour (0-15)
  16. 160 DATA
  17. 170 DATA
  18. 180 DATA
  19. 190 DATA
  20. 20 MODE
  21. 200 DATA
  22. 210 REM ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  23. 30 RESERVE
  24. 40 RESERVE
  25. 41 DIM
  26. 50 REM get palette(7)
  27. 60 LOGIC
  28. 70 RESTORE
  29. 80 LOCATE
  30. 90 LOGIC
  31.