Update to Bass 2.4. Do not forget to replace the old with the new dll.

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@1080 b956fd51-792f-4845-bead-9b4dfca2ff2c

1 files changed, 0 insertions, 988 deletions

diff --git a/Game/Code/lib/bass/MacOSX/Bass.pas b/Game/Code/lib/bass/MacOSX/Bass.pas
deleted file mode 100755
index 284004d3..00000000
--- a/Game/Code/lib/bass/MacOSX/Bass.pas
+++ /dev/null
@@ -1,988 +0,0 @@
-{
-  BASS 2.3 Audio Library, (c) 1999-2007 Ian Luck.
-  Please report bugs/suggestions/etc... to bass@un4seen.com
-
-  See the BASS.CHM file for more complete documentation
-
-
-  How to install
-  ----------------
-  Copy BASS.PAS to the \LIB subdirectory of your Delphi path or your project dir
-}
-unit Bass;
-
-{$I switches.inc}
-
-{$IFDEF DARWIN}
-  {$DEFINE DLL_CDECL}
-{$ENDIF}
-
-interface
-
-uses
-  Windows;
-
-const
-  BASSVERSION = $203;             // API version
-
-  // Use these to test for error from functions that return a DWORD or QWORD
-  DW_ERROR = Cardinal(-1); // -1 (DWORD)
-  QW_ERROR = Int64(-1);    // -1 (QWORD)
-
-  // Error codes returned by BASS_GetErrorCode()
-  BASS_OK                 = 0;    // all is OK
-  BASS_ERROR_MEM          = 1;    // memory error
-  BASS_ERROR_FILEOPEN     = 2;    // can't open the file
-  BASS_ERROR_DRIVER       = 3;    // can't find a free sound driver
-  BASS_ERROR_BUFLOST      = 4;    // the sample buffer was lost - please report this!
-  BASS_ERROR_HANDLE       = 5;    // invalid handle
-  BASS_ERROR_FORMAT       = 6;    // unsupported sample format
-  BASS_ERROR_POSITION     = 7;    // invalid playback position
-  BASS_ERROR_INIT         = 8;    // BASS_Init has not been successfully called
-  BASS_ERROR_START        = 9;    // BASS_Start has not been successfully called
-  BASS_ERROR_ALREADY      = 14;   // already initialized/paused/whatever
-  BASS_ERROR_NOPAUSE      = 16;   // not paused
-  BASS_ERROR_NOCHAN       = 18;   // can't get a free channel
-  BASS_ERROR_ILLTYPE      = 19;   // an illegal type was specified
-  BASS_ERROR_ILLPARAM     = 20;   // an illegal parameter was specified
-  BASS_ERROR_NO3D         = 21;   // no 3D support
-  BASS_ERROR_NOEAX        = 22;   // no EAX support
-  BASS_ERROR_DEVICE       = 23;   // illegal device number
-  BASS_ERROR_NOPLAY       = 24;   // not playing
-  BASS_ERROR_FREQ         = 25;   // illegal sample rate
-  BASS_ERROR_NOTFILE      = 27;   // the stream is not a file stream
-  BASS_ERROR_NOHW         = 29;   // no hardware voices available
-  BASS_ERROR_EMPTY        = 31;   // the MOD music has no sequence data
-  BASS_ERROR_NONET        = 32;   // no internet connection could be opened
-  BASS_ERROR_CREATE       = 33;   // couldn't create the file
-  BASS_ERROR_NOFX         = 34;   // effects are not enabled
-  BASS_ERROR_PLAYING      = 35;   // the channel is playing
-  BASS_ERROR_NOTAVAIL     = 37;   // requested data is not available
-  BASS_ERROR_DECODE       = 38;   // the channel is a "decoding channel"
-  BASS_ERROR_DX           = 39;   // a sufficient DirectX version is not installed
-  BASS_ERROR_TIMEOUT      = 40;   // connection timedout
-  BASS_ERROR_FILEFORM     = 41;   // unsupported file format
-  BASS_ERROR_SPEAKER      = 42;   // unavailable speaker
-  BASS_ERROR_VERSION      = 43;   // invalid BASS version (used by add-ons)
-  BASS_ERROR_CODEC        = 44;   // codec is not available/supported
-  BASS_ERROR_UNKNOWN      = -1;   // some other mystery error
-
-  // Initialization flags
-  BASS_DEVICE_8BITS       = 1;    // use 8 bit resolution, else 16 bit
-  BASS_DEVICE_MONO        = 2;    // use mono, else stereo
-  BASS_DEVICE_3D          = 4;    // enable 3D functionality
-  {
-    If the BASS_DEVICE_3D flag is not specified when
-    initilizing BASS, then the 3D flags (BASS_SAMPLE_3D
-    and BASS_MUSIC_3D) are ignored when loading/creating
-    a sample/stream/music.
-  }
-  BASS_DEVICE_LATENCY     = 256;  // calculate device latency (BASS_INFO struct)
-  BASS_DEVICE_SPEAKERS    = 2048; // force enabling of speaker assignment
-  BASS_DEVICE_NOSPEAKER   = 4096; // ignore speaker arrangement
-
-  // DirectSound interfaces (for use with BASS_GetDSoundObject)
-  BASS_OBJECT_DS          = 1;   // IDirectSound
-  BASS_OBJECT_DS3DL       = 2;   // IDirectSound3DListener
-
-  // BASS_INFO flags (from DSOUND.H)
-  DSCAPS_CONTINUOUSRATE   = $00000010;
-  { supports all sample rates between min/maxrate }
-  DSCAPS_EMULDRIVER       = $00000020;
-  { device does NOT have hardware DirectSound support }
-  DSCAPS_CERTIFIED        = $00000040;
-  { device driver has been certified by Microsoft }
-  {
-    The following flags tell what type of samples are
-    supported by HARDWARE mixing, all these formats are
-    supported by SOFTWARE mixing
-  }
-  DSCAPS_SECONDARYMONO    = $00000100;     // mono
-  DSCAPS_SECONDARYSTEREO  = $00000200;     // stereo
-  DSCAPS_SECONDARY8BIT    = $00000400;     // 8 bit
-  DSCAPS_SECONDARY16BIT   = $00000800;     // 16 bit
-
-  // BASS_RECORDINFO flags (from DSOUND.H)
-  DSCCAPS_EMULDRIVER = DSCAPS_EMULDRIVER;
-  { device does NOT have hardware DirectSound recording support }
-  DSCCAPS_CERTIFIED = DSCAPS_CERTIFIED;
-  { device driver has been certified by Microsoft }
-
-  // defines for formats field of BASS_RECORDINFO (from MMSYSTEM.H)
-  WAVE_FORMAT_1M08       = $00000001;      // 11.025 kHz, Mono,   8-bit
-  WAVE_FORMAT_1S08       = $00000002;      // 11.025 kHz, Stereo, 8-bit
-  WAVE_FORMAT_1M16       = $00000004;      // 11.025 kHz, Mono,   16-bit
-  WAVE_FORMAT_1S16       = $00000008;      // 11.025 kHz, Stereo, 16-bit
-  WAVE_FORMAT_2M08       = $00000010;      // 22.05  kHz, Mono,   8-bit
-  WAVE_FORMAT_2S08       = $00000020;      // 22.05  kHz, Stereo, 8-bit
-  WAVE_FORMAT_2M16       = $00000040;      // 22.05  kHz, Mono,   16-bit
-  WAVE_FORMAT_2S16       = $00000080;      // 22.05  kHz, Stereo, 16-bit
-  WAVE_FORMAT_4M08       = $00000100;      // 44.1   kHz, Mono,   8-bit
-  WAVE_FORMAT_4S08       = $00000200;      // 44.1   kHz, Stereo, 8-bit
-  WAVE_FORMAT_4M16       = $00000400;      // 44.1   kHz, Mono,   16-bit
-  WAVE_FORMAT_4S16       = $00000800;      // 44.1   kHz, Stereo, 16-bit
-
-  // Sample info flags
-  BASS_SAMPLE_8BITS       = 1;   // 8 bit
-  BASS_SAMPLE_FLOAT       = 256; // 32-bit floating-point
-  BASS_SAMPLE_MONO        = 2;   // mono, else stereo
-  BASS_SAMPLE_LOOP        = 4;   // looped
-  BASS_SAMPLE_3D          = 8;   // 3D functionality enabled
-  BASS_SAMPLE_SOFTWARE    = 16;  // it's NOT using hardware mixing
-  BASS_SAMPLE_MUTEMAX     = 32;  // muted at max distance (3D only)
-  BASS_SAMPLE_VAM         = 64;  // uses the DX7 voice allocation & management
-  BASS_SAMPLE_FX          = 128; // old implementation of DX8 effects are enabled
-  BASS_SAMPLE_OVER_VOL    = $10000; // override lowest volume
-  BASS_SAMPLE_OVER_POS    = $20000; // override longest playing
-  BASS_SAMPLE_OVER_DIST   = $30000; // override furthest from listener (3D only)
-
-  BASS_STREAM_PRESCAN     = $20000; // enable pin-point seeking (MP3/MP2/MP1)
-  BASS_MP3_SETPOS         = BASS_STREAM_PRESCAN;
-  BASS_STREAM_AUTOFREE	  = $40000; // automatically free the stream when it stop/ends
-  BASS_STREAM_RESTRATE	  = $80000; // restrict the download rate of internet file streams
-  BASS_STREAM_BLOCK       = $100000;// download/play internet file stream in small blocks
-  BASS_STREAM_DECODE      = $200000;// don't play the stream, only decode (BASS_ChannelGetData)
-  BASS_STREAM_STATUS      = $800000;// give server status info (HTTP/ICY tags) in DOWNLOADPROC
-
-  BASS_MUSIC_FLOAT        = BASS_SAMPLE_FLOAT; // 32-bit floating-point
-  BASS_MUSIC_MONO         = BASS_SAMPLE_MONO; // force mono mixing (less CPU usage)
-  BASS_MUSIC_LOOP         = BASS_SAMPLE_LOOP; // loop music
-  BASS_MUSIC_3D           = BASS_SAMPLE_3D; // enable 3D functionality
-  BASS_MUSIC_FX           = BASS_SAMPLE_FX; // enable old implementation of DX8 effects
-  BASS_MUSIC_AUTOFREE     = BASS_STREAM_AUTOFREE; // automatically free the music when it stop/ends
-  BASS_MUSIC_DECODE       = BASS_STREAM_DECODE; // don't play the music, only decode (BASS_ChannelGetData)
-  BASS_MUSIC_PRESCAN      = BASS_STREAM_PRESCAN; // calculate playback length
-  BASS_MUSIC_CALCLEN      = BASS_MUSIC_PRESCAN;
-  BASS_MUSIC_RAMP         = $200;  // normal ramping
-  BASS_MUSIC_RAMPS        = $400;  // sensitive ramping
-  BASS_MUSIC_SURROUND     = $800;  // surround sound
-  BASS_MUSIC_SURROUND2    = $1000; // surround sound (mode 2)
-  BASS_MUSIC_FT2MOD       = $2000; // play .MOD as FastTracker 2 does
-  BASS_MUSIC_PT1MOD       = $4000; // play .MOD as ProTracker 1 does
-  BASS_MUSIC_NONINTER     = $10000; // non-interpolated mixing
-  BASS_MUSIC_POSRESET     = $8000; // stop all notes when moving position
-  BASS_MUSIC_POSRESETEX   = $400000; // stop all notes and reset bmp/etc when moving position
-  BASS_MUSIC_STOPBACK     = $80000; // stop the music on a backwards jump effect
-  BASS_MUSIC_NOSAMPLE     = $100000; // don't load the samples
-
-  // Speaker assignment flags
-  BASS_SPEAKER_FRONT      = $1000000;  // front speakers
-  BASS_SPEAKER_REAR       = $2000000;  // rear/side speakers
-  BASS_SPEAKER_CENLFE     = $3000000;  // center & LFE speakers (5.1)
-  BASS_SPEAKER_REAR2      = $4000000;  // rear center speakers (7.1)
-  BASS_SPEAKER_LEFT       = $10000000; // modifier: left
-  BASS_SPEAKER_RIGHT      = $20000000; // modifier: right
-  BASS_SPEAKER_FRONTLEFT  = BASS_SPEAKER_FRONT or BASS_SPEAKER_LEFT;
-  BASS_SPEAKER_FRONTRIGHT = BASS_SPEAKER_FRONT or BASS_SPEAKER_RIGHT;
-  BASS_SPEAKER_REARLEFT   = BASS_SPEAKER_REAR or BASS_SPEAKER_LEFT;
-  BASS_SPEAKER_REARRIGHT  = BASS_SPEAKER_REAR or BASS_SPEAKER_RIGHT;
-  BASS_SPEAKER_CENTER     = BASS_SPEAKER_CENLFE or BASS_SPEAKER_LEFT;
-  BASS_SPEAKER_LFE        = BASS_SPEAKER_CENLFE or BASS_SPEAKER_RIGHT;
-  BASS_SPEAKER_REAR2LEFT  = BASS_SPEAKER_REAR2 or BASS_SPEAKER_LEFT;
-  BASS_SPEAKER_REAR2RIGHT = BASS_SPEAKER_REAR2 or BASS_SPEAKER_RIGHT;
-
-  BASS_UNICODE            = $80000000;
-
-  BASS_RECORD_PAUSE       = $8000; // start recording paused
-
-  // DX7 voice allocation flags
-  BASS_VAM_HARDWARE       = 1;
-  {
-    Play the sample in hardware. If no hardware voices are available then
-    the "play" call will fail
-  }
-  BASS_VAM_SOFTWARE       = 2;
-  {
-    Play the sample in software (ie. non-accelerated). No other VAM flags
-    may be used together with this flag.
-  }
-
-  // DX7 voice management flags
-  {
-    These flags enable hardware resource stealing... if the hardware has no
-    available voices, a currently playing buffer will be stopped to make room
-    for the new buffer. NOTE: only samples loaded/created with the
-    BASS_SAMPLE_VAM flag are considered for termination by the DX7 voice
-    management.
-  }
-  BASS_VAM_TERM_TIME      = 4;
-  {
-    If there are no free hardware voices, the buffer to be terminated will be
-    the one with the least time left to play.
-  }
-  BASS_VAM_TERM_DIST      = 8;
-  {
-    If there are no free hardware voices, the buffer to be terminated will be
-    one that was loaded/created with the BASS_SAMPLE_MUTEMAX flag and is
-    beyond
-    it's max distance. If there are no buffers that match this criteria, then
-    the "play" call will fail.
-  }
-  BASS_VAM_TERM_PRIO      = 16;
-  {
-    If there are no free hardware voices, the buffer to be terminated will be
-    the one with the lowest priority.
-  }
-
-  // BASS_CHANNELINFO types
-  BASS_CTYPE_SAMPLE       = 1;
-  BASS_CTYPE_RECORD       = 2;
-  BASS_CTYPE_STREAM       = $10000;
-  BASS_CTYPE_STREAM_OGG   = $10002;
-  BASS_CTYPE_STREAM_MP1   = $10003;
-  BASS_CTYPE_STREAM_MP2   = $10004;
-  BASS_CTYPE_STREAM_MP3   = $10005;
-  BASS_CTYPE_STREAM_AIFF  = $10006;
-  BASS_CTYPE_STREAM_WAV   = $40000; // WAVE flag, LOWORD=codec
-  BASS_CTYPE_STREAM_WAV_PCM = $50001;
-  BASS_CTYPE_STREAM_WAV_FLOAT = $50003;
-  BASS_CTYPE_MUSIC_MOD    = $20000;
-  BASS_CTYPE_MUSIC_MTM    = $20001;
-  BASS_CTYPE_MUSIC_S3M    = $20002;
-  BASS_CTYPE_MUSIC_XM     = $20003;
-  BASS_CTYPE_MUSIC_IT     = $20004;
-  BASS_CTYPE_MUSIC_MO3    = $00100; // MO3 flag
-
-  // 3D channel modes
-  BASS_3DMODE_NORMAL      = 0;
-  { normal 3D processing }
-  BASS_3DMODE_RELATIVE    = 1;
-  {
-    The channel's 3D position (position/velocity/
-    orientation) are relative to the listener. When the
-    listener's position/velocity/orientation is changed
-    with BASS_Set3DPosition, the channel's position
-    relative to the listener does not change.
-  }
-  BASS_3DMODE_OFF         = 2;
-  {
-    Turn off 3D processing on the channel, the sound will
-    be played in the center.
-  }
-
-  // EAX environments, use with BASS_SetEAXParameters
-  EAX_ENVIRONMENT_GENERIC           = 0;
-  EAX_ENVIRONMENT_PADDEDCELL        = 1;
-  EAX_ENVIRONMENT_ROOM              = 2;
-  EAX_ENVIRONMENT_BATHROOM          = 3;
-  EAX_ENVIRONMENT_LIVINGROOM        = 4;
-  EAX_ENVIRONMENT_STONEROOM         = 5;
-  EAX_ENVIRONMENT_AUDITORIUM        = 6;
-  EAX_ENVIRONMENT_CONCERTHALL       = 7;
-  EAX_ENVIRONMENT_CAVE              = 8;
-  EAX_ENVIRONMENT_ARENA             = 9;
-  EAX_ENVIRONMENT_HANGAR            = 10;
-  EAX_ENVIRONMENT_CARPETEDHALLWAY   = 11;
-  EAX_ENVIRONMENT_HALLWAY           = 12;
-  EAX_ENVIRONMENT_STONECORRIDOR     = 13;
-  EAX_ENVIRONMENT_ALLEY             = 14;
-  EAX_ENVIRONMENT_FOREST            = 15;
-  EAX_ENVIRONMENT_CITY              = 16;
-  EAX_ENVIRONMENT_MOUNTAINS         = 17;
-  EAX_ENVIRONMENT_QUARRY            = 18;
-  EAX_ENVIRONMENT_PLAIN             = 19;
-  EAX_ENVIRONMENT_PARKINGLOT        = 20;
-  EAX_ENVIRONMENT_SEWERPIPE         = 21;
-  EAX_ENVIRONMENT_UNDERWATER        = 22;
-  EAX_ENVIRONMENT_DRUGGED           = 23;
-  EAX_ENVIRONMENT_DIZZY             = 24;
-  EAX_ENVIRONMENT_PSYCHOTIC         = 25;
-  // total number of environments
-  EAX_ENVIRONMENT_COUNT             = 26;
-
-  // software 3D mixing algorithm modes (used with BASS_Set3DAlgorithm)
-  BASS_3DALG_DEFAULT                = 0;
-  {
-    default algorithm (currently translates to BASS_3DALG_OFF)
-  }
-  BASS_3DALG_OFF                    = 1;
-  {
-    Uses normal left and right panning. The vertical axis is ignored except
-    for scaling of volume due to distance. Doppler shift and volume scaling
-    are still applied, but the 3D filtering is not performed. This is the
-    most CPU efficient software implementation, but provides no virtual 3D
-    audio effect. Head Related Transfer Function processing will not be done.
-    Since only normal stereo panning is used, a channel using this algorithm
-    may be accelerated by a 2D hardware voice if no free 3D hardware voices
-    are available.
-  }
-  BASS_3DALG_FULL                   = 2;
-  {
-    This algorithm gives the highest quality 3D audio effect, but uses more
-    CPU. Requires Windows 98 2nd Edition or Windows 2000 that uses WDM
-    drivers, if this mode is not available then BASS_3DALG_OFF will be used
-    instead.
-  }
-  BASS_3DALG_LIGHT                  = 3;
-  {
-    This algorithm gives a good 3D audio effect, and uses less CPU than the
-    FULL mode. Requires Windows 98 2nd Edition or Windows 2000 that uses WDM
-    drivers, if this mode is not available then BASS_3DALG_OFF will be used
-    instead.
-  }
-
-  {
-    Sync types (with BASS_ChannelSetSync() "param" and
-    SYNCPROC "data" definitions) & flags.
-  }
-  BASS_SYNC_POS                     = 0;
-  {
-    Sync when a channel reaches a position.
-    param: position in bytes
-    data : not used
-  }
-  BASS_SYNC_END                     = 2;
-  {
-    Sync when a channel reaches the end.
-    param: not used
-    data : not used
-  }
-  BASS_SYNC_META                    = 4;
-  {
-    Sync when metadata is received in a stream.
-    param: not used
-    data : pointer to the metadata
-  }
-  BASS_SYNC_SLIDE                   = 5;
-  {
-    Sync when an attribute slide is completed.
-    param: not used
-    data : the type of slide completed (one of the BASS_SLIDE_xxx values)
-  }
-  BASS_SYNC_STALL                   = 6;
-  {
-    Sync when playback has stalled.
-    param: not used
-    data : 0=stalled, 1=resumed
-  }
-  BASS_SYNC_DOWNLOAD                = 7;
-  {
-    Sync when downloading of an internet (or "buffered" user file) stream has ended.
-    param: not used
-    data : not used
-  }
-  BASS_SYNC_FREE                    = 8;
-  {
-    Sync when a channel is freed.
-    param: not used
-    data : not used
-  }
-  BASS_SYNC_SETPOS                  = 11;
-  {
-    Sync when a channel's position is set.
-    param: not used
-    data : 0 = playback buffer not flushed, 1 = playback buffer flushed
-  }
-  BASS_SYNC_MUSICPOS                = 10;
-  {
-    Sync when a MOD music reaches an order:row position.
-    param: LOWORD=order (0=first, -1=all) HIWORD=row (0=first, -1=all)
-    data : LOWORD=order HIWORD=row
-  }
-  BASS_SYNC_MUSICINST               = 1;
-  {
-    Sync when an instrument (sample for the non-instrument based formats)
-    is played in a MOD music (not including retrigs).
-    param: LOWORD=instrument (1=first) HIWORD=note (0=c0...119=b9, -1=all)
-    data : LOWORD=note HIWORD=volume (0-64)
-  }
-  BASS_SYNC_MUSICFX                 = 3;
-  {
-    Sync when the "sync" effect (XM/MTM/MOD: E8x/Wxx, IT/S3M: S2x) is used.
-    param: 0:data=pos, 1:data="x" value
-    data : param=0: LOWORD=order HIWORD=row, param=1: "x" value
-  }
-  BASS_SYNC_MESSAGE                 = $20000000;
-  { FLAG: post a Windows message (instead of callback)
-    When using a window message "callback", the message to post is given in the "proc"
-    parameter of BASS_ChannelSetSync, and is posted to the window specified in the BASS_Init
-    call. The message parameters are: WPARAM = data, LPARAM = user.
-  }
-  BASS_SYNC_MIXTIME                 = $40000000;
-  { FLAG: sync at mixtime, else at playtime }
-  BASS_SYNC_ONETIME                 = $80000000;
-  { FLAG: sync only once, else continuously }
-
-  // BASS_ChannelIsActive return values
-  BASS_ACTIVE_STOPPED = 0;
-  BASS_ACTIVE_PLAYING = 1;
-  BASS_ACTIVE_STALLED = 2;
-  BASS_ACTIVE_PAUSED  = 3;
-
-  // BASS_ChannelIsSliding return flags
-  BASS_SLIDE_FREQ     = 1;
-  BASS_SLIDE_VOL      = 2;
-  BASS_SLIDE_PAN      = 4;
-
-  // BASS_ChannelGetData flags
-  BASS_DATA_AVAILABLE = 0;        // query how much data is buffered
-  BASS_DATA_FLOAT     = $40000000; // flag: return floating-point sample data
-  BASS_DATA_FFT512    = $80000000; // 512 sample FFT
-  BASS_DATA_FFT1024   = $80000001; // 1024 FFT
-  BASS_DATA_FFT2048   = $80000002; // 2048 FFT
-  BASS_DATA_FFT4096   = $80000003; // 4096 FFT
-  BASS_DATA_FFT8192   = $80000004; // 8192 FFT
-  BASS_DATA_FFT_INDIVIDUAL = $10; // FFT flag: FFT for each channel, else all combined
-  BASS_DATA_FFT_NOWINDOW = $20;   // FFT flag: no Hanning window
-
-  // BASS_ChannelGetTags types : what's returned
-  BASS_TAG_ID3        = 0; // ID3v1 tags : 128 byte block
-  BASS_TAG_ID3V2      = 1; // ID3v2 tags : variable length block
-  BASS_TAG_OGG        = 2; // OGG comments : array of null-terminated strings
-  BASS_TAG_HTTP       = 3; // HTTP headers : array of null-terminated strings
-  BASS_TAG_ICY        = 4; // ICY headers : array of null-terminated strings
-  BASS_TAG_META       = 5; // ICY metadata : null-terminated string
-  BASS_TAG_VENDOR     = 9; // OGG encoder : null-terminated string
-  BASS_TAG_LYRICS3    = 10; // Lyric3v2 tag : ASCII string
-  BASS_TAG_RIFF_INFO  = $100; // RIFF/WAVE tags : array of null-terminated ANSI strings
-  BASS_TAG_MUSIC_NAME = $10000;	// MOD music name : ANSI string
-  BASS_TAG_MUSIC_MESSAGE = $10001; // MOD message : ANSI string
-  BASS_TAG_MUSIC_INST = $10100;	// + instrument #, MOD instrument name : ANSI string
-  BASS_TAG_MUSIC_SAMPLE = $10300; // + sample #, MOD sample name : ANSI string
-
-  BASS_FX_CHORUS	  = 0;      // GUID_DSFX_STANDARD_CHORUS
-  BASS_FX_COMPRESSOR  = 1;      // GUID_DSFX_STANDARD_COMPRESSOR
-  BASS_FX_DISTORTION  = 2;      // GUID_DSFX_STANDARD_DISTORTION
-  BASS_FX_ECHO        = 3;      // GUID_DSFX_STANDARD_ECHO
-  BASS_FX_FLANGER     = 4;      // GUID_DSFX_STANDARD_FLANGER
-  BASS_FX_GARGLE      = 5;      // GUID_DSFX_STANDARD_GARGLE
-  BASS_FX_I3DL2REVERB = 6;      // GUID_DSFX_STANDARD_I3DL2REVERB
-  BASS_FX_PARAMEQ     = 7;      // GUID_DSFX_STANDARD_PARAMEQ
-  BASS_FX_REVERB      = 8;      // GUID_DSFX_WAVES_REVERB
-
-  BASS_FX_PHASE_NEG_180 = 0;
-  BASS_FX_PHASE_NEG_90  = 1;
-  BASS_FX_PHASE_ZERO    = 2;
-  BASS_FX_PHASE_90      = 3;
-  BASS_FX_PHASE_180     = 4;
-
-  // BASS_RecordSetInput flags
-  BASS_INPUT_OFF    = $10000;
-  BASS_INPUT_ON     = $20000;
-  BASS_INPUT_LEVEL  = $40000;
-
-  BASS_INPUT_TYPE_MASK    = $ff000000;
-  BASS_INPUT_TYPE_UNDEF   = $00000000;
-  BASS_INPUT_TYPE_DIGITAL = $01000000;
-  BASS_INPUT_TYPE_LINE    = $02000000;
-  BASS_INPUT_TYPE_MIC     = $03000000;
-  BASS_INPUT_TYPE_SYNTH   = $04000000;
-  BASS_INPUT_TYPE_CD      = $05000000;
-  BASS_INPUT_TYPE_PHONE   = $06000000;
-  BASS_INPUT_TYPE_SPEAKER = $07000000;
-  BASS_INPUT_TYPE_WAVE    = $08000000;
-  BASS_INPUT_TYPE_AUX     = $09000000;
-  BASS_INPUT_TYPE_ANALOG  = $0a000000;
-
-  // BASS_SetNetConfig flags
-  BASS_NET_TIMEOUT  = 0;
-  BASS_NET_BUFFER   = 1;
-
-  // BASS_StreamGetFilePosition modes
-  BASS_FILEPOS_CURRENT    = 0;
-  BASS_FILEPOS_DECODE     = BASS_FILEPOS_CURRENT;
-  BASS_FILEPOS_DOWNLOAD   = 1;
-  BASS_FILEPOS_END        = 2;
-  BASS_FILEPOS_START      = 3;
-  BASS_FILEPOS_CONNECTED  = 4;
-
-  // STREAMFILEPROC actions
-  BASS_FILE_CLOSE   = 0;
-  BASS_FILE_READ    = 1;
-  BASS_FILE_LEN     = 3;
-  BASS_FILE_SEEK    = 4;
-
-  BASS_STREAMPROC_END = $80000000; // end of user stream flag
-
-  // BASS_MusicSet/GetAttribute options
-  BASS_MUSIC_ATTRIB_AMPLIFY    = 0;
-  BASS_MUSIC_ATTRIB_PANSEP     = 1;
-  BASS_MUSIC_ATTRIB_PSCALER    = 2;
-  BASS_MUSIC_ATTRIB_BPM        = 3;
-  BASS_MUSIC_ATTRIB_SPEED      = 4;
-  BASS_MUSIC_ATTRIB_VOL_GLOBAL = 5;
-  BASS_MUSIC_ATTRIB_VOL_CHAN   = $100; // + channel #
-  BASS_MUSIC_ATTRIB_VOL_INST   = $200; // + instrument #
-
-  // BASS_Set/GetConfig options
-  BASS_CONFIG_BUFFER        = 0;
-  BASS_CONFIG_UPDATEPERIOD  = 1;
-  BASS_CONFIG_MAXVOL        = 3;
-  BASS_CONFIG_GVOL_SAMPLE   = 4;
-  BASS_CONFIG_GVOL_STREAM   = 5;
-  BASS_CONFIG_GVOL_MUSIC    = 6;
-  BASS_CONFIG_CURVE_VOL     = 7;
-  BASS_CONFIG_CURVE_PAN     = 8;
-  BASS_CONFIG_FLOATDSP      = 9;
-  BASS_CONFIG_3DALGORITHM   = 10;
-  BASS_CONFIG_NET_TIMEOUT   = 11;
-  BASS_CONFIG_NET_BUFFER    = 12;
-  BASS_CONFIG_PAUSE_NOPLAY  = 13;
-  BASS_CONFIG_NET_PREBUF    = 15;
-  BASS_CONFIG_NET_AGENT     = 16;
-  BASS_CONFIG_NET_PROXY     = 17;
-  BASS_CONFIG_NET_PASSIVE   = 18;
-  BASS_CONFIG_REC_BUFFER    = 19;
-  BASS_CONFIG_NET_PLAYLIST  = 21;
-  BASS_CONFIG_MUSIC_VIRTUAL = 22;
-
-type
-  DWORD = cardinal;
-  BOOL = LongBool;
-  FLOAT = Single;
-  QWORD = int64;        // 64-bit (replace "int64" with "comp" if using Delphi 3)
-
-  HMUSIC = DWORD;       // MOD music handle
-  HSAMPLE = DWORD;      // sample handle
-  HCHANNEL = DWORD;     // playing sample's channel handle
-  HSTREAM = DWORD;      // sample stream handle
-  HRECORD = DWORD;      // recording handle
-  HSYNC = DWORD;        // synchronizer handle
-  HDSP = DWORD;         // DSP handle
-  HFX = DWORD;          // DX8 effect handle
-  HPLUGIN = DWORD;      // Plugin handle
-
-  BASS_INFO = record
-    flags: DWORD;       // device capabilities (DSCAPS_xxx flags)
-    hwsize: DWORD;      // size of total device hardware memory
-    hwfree: DWORD;      // size of free device hardware memory
-    freesam: DWORD;     // number of free sample slots in the hardware
-    free3d: DWORD;      // number of free 3D sample slots in the hardware
-    minrate: DWORD;     // min sample rate supported by the hardware
-    maxrate: DWORD;     // max sample rate supported by the hardware
-    eax: BOOL;          // device supports EAX? (always FALSE if BASS_DEVICE_3D was not used)
-    minbuf: DWORD;      // recommended minimum buffer length in ms (requires BASS_DEVICE_LATENCY)
-    dsver: DWORD;       // DirectSound version
-    latency: DWORD;     // delay (in ms) before start of playback (requires BASS_DEVICE_LATENCY)
-    initflags: DWORD;   // "flags" parameter of BASS_Init call
-    speakers: DWORD;    // number of speakers available
-    driver: PChar;      // driver
-    freq: DWORD;        // current output rate (OSX only)
-  end;
-
-  BASS_RECORDINFO = record
-    flags: DWORD;       // device capabilities (DSCCAPS_xxx flags)
-    formats: DWORD;     // supported standard formats (WAVE_FORMAT_xxx flags)
-    inputs: DWORD;      // number of inputs
-    singlein: BOOL;     // only 1 input can be set at a time
-    driver: PChar;      // driver
-    freq: DWORD;        // current input rate (OSX only)
-  end;
-
-  BASS_CHANNELINFO = record
-	freq: DWORD;        // default playback rate
-	chans: DWORD;       // channels
-	flags: DWORD;       // BASS_SAMPLE/STREAM/MUSIC/SPEAKER flags
-	ctype: DWORD;       // type of channel
-	origres: DWORD;     // original resolution
-	plugin: HPLUGIN;    // plugin
-  end;
-
-  BASS_PLUGINFORM = record
-	ctype: DWORD;       // channel type
-	name: PChar;        // format description
-	exts: PChar;	    // file extension filter ( *.ext1;*.ext2;etc...)
-  end;
-  PBASS_PLUGINFORMS = ^TBASS_PLUGINFORMS;
-  TBASS_PLUGINFORMS = array[0..maxInt div sizeOf(BASS_PLUGINFORM) - 1] of BASS_PLUGINFORM;
-
-  BASS_PLUGININFO = record
-	version: DWORD;             // version (same form as BASS_GetVersion)
-	formatc: DWORD;             // number of formats
-	formats: PBASS_PLUGINFORMS; // the array of formats
-  end;
-  PBASS_PLUGININFO = ^BASS_PLUGININFO;
-
-  // Sample info structure
-  BASS_SAMPLE = record
-    freq: DWORD;        // default playback rate
-    volume: DWORD;      // default volume (0-100)
-    pan: Integer;       // default pan (-100=left, 0=middle, 100=right)
-    flags: DWORD;       // BASS_SAMPLE_xxx flags
-    length: DWORD;      // length (in samples, not bytes)
-    max: DWORD;         // maximum simultaneous playbacks
-    origres: DWORD;     // original resolution
-    chans: DWORD;       // number of channels
-    mingap: DWORD;      // minimum gap (ms) between creating channels
-    {
-      The following are the samples default 3D attributes
-      (if the sample is 3D, BASS_SAMPLE_3D is in flags)
-      see BASS_ChannelSet3DAttributes
-    }
-    mode3d: DWORD;      // BASS_3DMODE_xxx mode
-    mindist: FLOAT;     // minimum distance
-    maxdist: FLOAT;     // maximum distance
-    iangle: DWORD;      // angle of inside projection cone
-    oangle: DWORD;      // angle of outside projection cone
-    outvol: DWORD;      // delta-volume outside the projection cone
-    {
-      The following are the defaults used if the sample uses the DirectX 7
-      voice allocation/management features.
-    }
-    vam: DWORD;         // voice allocation/management flags (BASS_VAM_xxx)
-    priority: DWORD;    // priority (0=lowest, $ffffffff=highest)
-  end;
-
-  // 3D vector (for 3D positions/velocities/orientations)
-  BASS_3DVECTOR = record
-    x: FLOAT;           // +=right, -=left
-    y: FLOAT;           // +=up, -=down
-    z: FLOAT;           // +=front, -=behind
-  end;
-
-  BASS_FXCHORUS = record
-    fWetDryMix: FLOAT;
-    fDepth: FLOAT;
-    fFeedback: FLOAT;
-    fFrequency: FLOAT;
-    lWaveform: DWORD;   // 0=triangle, 1=sine
-    fDelay: FLOAT;
-    lPhase: DWORD;      // BASS_FX_PHASE_xxx
-  end;
-
-  BASS_FXCOMPRESSOR = record
-    fGain: FLOAT;
-    fAttack: FLOAT;
-    fRelease: FLOAT;
-    fThreshold: FLOAT;
-    fRatio: FLOAT;
-    fPredelay: FLOAT;
-  end;
-
-  BASS_FXDISTORTION = record
-    fGain: FLOAT;
-    fEdge: FLOAT;
-    fPostEQCenterFrequency: FLOAT;
-    fPostEQBandwidth: FLOAT;
-    fPreLowpassCutoff: FLOAT;
-  end;
-
-  BASS_FXECHO = record
-    fWetDryMix: FLOAT;
-    fFeedback: FLOAT;
-    fLeftDelay: FLOAT;
-    fRightDelay: FLOAT;
-    lPanDelay: BOOL;
-  end;
-
-  BASS_FXFLANGER = record
-    fWetDryMix: FLOAT;
-    fDepth: FLOAT;
-    fFeedback: FLOAT;
-    fFrequency: FLOAT;
-    lWaveform: DWORD;   // 0=triangle, 1=sine
-    fDelay: FLOAT;
-    lPhase: DWORD;      // BASS_FX_PHASE_xxx
-  end;
-
-  BASS_FXGARGLE = record
-    dwRateHz: DWORD;               // Rate of modulation in hz
-    dwWaveShape: DWORD;            // 0=triangle, 1=square
-  end;
-
-  BASS_FXI3DL2REVERB = record
-    lRoom: Longint;                // [-10000, 0]      default: -1000 mB
-    lRoomHF: Longint;              // [-10000, 0]      default: 0 mB
-    flRoomRolloffFactor: FLOAT;    // [0.0, 10.0]      default: 0.0
-    flDecayTime: FLOAT;            // [0.1, 20.0]      default: 1.49s
-    flDecayHFRatio: FLOAT;         // [0.1, 2.0]       default: 0.83
-    lReflections: Longint;         // [-10000, 1000]   default: -2602 mB
-    flReflectionsDelay: FLOAT;     // [0.0, 0.3]       default: 0.007 s
-    lReverb: Longint;              // [-10000, 2000]   default: 200 mB
-    flReverbDelay: FLOAT;          // [0.0, 0.1]       default: 0.011 s
-    flDiffusion: FLOAT;            // [0.0, 100.0]     default: 100.0 %
-    flDensity: FLOAT;              // [0.0, 100.0]     default: 100.0 %
-    flHFReference: FLOAT;          // [20.0, 20000.0]  default: 5000.0 Hz
-  end;
-
-  BASS_FXPARAMEQ = record
-    fCenter: FLOAT;
-    fBandwidth: FLOAT;
-    fGain: FLOAT;
-  end;
-
-  BASS_FXREVERB = record
-    fInGain: FLOAT;                // [-96.0,0.0]            default: 0.0 dB
-    fReverbMix: FLOAT;             // [-96.0,0.0]            default: 0.0 db
-    fReverbTime: FLOAT;            // [0.001,3000.0]         default: 1000.0 ms
-    fHighFreqRTRatio: FLOAT;       // [0.001,0.999]          default: 0.001
-  end;
-
-  // callback function types
-  STREAMPROC = function(handle: HSTREAM; buffer: Pointer; length: DWORD; user: DWORD): DWORD; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF}
-  {
-    User stream callback function. NOTE: A stream function should obviously be as
-    quick as possible, other streams (and MOD musics) can't be mixed until
-    it's finished.
-    handle : The stream that needs writing
-    buffer : Buffer to write the samples in
-    length : Number of bytes to write
-    user   : The 'user' parameter value given when calling BASS_StreamCreate
-    RETURN : Number of bytes written. Set the BASS_STREAMPROC_END flag to end
-             the stream.
-  }
-
-  STREAMFILEPROC = function(action, param1, param2, user: DWORD): DWORD; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF}
-  {  
-    User file stream callback function.
-    action : The action to perform, one of BASS_FILE_xxx values.
-    param1 : Depends on "action"
-    param2 : Depends on "action"
-    user   : The 'user' parameter value given when calling BASS_StreamCreate
-    RETURN : Depends on "action"
-  }
-
-  DOWNLOADPROC = procedure(buffer: Pointer; length: DWORD; user: DWORD); {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF}
-  {
-    Internet stream download callback function.
-    buffer : Buffer containing the downloaded data... NULL=end of download
-    length : Number of bytes in the buffer
-    user   : The 'user' parameter value given when calling BASS_StreamCreateURL
-  }
-
-  SYNCPROC = procedure(handle: HSYNC; channel, data: DWORD; user: DWORD); {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF}
-  {
-    Sync callback function. NOTE: a sync callback function should be very
-    quick as other syncs cannot be processed until it has finished. If the
-    sync is a "mixtime" sync, then other streams and MOD musics can not be
-    mixed until it's finished either.
-    handle : The sync that has occured
-    channel: Channel that the sync occured in
-    data   : Additional data associated with the sync's occurance
-    user   : The 'user' parameter given when calling BASS_ChannelSetSync
-  }
-
-  DSPPROC = procedure(handle: HDSP; channel: DWORD; buffer: Pointer; length: DWORD; user: DWORD); {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF}
-  {
-    DSP callback function. NOTE: A DSP function should obviously be as quick
-    as possible... other DSP functions, streams and MOD musics can not be
-    processed until it's finished.
-    handle : The DSP handle
-    channel: Channel that the DSP is being applied to
-    buffer : Buffer to apply the DSP to
-    length : Number of bytes in the buffer
-    user   : The 'user' parameter given when calling BASS_ChannelSetDSP
-  }
-
-  RECORDPROC = function(handle: HRECORD; const buffer: Pointer; length: DWORD; user: DWORD): BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF}
-  {
-    Recording callback function.
-    handle : The recording handle
-    buffer : Buffer containing the recorded sample data
-    length : Number of bytes
-    user   : The 'user' parameter value given when calling BASS_RecordStart
-    RETURN : TRUE = continue recording, FALSE = stop
-  }
-
-
-// Functions
-const
-
-{$IFDEF MSWINDOWS}
-  bassdll = 'bass.dll';
-{$ENDIF}
-{$IFDEF DARWIN}
-  bassdll = 'libbass.dylib';
-{$ENDIF}
-
-function BASS_SetConfig(option, value: DWORD): DWORD; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_GetConfig(option: DWORD): DWORD; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_GetVersion: DWORD; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_GetDeviceDescription(device: DWORD): PChar; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_ErrorGetCode: Integer; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_Init(device: Integer; freq, flags: DWORD; win: HWND; clsid: PGUID): BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_SetDevice(device: DWORD): BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_GetDevice: DWORD; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_Free: BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_GetDSoundObject(obj: DWORD): Pointer; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_GetInfo(var info: BASS_INFO): BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_Update: BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_GetCPU: FLOAT; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_Start: BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_Stop: BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_Pause: BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_SetVolume(volume: DWORD): BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_GetVolume: Integer; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-
-function BASS_PluginLoad(filename: PChar; flags: DWORD): HPLUGIN; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_PluginFree(handle: HPLUGIN): BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_PluginGetInfo(handle: HPLUGIN): PBASS_PLUGININFO; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-
-function BASS_Set3DFactors(distf, rollf, doppf: FLOAT): BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_Get3DFactors(var distf, rollf, doppf: FLOAT): BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_Set3DPosition(var pos, vel, front, top: BASS_3DVECTOR): BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_Get3DPosition(var pos, vel, front, top: BASS_3DVECTOR): BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-procedure BASS_Apply3D; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-{$IFDEF MSWINDOWS}
-function BASS_SetEAXParameters(env: Integer; vol, decay, damp: FLOAT): BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_GetEAXParameters(var env: DWORD; var vol, decay, damp: FLOAT): BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-{$ENDIF}
-
-function BASS_MusicLoad(mem: BOOL; f: Pointer; offset, length, flags, freq: DWORD): HMUSIC; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_MusicFree(handle: HMUSIC): BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_MusicSetAttribute(handle: HMUSIC; attrib,value: DWORD): DWORD; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_MusicGetAttribute(handle: HMUSIC; attrib: DWORD): DWORD; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_MusicGetOrders(handle: HMUSIC): DWORD; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_MusicGetOrderPosition(handle: HMUSIC): DWORD; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-
-function BASS_SampleLoad(mem: BOOL; f: Pointer; offset, length, max, flags: DWORD): HSAMPLE; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_SampleCreate(length, freq, chans, max, flags: DWORD): Pointer; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_SampleCreateDone: HSAMPLE; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_SampleFree(handle: HSAMPLE): BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_SampleGetInfo(handle: HSAMPLE; var info: BASS_SAMPLE): BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_SampleSetInfo(handle: HSAMPLE; var info: BASS_SAMPLE): BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_SampleGetChannel(handle: HSAMPLE; onlynew: BOOL): HCHANNEL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_SampleGetChannels(handle: HSAMPLE; channels: Pointer): DWORD; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_SampleStop(handle: HSAMPLE): BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-
-function BASS_StreamCreate(freq, chans, flags: DWORD; proc: Pointer; user: DWORD): HSTREAM; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_StreamCreateFile(mem: BOOL; f: Pointer; offset, length, flags: DWORD): HSTREAM; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_StreamCreateURL(url: PChar; offset: DWORD; flags: DWORD; proc: DOWNLOADPROC; user: DWORD):HSTREAM; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_StreamCreateFileUser(buffered: BOOL; flags: DWORD; proc: STREAMFILEPROC; user: DWORD): HSTREAM; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_StreamFree(handle: HSTREAM): BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_StreamGetFilePosition(handle:HSTREAM; mode:DWORD) : DWORD;{$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF}external bassdll;
-function BASS_StreamGetLength(handle: DWORD): QWORD; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external  bassdll name 'BASS_ChannelGetLength';
-
-function BASS_RecordGetDeviceDescription(devnum: DWORD):PChar;{$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF}external bassdll;
-function BASS_RecordInit(device: Integer):BOOL;{$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF}external bassdll;
-function BASS_RecordSetDevice(device: DWORD): BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_RecordGetDevice: DWORD; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_RecordFree:BOOL;{$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF}external bassdll;
-function BASS_RecordGetInfo(var info:BASS_RECORDINFO):BOOL;{$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF}external bassdll;
-function BASS_RecordGetInputName(input:Integer):PChar;{$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF}external bassdll;
-function BASS_RecordSetInput(input:Integer; setting:DWORD):BOOL;{$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF}external bassdll;
-function BASS_RecordGetInput(input:Integer):DWORD;{$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF}external bassdll;
-function BASS_RecordStart(freq,chans,flags:DWORD; proc:RECORDPROC; user:DWORD):HRECORD;{$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF}external bassdll;
-
-function BASS_ChannelBytes2Seconds(handle: DWORD; pos: QWORD): FLOAT; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF}external bassdll;
-function BASS_ChannelSeconds2Bytes(handle: DWORD; pos: FLOAT): QWORD; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF}external bassdll;
-function BASS_ChannelGetDevice(handle: DWORD): DWORD; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_ChannelSetDevice(handle, device: DWORD): BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_ChannelIsActive(handle: DWORD): DWORD; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF}external bassdll;
-function BASS_ChannelGetInfo(handle: DWORD; var info:BASS_CHANNELINFO):BOOL;{$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF}external bassdll;
-function BASS_ChannelGetTags(handle: HSTREAM; tags : DWORD): PChar; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_ChannelSetFlags(handle, flags: DWORD): BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_ChannelPreBuf(handle, length: DWORD): BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_ChannelPlay(handle: DWORD; restart: BOOL): BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_ChannelStop(handle: DWORD): BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_ChannelPause(handle: DWORD): BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_ChannelSetAttributes(handle: DWORD; freq, volume, pan: Integer): BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_ChannelGetAttributes(handle: DWORD; var freq, volume: DWORD; var pan: Integer): BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_ChannelSlideAttributes(handle: DWORD; freq, volume, pan: Integer; time: DWORD): BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_ChannelIsSliding(handle: DWORD): DWORD; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF}external bassdll;
-function BASS_ChannelSet3DAttributes(handle: DWORD; mode: Integer; min, max: FLOAT; iangle, oangle, outvol: Integer): BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_ChannelGet3DAttributes(handle: DWORD; var mode: DWORD; var min, max: FLOAT; var iangle, oangle, outvol: DWORD): BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_ChannelSet3DPosition(handle: DWORD; var pos, orient, vel: BASS_3DVECTOR): BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_ChannelGet3DPosition(handle: DWORD; var pos, orient, vel: BASS_3DVECTOR): BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_ChannelGetLength(handle: DWORD): QWORD; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_ChannelSetPosition(handle: DWORD; pos: QWORD): BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_ChannelGetPosition(handle: DWORD): QWORD; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_ChannelGetLevel(handle: DWORD): DWORD; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_ChannelGetData(handle: DWORD; buffer: Pointer; length: DWORD): DWORD; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_ChannelSetSync(handle: DWORD; stype: DWORD; param: QWORD; proc: SYNCPROC; user: DWORD): HSYNC; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_ChannelRemoveSync(handle: DWORD; sync: HSYNC): BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_ChannelSetDSP(handle: DWORD; proc: DSPPROC; user: DWORD; priority: Integer): HDSP; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_ChannelRemoveDSP(handle: DWORD; dsp: HDSP): BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-{$IFDEF MSWINDOWS}
-function BASS_ChannelSetEAXMix(handle: DWORD; mix: FLOAT): BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_ChannelGetEAXMix(handle: DWORD; var mix: FLOAT): BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-{$ENDIF}
-function BASS_ChannelSetLink(handle, chan: DWORD): BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_ChannelRemoveLink(handle, chan: DWORD): BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_ChannelSetFX(handle, etype: DWORD; priority: Integer): HFX; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_ChannelRemoveFX(handle: DWORD; fx: HFX): BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-
-function BASS_FXSetParameters(handle: HFX; par: Pointer): BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_FXGetParameters(handle: HFX; par: Pointer): BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-function BASS_FXReset(handle: HFX): BOOL; {$IFDEF DLL_STDCALL} stdcall; {$ENDIF} {$IFDEF DLL_CDECL} cdecl; {$ENDIF} external bassdll;
-
-
-function BASS_SPEAKER_N(n: DWORD): DWORD;
-function MAKEMUSICPOS(order,row: DWORD): DWORD;
-{$IFDEF MSWINDOWS}
-function BASS_SetEAXPreset(env: Integer): BOOL;
-{
-  This function is defined in the implementation part of this unit.
-  It is not part of BASS.DLL but an extra function which makes it easier
-  to set the predefined EAX environments.
-  env    : a EAX_ENVIRONMENT_xxx constant
-}
-{$ENDIF}
-
-implementation
-
-function BASS_SPEAKER_N(n: DWORD): DWORD;
-begin
-  Result := n shl 24;
-end;
-
-function MAKEMUSICPOS(order,row: DWORD): DWORD;
-begin
-  Result := $80000000 or DWORD(MAKELONG(order,row));
-end;
-
-{$IFDEF MSWINDOWS}
-function BASS_SetEAXPreset(env: Integer): BOOL;
-begin
-  case (env) of
-    EAX_ENVIRONMENT_GENERIC:
-      Result := BASS_SetEAXParameters(EAX_ENVIRONMENT_GENERIC, 0.5, 1.493, 0.5);
-    EAX_ENVIRONMENT_PADDEDCELL:
-      Result := BASS_SetEAXParameters(EAX_ENVIRONMENT_PADDEDCELL, 0.25, 0.1, 0);
-    EAX_ENVIRONMENT_ROOM:
-      Result := BASS_SetEAXParameters(EAX_ENVIRONMENT_ROOM, 0.417, 0.4, 0.666);
-    EAX_ENVIRONMENT_BATHROOM:
-      Result := BASS_SetEAXParameters(EAX_ENVIRONMENT_BATHROOM, 0.653, 1.499, 0.166);
-    EAX_ENVIRONMENT_LIVINGROOM:
-      Result := BASS_SetEAXParameters(EAX_ENVIRONMENT_LIVINGROOM, 0.208, 0.478, 0);
-    EAX_ENVIRONMENT_STONEROOM:
-      Result := BASS_SetEAXParameters(EAX_ENVIRONMENT_STONEROOM, 0.5, 2.309, 0.888);
-    EAX_ENVIRONMENT_AUDITORIUM:
-      Result := BASS_SetEAXParameters(EAX_ENVIRONMENT_AUDITORIUM, 0.403, 4.279, 0.5);
-    EAX_ENVIRONMENT_CONCERTHALL:
-      Result := BASS_SetEAXParameters(EAX_ENVIRONMENT_CONCERTHALL, 0.5, 3.961, 0.5);
-    EAX_ENVIRONMENT_CAVE:
-      Result := BASS_SetEAXParameters(EAX_ENVIRONMENT_CAVE, 0.5, 2.886, 1.304);
-    EAX_ENVIRONMENT_ARENA:
-      Result := BASS_SetEAXParameters(EAX_ENVIRONMENT_ARENA, 0.361, 7.284, 0.332);
-    EAX_ENVIRONMENT_HANGAR:
-      Result := BASS_SetEAXParameters(EAX_ENVIRONMENT_HANGAR, 0.5, 10.0, 0.3);
-    EAX_ENVIRONMENT_CARPETEDHALLWAY:
-      Result := BASS_SetEAXParameters(EAX_ENVIRONMENT_CARPETEDHALLWAY, 0.153, 0.259, 2.0);
-    EAX_ENVIRONMENT_HALLWAY:
-      Result := BASS_SetEAXParameters(EAX_ENVIRONMENT_HALLWAY, 0.361, 1.493, 0);
-    EAX_ENVIRONMENT_STONECORRIDOR:
-      Result := BASS_SetEAXParameters(EAX_ENVIRONMENT_STONECORRIDOR, 0.444, 2.697, 0.638);
-    EAX_ENVIRONMENT_ALLEY:
-      Result := BASS_SetEAXParameters(EAX_ENVIRONMENT_ALLEY, 0.25, 1.752, 0.776);
-    EAX_ENVIRONMENT_FOREST:
-      Result := BASS_SetEAXParameters(EAX_ENVIRONMENT_FOREST, 0.111, 3.145, 0.472);
-    EAX_ENVIRONMENT_CITY:
-      Result := BASS_SetEAXParameters(EAX_ENVIRONMENT_CITY, 0.111, 2.767, 0.224);
-    EAX_ENVIRONMENT_MOUNTAINS:
-      Result := BASS_SetEAXParameters(EAX_ENVIRONMENT_MOUNTAINS, 0.194, 7.841, 0.472);
-    EAX_ENVIRONMENT_QUARRY:
-      Result := BASS_SetEAXParameters(EAX_ENVIRONMENT_QUARRY, 1, 1.499, 0.5);
-    EAX_ENVIRONMENT_PLAIN:
-      Result := BASS_SetEAXParameters(EAX_ENVIRONMENT_PLAIN, 0.097, 2.767, 0.224);
-    EAX_ENVIRONMENT_PARKINGLOT:
-      Result := BASS_SetEAXParameters(EAX_ENVIRONMENT_PARKINGLOT, 0.208, 1.652, 1.5);
-    EAX_ENVIRONMENT_SEWERPIPE:
-      Result := BASS_SetEAXParameters(EAX_ENVIRONMENT_SEWERPIPE, 0.652, 2.886, 0.25);
-    EAX_ENVIRONMENT_UNDERWATER:
-      Result := BASS_SetEAXParameters(EAX_ENVIRONMENT_UNDERWATER, 1, 1.499, 0);
-    EAX_ENVIRONMENT_DRUGGED:
-      Result := BASS_SetEAXParameters(EAX_ENVIRONMENT_DRUGGED, 0.875, 8.392, 1.388);
-    EAX_ENVIRONMENT_DIZZY:
-      Result := BASS_SetEAXParameters(EAX_ENVIRONMENT_DIZZY, 0.139, 17.234, 0.666);
-    EAX_ENVIRONMENT_PSYCHOTIC:
-      Result := BASS_SetEAXParameters(EAX_ENVIRONMENT_PSYCHOTIC, 0.486, 7.563, 0.806);
-    else
-      Result := FALSE;
-  end;
-end;
-{$ENDIF}
-
-end.
-// END OF FILE /////////////////////////////////////////////////////////////////
-