unit _SndDrv_const;

interface

uses Types;

const PCMFMPPMDPathCount=16;

const DriverModeUnknown=-1;
const DriverModeMXDRVm=0;
const DriverModeFMP=1;
const DriverModePMD=2;
const DriverModeSPC=3;
const DriverModeMXDRVg=4;

type
  TMCh=record
    NoteonFlag:boolean;
    Noteno,Voiceno:integer;
  end;

var
  sdLoop:integer;
  sdEnd:boolean;
  sdFadeout:boolean;
  sdPause:boolean;
  sdReqFadeStop:boolean;
  sdMuteFlag:array[0..15] of boolean;

implementation

initialization
  sdLoop:=0;
  sdEnd:=True;
  sdFadeout:=False;
  sdPause:=False;
  sdReqFadeStop:=False;
  sdMuteFlag[0]:=False;
  sdMuteFlag[1]:=False;
  sdMuteFlag[2]:=False;
  sdMuteFlag[3]:=False;
  sdMuteFlag[4]:=False;
  sdMuteFlag[5]:=False;
  sdMuteFlag[6]:=False;
  sdMuteFlag[7]:=False;
  sdMuteFlag[8]:=False;
  sdMuteFlag[9]:=False;
  sdMuteFlag[10]:=False;
  sdMuteFlag[11]:=False;
  sdMuteFlag[12]:=False;
  sdMuteFlag[13]:=False;
  sdMuteFlag[14]:=False;
  sdMuteFlag[15]:=False;

end.



