{$if not def DEVICES_AUDIO_H} CONST DEVICES_AUDIO_H=0;

{ ******************************************************************
  ** KickPascal-Include-Datei "devices/audio.h" zu Kickstart 2.04 **
  ****************************************************************** }

TYPE p_IOAudio = ^IOAudio;

{$if not def EXEC_IO_H;incl "exec/io.h";endif}

CONST
 AUDIONAME = "audio.device";

CONST
 ADHARD_CHANNELS = 4;

CONST
 ADALLOC_MINPREC = -128;
 ADALLOC_MAXPREC =  127;

CONST
 ADCMD_FREE      = CMD_NONSTD+0;
 ADCMD_SETPREC   = CMD_NONSTD+1;
 ADCMD_FINISH    = CMD_NONSTD+2;
 ADCMD_PERVOL    = CMD_NONSTD+3;
 ADCMD_LOCK      = CMD_NONSTD+4;
 ADCMD_WAITCYCLE = CMD_NONSTD+5;
 ADCMD_ALLOCATE  = 32;

CONST
 ADIOB_PERVOL       = 4;
 ADIOF_PERVOL       = $10;
 ADIOB_SYNCCYCLE    = 5;
 ADIOF_SYNCCYCLE    = $20;
 ADIOB_NOWAIT       = 6;
 ADIOF_NOWAIT       = $40;
 ADIOB_WRITEMESSAGE = 7;
 ADIOF_WRITEMESSAGE = $80;

CONST
 ADIOERR_NOALLOCATION  = -10;
 ADIOERR_ALLOCFAILED   = -11;
 ADIOERR_CHANNELSTOLEN = -12;

TYPE IOAudio = RECORD
 ioa_Request  : IORequest;
 ioa_AllocKey : Integer;
 ioa_Data     : Ptr;
 ioa_Length   : Long;
 ioa_Period   : Word;
 ioa_Volume   : Word;
 ioa_Cycles   : Word;
 ioa_WriteMsg : Message;
END;

{$endif}