home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Basic / MAXONB32.DMS / in.adf / Includes.lha / BH / gadgets / tapedeck.bc < prev    next >
Encoding:
Text File  |  1994-03-16  |  429 b   |  18 lines
  1. ' gadgets/tapedeck BASIC constants
  2.  
  3. '$underlines
  4. CONST BUT_PAUSE& = 4&
  5. CONST BUT_PLAY& = 1&
  6. CONST TDECK_Mode& = &h85000001&
  7. CONST BUT_END& = 7&
  8. CONST TDECK_Tape& = &h85000003&
  9. CONST BUT_STOP& = 3&
  10. CONST TDECK_Frames& = &h8500000B&
  11. CONST BUT_FORWARD& = 2&
  12. CONST TDECK_Paused& = &h85000002&
  13. CONST TDECK_CurrentFrame& = &h8500000C&
  14. CONST TDECK_Dummy& = &h85000000&
  15. CONST BUT_REWIND& = 0&
  16. CONST BUT_BEGIN& = 5&
  17. CONST BUT_FRAME& = 6&
  18.