home *** CD-ROM | disk | FTP | other *** search
/ No Fragments Archive 10: Diskmags / nf_archive_10.iso / MAGS / STOSSER / STOSSE04.MSA / SOURCE.4U / STOS / STOSPLA1.BAS (.txt) < prev    next >
Encoding:
Atari STOS Basic  |  1987-04-22  |  1.0 KB  |  33 lines
  1. 10 REM STOS REPLAY SAMPLE PLAYER
  2. 100 REM RESERVE SPACE AND LOAD MACHINE CODE
  3. 110 RESERVE
  4. 120 CLS
  5. 130 PRINT
  6. 140 LOAD
  7. 150 REM 
  8. 160 REM RESERVE SPACE AND LOAD SAMPLE DATA
  9. 170 RESERVE
  10. 180 PRINT
  11. 190 BLOAD
  12. 20 REM (C) 2 BIT SYSTEMS LTD 1989
  13. 200 REM 
  14. 210 REM SET UP PLAY PARAMETERS
  15. 220 VARNAME
  16. 230 VARNAME
  17. 240 REM 
  18. 250 REM PUT VARIABLES INTO REGISTERS BEFORE CALLING CODE
  19. 260 PRINT
  20. 270 REM PLAY SAMPLE AT 20 K
  21. 280 DREG
  22. 290 DREG
  23. 30 REM SPEED  0 - 5KHZ
  24. 300 DREG
  25. 310 CALL
  26. 320 PRINT
  27. 40 REM        1 - 7.5KHZ
  28. 50 REM        2 - 10 KHZ
  29. 60 REM        3 - 15 KHZ
  30. 70 REM        4 - 20 KHZ
  31. 80 REM        5 - 30 KHZ
  32. 90 REM 
  33.