home *** CD-ROM | disk | FTP | other *** search
/ Millennium Time Capsule / AC2000.BIN / disks / hbasic_1 / waveplay / waveplay.bh next >
Encoding:
Text File  |  1997-08-31  |  1.0 KB  |  47 lines
  1.  
  2. ' Original binding by Scott Sanders / SDS.
  3. ' Extra comments by Anthony Jacques / KPP.
  4. ' HiSoft BASIC conv.  by Paul Jones / PJCO
  5.  
  6. CONST WP_STEREO%=0x00
  7. CONST WP_MONO%=0x01
  8.  
  9. CONST WP_8BIT%=0x00
  10. CONST WP_16BIT%=0x02
  11.  
  12. ' SAM can use AFM if installed
  13. CONST WP_NOUSEDSP%=0x00
  14. CONST WP_USEDSP%=0x04
  15.  
  16. ' Falcon compatible frequencies
  17. CONST ACT_CLK50K%=49170
  18. CONST ACT_CLK33K%=33880
  19. CONST ACT_CLK25K%=24585
  20. CONST ACT_CLK20K%=20770
  21. CONST ACT_CLK16K%=16490
  22. CONST ACT_CLK12K%=12292
  23. CONST ACT_CLK10K%=9834
  24. CONST ACT_CLK8K%=8195
  25.  
  26. ' STe/TT Rates
  27. CONST TT_CLK50K%=50066L
  28. CONST TT_CLK25K%=25033L
  29. CONST TT_CLK12K%=12517L
  30. CONST TT_CLK6K%=6258L    ' NOTE: this isn't valid on a Falcon
  31.  
  32. ' both = 'SAM'+chr$(0)
  33. CONST SAM_COOKIE%=0x53414D00
  34. CONST APP_GLOBAL%=(char *)0x53414D00
  35.  
  36. ' the 'application globals' used for system-wide sounds.
  37. CONST AG_FIND%=0L
  38. CONST AG_REPLACE%=1L
  39. CONST AG_CUT%=2L
  40. CONST AG_COPY%=3L
  41. CONST AG_PASTE%=4L
  42. CONST AG_DELETE%=5L
  43. CONST AG_HELP%=6L
  44. CONST AG_PRINT%=7L
  45. CONST AG_SAVE%=8L
  46. CONST AG_ERROR%=9L
  47. CONST AG_QUIT%=10L