home *** CD-ROM | disk | FTP | other *** search
/ Aminet 18 / aminetcdnumber181997.iso / Aminet / dev / m2 / CycloneModules.lha / modules / txt / Audio.def < prev    next >
Text File  |  1996-07-22  |  1KB  |  62 lines
  1. (*
  2. **    Cyclone Modula-2 Interface module:
  3. **    $VER: audio.h 36.3 (29.8.90)
  4. **    Includes Release 40.15
  5. **
  6. **    audio.device include file
  7. **
  8. **    (C) Copyright 1985-1993 Commodore-Amiga, Inc.
  9. **        All Rights Reserved
  10. **
  11. **      Interface module by Marcel Timmermans
  12. **      (C) Copyright 1995-1996 Marcel Timmermans
  13. **          All Rights Reserved
  14. *)
  15.  
  16. (*$ Implementation- *)
  17. DEFINITION MODULE Audio; 
  18.  
  19. FROM SYSTEM IMPORT ADDRESS;
  20.  
  21. IMPORT ExecD;
  22.  
  23. CONST
  24.  audioName="audio.device";
  25.  
  26.  hardChannels=4;
  27.  
  28.  allocMinprec=-128;
  29.  allocMaxprec=127;
  30.  
  31.  free=ExecD.nonstd+0;
  32.  setPrec=ExecD.nonstd+1;
  33.  finish=ExecD.nonstd+2;
  34.  perVol=ExecD.nonstd+3;
  35.  lock=ExecD.nonstd+4;
  36.  waitCycle=ExecD.nonstd+5;
  37.  allocate=32;
  38.  
  39.  pervol=ExecD.IOFlagSet{4};
  40.  syncCycle=ExecD.IOFlagSet{5};
  41.  noWait=ExecD.IOFlagSet{6};
  42.  writeMessage=ExecD.IOFlagSet{7};
  43.  
  44.  noAllocation=-10;
  45.  allocFailed=-11;
  46.  channelStolen=-12;
  47.  
  48. TYPE
  49.  IOAudio=RECORD
  50.   request:ExecD.IORequest;
  51.   allocKey:INTEGER;
  52.   data:ADDRESS;
  53.   length:LONGCARD;
  54.   period:CARDINAL;
  55.   volume:CARDINAL;
  56.   cycles:CARDINAL;
  57.   writeMsg:ExecD.Message;
  58.  END;
  59.  IOAudioPtr=POINTER TO IOAudio;
  60.  
  61. END Audio.
  62.