BASS audio library v2.4 PureBasic 4.20 includes.

[energy]

Hi!
Thanx for yur work...

But theres an error in new Version:

Handle=BASS_StreamCreateFile(0, @FileName, 0, 0, 0)

"@FileName" ... String is requiered, no Pointer...

[zxtunes.com]

"BASS_ChannelSetPosition(Handle,0,#BASS_POS_BYTE) " - #BASS_POS_BYTE not found!

[Perkin]

#BASS_POS_BYTE = 0

From bass.h

[Rescator]

I'll submit new includes some time in the future, except for a constant here and there the current includes are ok. The BASS programmer is working on more features (no ETA) so when that is released I'll obviously update the includes and submit them to Ian so they can be downloaded from the BASS site.

[Gandalf42]

Bit of a newb and I'm just getting started with PureBasic... and Bass. I'm trying to come up with an automated jukebox.. of sorts, to build into an application. I was wondering if anyone has made an library (i.e. procedures) to interface with the Bass library.. specifically a procedure that you can pass a filename to and have it play it. And perhaps another to tell if the current song has finished.

[SeregaZ]

have you 6 channels of equalizer? i mean each channel in 5.1 system have his own equalizer setup.

[Rescator]

The dev files at un4seen.com for PureBasic is really outdated.
The following is just a working include for bass. (bass.pbi)

And works with the latest v2.4.10 of BASS (it is used with http://player.gridstream.org/ in case anyone are wondering).
Unless somebody else really feel like updating the package at un4seen (just do so and email Ian and he'll update the PB package there), I might provide updated include files in the not too distant future (later this fall probably, no ETA, sorry).

For now this will hopefully hold folks over (it is not cross platform, and may not be 100% complete compared to the c includes shipped with BASS itself):

Code: Select all

;BASS 2.4.9.0 C/C++ header file, copyright (c) 1999-2012 Ian Luck.
;Please report bugs/suggestions/etc... To bass@un4seen.com
;
;See the BASS.CHM file for implementation documentation
;
;BASS v2.4.9.0 include for PureBasic v4.61
;C to PB adaption by Roger "Rescator" Hågensen, 20th June 2012, http://www.EmSai.net/

;Needed by some code in this include and various other BASS sourcecodes.
Macro LOBYTE(a) : ((a)&$ff) : EndMacro
Macro HIBYTE(a) : (((a)>>8)&$ff) : EndMacro
Macro LOWORD(a) : ((a)&$ffff) : EndMacro
Macro HIWORD(a) : (((a)>>16)&$ffff) : EndMacro
Macro MAKEWORD(a,b) : (((a)&$ff)|((b)<<8)) : EndMacro
Macro MAKELONG(a,b) : (((a)&$ffff)|((b)<<16)) : EndMacro

;Ready? Here we go...

#BASSVERSION=$204 ;API version
#BASSVERSIONTEXT="2.4"

;C to PB comment:
;PureBasic has no direct match for C like typedefs, just treat these as longs instead.
;HMUSIC is a long,	MOD music handle
;HSAMPLE is a long,	sample handle
;HCHANNEL is a long,	playing sample's channel handle
;HSTREAM is a long,	sample stream handle
;HRECORD is a long,	recording handle
;HSYNC is a long,	synchronizer handle
;HDSP is a long,	DSP handle
;HFX is a long,	DX8 effect handle
;HPLUGIN is a long,	Plugin handle

;- BASS 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/valid driver
#BASS_ERROR_BUFLOST	=4		;the sample buffer was lost
#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
#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 available
#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_ENDED		=45	;the channel/file has ended
#BASS_ERROR_BUSY		=46	;the device is busy
#BASS_ERROR_UNKNOWN	=-1	;some other mystery error

;- BASS_SetConfig options
#BASS_CONFIG_BUFFER				=0
#BASS_CONFIG_UPDATEPERIOD		=1
#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_PASSIVE		=18
#BASS_CONFIG_REC_BUFFER			=19
#BASS_CONFIG_NET_PLAYLIST		=21
#BASS_CONFIG_MUSIC_VIRTUAL		=22
#BASS_CONFIG_VERIFY				=23
#BASS_CONFIG_UPDATETHREADS		=24
#BASS_CONFIG_DEV_BUFFER			=27
#BASS_CONFIG_VISTA_TRUEPOS		=30
#BASS_CONFIG_IOS_MIXAUDIO		=34
#BASS_CONFIG_DEV_DEFAULT		=36
#BASS_CONFIG_NET_READTIMEOUT	=37
#BASS_CONFIG_VISTA_SPEAKERS	=38
#BASS_CONFIG_IOS_SPEAKER		=39
#BASS_CONFIG_HANDLES				=41
#BASS_CONFIG_UNICODE				=42
#BASS_CONFIG_SRC					=43
#BASS_CONFIG_SRC_SAMPLE			=44

;- BASS_SetConfigPtr options
#BASS_CONFIG_NET_AGENT	=16
#BASS_CONFIG_NET_PROXY	=17

;- 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
#BASS_DEVICE_LATENCY		=$100		;calculate device latency (BASS_INFO struct)
#BASS_DEVICE_CPSPEAKERS	=$400		;detect speakers via Windows control panel
#BASS_DEVICE_SPEAKERS	=$800		;force enabling of speaker assignment
#BASS_DEVICE_NOSPEAKER	=$1000	;ignore speaker arrangement
#BASS_DEVICE_DMIX			=$2000	;use ALSA "dmix" plugin
#BASS_DEVICE_FREQ			=$4000	;set device sample rate


;- DirectSound interfaces (For use With BASS_GetDSoundObject)
#BASS_OBJECT_DS		=1	;IDirectSound
#BASS_OBJECT_DS3DL	=2	;IDirectSound3DListener

;- Device info structure
Structure BASS_DEVICEINFO
	*name   ;description
	*driver ;driver
	flags.l
EndStructure

;- BASS_DEVICEINFO flags
#BASS_DEVICE_ENABLED	=$1
#BASS_DEVICE_DEFAULT	=$2
#BASS_DEVICE_INIT		=$4

Structure BASS_INFO
	flags.l     ;device capabilities (DSCAPS_xxx flags)
	hwsize.l    ;size of total device hardware memory
	hwfree.l    ;size of free device hardware memory
	freesam.l   ;number of free sample slots in the hardware
	free3d.l    ;number of free 3D sample slots in the hardware
	minrate.l   ;min sample rate supported by the hardware
	maxrate.l   ;max sample rate supported by the hardware
	eax.l       ;device supports EAX? (always FALSE if BASS_DEVICE_3D was not used)
	minbuf.l    ;recommended minimum buffer length in ms (requires BASS_DEVICE_LATENCY)
	dsver.l     ;DirectSound version
	latency.l   ;delay (in ms) before start of playback (requires BASS_DEVICE_LATENCY)
	initflags.l ;BASS_Init "flags" parameter
	speakers.l  ;number of speakers available
	freq.l      ;current output rate (Vista/OSX only)
EndStructure

;- 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
#DSCAPS_SECONDARYMONO   =$00000100	;mono
#DSCAPS_SECONDARYSTEREO =$00000200	;stereo
#DSCAPS_SECONDARY8BIT   =$00000400	;8 bit
#DSCAPS_SECONDARY16BIT  =$00000800	;16 bit

;- Recording device info Structure
Structure BASS_RECORDINFO
	flags.l    ;device capabilities (DSCCAPS_xxx flags)
	formats.l  ;supported standard formats (WAVE_FORMAT_xxx flags)
	inputs.l   ;number of inputs
	singlein.l ;TRUE = only 1 input can be set at a time
	freq.l     ;current input rate (Vista/OSX only)
EndStructure

;- 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 structure
Structure BASS_SAMPLE
	freq.l     ;default playback rate
	volume.f   ;default volume (0-1)
	pan.f      ;default pan (-1=left, 0=middle, 1=right)
	flags.l    ;BASS_SAMPLE_xxx flags
	length.l   ;length (in bytes)
	max.l      ;maximum simultaneous playbacks
	origres.l  ;original resolution bits
	chans.l    ;number of channels
	mingap.l   ;minimum gap (ms) between creating channels
	mode3d.l   ;BASS_3DMODE_xxx mode
	mindist.f  ;minimum distance
	maxdist.f  ;maximum distance
	iangle.l   ;angle of inside projection cone
	oangle.l   ;angle of outside projection cone
	outvol.f   ;delta-volume outside the projection cone
	vam.l      ;voice allocation/management flags (BASS_VAM_xxx)
	priority.l ;priority (0=lowest, 0xffffffff=highest)
EndStructure

;- SAMPLE flags
#BASS_SAMPLE_8BITS     =1      ;8 bit
#BASS_SAMPLE_FLOAT     =256    ;32-bit floating-point
#BASS_SAMPLE_MONO      =2      ;mono
#BASS_SAMPLE_LOOP      =4      ;looped
#BASS_SAMPLE_3D        =8      ;3D functionality
#BASS_SAMPLE_SOFTWARE  =16     ;not using hardware mixing
#BASS_SAMPLE_MUTEMAX   =32     ;mute at max distance (3D only)
#BASS_SAMPLE_VAM       =64     ;DX7 voice allocation & management
#BASS_SAMPLE_FX        =128    ;old implementation of DX8 effects
#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)

;- STREAM flags
#BASS_STREAM_PRESCAN  =$20000  ;enable pin-point seeking/length (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

;- MUSIC flags
#BASS_MUSIC_FLOAT      =#BASS_SAMPLE_FLOAT
#BASS_MUSIC_MONO       =#BASS_SAMPLE_MONO
#BASS_MUSIC_LOOP       =#BASS_SAMPLE_LOOP
#BASS_MUSIC_3D         =#BASS_SAMPLE_3D
#BASS_MUSIC_FX         =#BASS_SAMPLE_FX
#BASS_MUSIC_AUTOFREE   =#BASS_STREAM_AUTOFREE
#BASS_MUSIC_DECODE     =#BASS_STREAM_DECODE
#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 sample mixing
#BASS_MUSIC_SINCINTER  =$800000 ;sinc interpolated sample 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      =$01000000 ;front speakers
#BASS_SPEAKER_REAR       =$02000000 ;rear/side speakers
#BASS_SPEAKER_CENLFE     =$03000000 ;center & LFE speakers (5.1)
#BASS_SPEAKER_REAR2      =$04000000 ;rear center speakers (7.1)
Macro BASS_SPEAKER_N(n) : (n<<24) : EndMacro ;n'th pair of speakers (max 15)
#BASS_SPEAKER_LEFT       =$10000000 ;modifier: left
#BASS_SPEAKER_RIGHT      =$20000000 ;modifier: right
#BASS_SPEAKER_FRONTLEFT  =#BASS_SPEAKER_FRONT|#BASS_SPEAKER_LEFT
#BASS_SPEAKER_FRONTRIGHT =#BASS_SPEAKER_FRONT|#BASS_SPEAKER_RIGHT
#BASS_SPEAKER_REARLEFT   =#BASS_SPEAKER_REAR|#BASS_SPEAKER_LEFT
#BASS_SPEAKER_REARRIGHT  =#BASS_SPEAKER_REAR|#BASS_SPEAKER_RIGHT
#BASS_SPEAKER_CENTER     =#BASS_SPEAKER_CENLFE|#BASS_SPEAKER_LEFT
#BASS_SPEAKER_LFE        =#BASS_SPEAKER_CENLFE|#BASS_SPEAKER_RIGHT
#BASS_SPEAKER_REAR2LEFT  =#BASS_SPEAKER_REAR2|#BASS_SPEAKER_LEFT
#BASS_SPEAKER_REAR2RIGHT =#BASS_SPEAKER_REAR2|#BASS_SPEAKER_RIGHT

#BASS_UNICODE =$80000000

#BASS_RECORD_PAUSE =$8000 ;start recording paused

;- DX7 voice allocation & management flags
#BASS_VAM_HARDWARE  =1
#BASS_VAM_SOFTWARE  =2
#BASS_VAM_TERM_TIME =4
#BASS_VAM_TERM_DIST =8
#BASS_VAM_TERM_PRIO =16

;- BASS Structures
Structure BASS_CHANNELINFO
	freq.l		;default playback rate
	chans.l		;channels
	flags.l		;BASS_SAMPLE/STREAM/MUSIC/SPEAKER flags
	ctype.l		;type of channel
	origres.l	;original resolution
	plugin.l		;plugin handle
	sample.l		;sample
	*filename	;filename
EndStructure

;- 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_CA			=$10007
#BASS_CTYPE_STREAM_MF			=$10008
#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

Structure BASS_PLUGINFORM
	ctype.l ;channel type
	*name ;format description
	*exts ;file extension filter (*.ext1;*.ext2;etc...)
EndStructure

Structure BASS_PLUGININFO
	version.l ;version (same form as BASS_GetVersion)
	formatc.l ;number of formats
	*formats.BASS_PLUGINFORM ;the array of formats
EndStructure

;- 3D vector (For 3D positions/velocities/orientations)
Structure BASS_3DVECTOR
	x.f ;+=right, -=left
	y.f ;+=up, -=down
	z.f ;+=front, -=behind
EndStructure

;- 3D channel modes
#BASS_3DMODE_NORMAL		 =0	;normal 3D processing
#BASS_3DMODE_RELATIVE	=1	;position is relative to the listener
#BASS_3DMODE_OFF			   =2	;no 3D processing

;- software 3D mixing algorithms (used With BASS_CONFIG_3DALGORITHM)
#BASS_3DALG_DEFAULT	=0
#BASS_3DALG_OFF		   =1
#BASS_3DALG_FULL		  =2
#BASS_3DALG_LIGHT	  =3

CompilerIf #PB_Compiler_OS=#PB_OS_Windows
	;- EAX environments, use With BASS_SetEAXParameters
	Enumeration 0
		#EAX_ENVIRONMENT_GENERIC
		#EAX_ENVIRONMENT_PADDEDCELL
		#EAX_ENVIRONMENT_ROOM
		#EAX_ENVIRONMENT_BATHROOM
		#EAX_ENVIRONMENT_LIVINGROOM
		#EAX_ENVIRONMENT_STONEROOM
		#EAX_ENVIRONMENT_AUDITORIUM
		#EAX_ENVIRONMENT_CONCERTHALL
		#EAX_ENVIRONMENT_CAVE
		#EAX_ENVIRONMENT_ARENA
		#EAX_ENVIRONMENT_HANGAR
		#EAX_ENVIRONMENT_CARPETEDHALLWAY
		#EAX_ENVIRONMENT_HALLWAY
		#EAX_ENVIRONMENT_STONECORRIDOR
		#EAX_ENVIRONMENT_ALLEY
		#EAX_ENVIRONMENT_FOREST
		#EAX_ENVIRONMENT_CITY
		#EAX_ENVIRONMENT_MOUNTAINS
		#EAX_ENVIRONMENT_QUARRY
		#EAX_ENVIRONMENT_PLAIN
		#EAX_ENVIRONMENT_PARKINGLOT
		#EAX_ENVIRONMENT_SEWERPIPE
		#EAX_ENVIRONMENT_UNDERWATER
		#EAX_ENVIRONMENT_DRUGGED
		#EAX_ENVIRONMENT_DIZZY
		#EAX_ENVIRONMENT_PSYCHOTIC
		
		#EAX_ENVIRONMENT_COUNT			;total number of environments
	EndEnumeration
	
	;EAX presets, usage: BASS_SetEAXParameters(EAX_PRESET_xxx)
	Macro EAX_PRESET_GENERIC         :#EAX_ENVIRONMENT_GENERIC,0.5F,1.493F,0.5F : EndMacro
	Macro EAX_PRESET_PADDEDCELL      :#EAX_ENVIRONMENT_PADDEDCELL,0.25F,0.1F,0.0F : EndMacro
	Macro EAX_PRESET_ROOM            :#EAX_ENVIRONMENT_ROOM,0.417F,0.4F,0.666F : EndMacro
	Macro EAX_PRESET_BATHROOM        :#EAX_ENVIRONMENT_BATHROOM,0.653F,1.499F,0.166F : EndMacro
	Macro EAX_PRESET_LIVINGROOM      :#EAX_ENVIRONMENT_LIVINGROOM,0.208F,0.478F,0.0F : EndMacro
	Macro EAX_PRESET_STONEROOM       :#EAX_ENVIRONMENT_STONEROOM,0.5F,2.309F,0.888F : EndMacro
	Macro EAX_PRESET_AUDITORIUM      :#EAX_ENVIRONMENT_AUDITORIUM,0.403F,4.279F,0.5F : EndMacro
	Macro EAX_PRESET_CONCERTHALL     :#EAX_ENVIRONMENT_CONCERTHALL,0.5F,3.961F,0.5F : EndMacro
	Macro EAX_PRESET_CAVE            :#EAX_ENVIRONMENT_CAVE,0.5F,2.886F,1.304F : EndMacro
	Macro EAX_PRESET_ARENA           :#EAX_ENVIRONMENT_ARENA,0.361F,7.284F,0.332F : EndMacro
	Macro EAX_PRESET_HANGAR          :#EAX_ENVIRONMENT_HANGAR,0.5F,10.0F,0.3F : EndMacro
	Macro EAX_PRESET_CARPETEDHALLWAY :#EAX_ENVIRONMENT_CARPETEDHALLWAY,0.153F,0.259F,2.0F : EndMacro
	Macro EAX_PRESET_HALLWAY         :#EAX_ENVIRONMENT_HALLWAY,0.361F,1.493F,0.0F : EndMacro
	Macro EAX_PRESET_STONECORRIDOR   :#EAX_ENVIRONMENT_STONECORRIDOR,0.444F,2.697F,0.638F : EndMacro
	Macro EAX_PRESET_ALLEY           :#EAX_ENVIRONMENT_ALLEY,0.25F,1.752F,0.776F : EndMacro
	Macro EAX_PRESET_FOREST          :#EAX_ENVIRONMENT_FOREST,0.111F,3.145F,0.472F : EndMacro
	Macro EAX_PRESET_CITY            :#EAX_ENVIRONMENT_CITY,0.111F,2.767F,0.224F : EndMacro
	Macro EAX_PRESET_MOUNTAINS       :#EAX_ENVIRONMENT_MOUNTAINS,0.194F,7.841F,0.472F : EndMacro
	Macro EAX_PRESET_QUARRY          :#EAX_ENVIRONMENT_QUARRY,1.0F,1.499F,0.5F : EndMacro
	Macro EAX_PRESET_PLAIN           :#EAX_ENVIRONMENT_PLAIN,0.097F,2.767F,0.224F : EndMacro
	Macro EAX_PRESET_PARKINGLOT      :#EAX_ENVIRONMENT_PARKINGLOT,0.208F,1.652F,1.5F : EndMacro
	Macro EAX_PRESET_SEWERPIPE       :#EAX_ENVIRONMENT_SEWERPIPE,0.652F,2.886F,0.25F : EndMacro
	Macro EAX_PRESET_UNDERWATER      :#EAX_ENVIRONMENT_UNDERWATER,1.0F,1.499F,0.0F : EndMacro
	Macro EAX_PRESET_DRUGGED         :#EAX_ENVIRONMENT_DRUGGED,0.875F,8.392F,1.388F : EndMacro
	Macro EAX_PRESET_DIZZY           :#EAX_ENVIRONMENT_DIZZY,0.139F,17.234F,0.666F : EndMacro
	Macro EAX_PRESET_PSYCHOTIC       :#EAX_ENVIRONMENT_PSYCHOTIC,0.486F,7.563F,0.806F : EndMacro
CompilerEndIf

;typedef DWORD (CALLBACK STREAMPROC)(HSTREAM handle, void *buffer, DWORD length, void *user);
; 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.

#BASS_STREAMPROC_END	=$80000000	;end of user stream flag

;- special STREAMPROCs
;#STREAMPROC_DUMMY		(STREAMPROC*)0		// "dummy" stream
;#STREAMPROC_PUSH			(STREAMPROC*)-1		// push stream

;special STREAMPROCs
#STREAMPROC_DUMMY=0 ;"dummy" stream
#STREAMPROC_PUSH=-1 ;push stream


;- BASS_StreamCreateFileUser file systems
#STREAMFILE_NOBUFFER		 =0
#STREAMFILE_BUFFER		   =1
#STREAMFILE_BUFFERPUSH	=2

;- User file stream callback functions
;typedef void (CALLBACK FILECLOSEPROC)(void *user);
;typedef QWORD (CALLBACK FILELENPROC)(void *user);
;typedef DWORD (CALLBACK FILEREADPROC)(void *buffer, DWORD length, void *user);
;typedef BOOL (CALLBACK FILESEEKPROC)(QWORD offset, void *user);

Structure BASS_FILEPROCS
	*close
	*length
	*read
	*seek
EndStructure

;- BASS_StreamPutFileData options
#BASS_FILEDATA_END		=0	;end & close the file

;- 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
#BASS_FILEPOS_BUFFER		  =5
#BASS_FILEPOS_SOCKET		  =6

;typedef void (CALLBACK DOWNLOADPROC)(const void *buffer, DWORD length, void *user);
;/* 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 */

;- BASS_ChannelSetSync types
#BASS_SYNC_POS		      =0
#BASS_SYNC_END		      =2
#BASS_SYNC_META		     =4
#BASS_SYNC_SLIDE		    =5
#BASS_SYNC_STALL		    =6
#BASS_SYNC_DOWNLOAD	  =7
#BASS_SYNC_FREE		     =8
#BASS_SYNC_SETPOS	    =11
#BASS_SYNC_MUSICPOS	  =10
#BASS_SYNC_MUSICINST	 =1
#BASS_SYNC_MUSICFX	   =3
#BASS_SYNC_OGG_CHANGE =12
#BASS_SYNC_MIXTIME	   =$40000000	;FLAG: sync at mixtime, else at playtime
#BASS_SYNC_ONETIME	   =$80000000	;FLAG: sync only once, else continuously

;typedef void (CALLBACK SYNCPROC)(HSYNC handle, DWORD channel, DWORD data, void *user);
;Sync callback function. NOTE: a sync callback function should be very
;quick as other syncs can't be processed until it has finished. If the sync
;is a "mixtime" sync, then other streams and MOD musics can't 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 */

;typedef void (CALLBACK DSPPROC)(HDSP handle, DWORD channel, void *buffer, DWORD length, void *user);
;/* 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 */

;typedef BOOL (CALLBACK RECORDPROC)(HRECORD handle, const void *buffer, DWORD length, void *user);
;/* 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 */

;- BASS_ChannelIsActive Return values
#BASS_ACTIVE_STOPPED	=0
#BASS_ACTIVE_PLAYING	=1
#BASS_ACTIVE_STALLED	=2
#BASS_ACTIVE_PAUSED	 =3

;- Channel attributes
#BASS_ATTRIB_FREQ			          =1
#BASS_ATTRIB_VOL				          =2
#BASS_ATTRIB_PAN				          =3
#BASS_ATTRIB_EAXMIX			        =4
#BASS_ATTRIB_NOBUFFER				=5
#BASS_ATTRIB_CPU						=7
#BASS_ATTRIB_SRC						=8
#BASS_ATTRIB_MUSIC_AMPLIFY	   =$100
#BASS_ATTRIB_MUSIC_PANSEP	    =$101
#BASS_ATTRIB_MUSIC_PSCALER	   =$102
#BASS_ATTRIB_MUSIC_BPM		      =$103
#BASS_ATTRIB_MUSIC_SPEED		    =$104
#BASS_ATTRIB_MUSIC_VOL_GLOBAL =$105
#BASS_ATTRIB_MUSIC_VOL_CHAN	  =$200 ;+ channel #
#BASS_ATTRIB_MUSIC_VOL_INST	  =$300 ;+ instrument #

;- 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_FFT256	        =$80000000	;256 sample FFT
#BASS_DATA_FFT512	        =$80000001	;512 FFT
#BASS_DATA_FFT1024	       =$80000002	;1024 FFT
#BASS_DATA_FFT2048	       =$80000003	;2048 FFT
#BASS_DATA_FFT4096	       =$80000004	;4096 FFT
#BASS_DATA_FFT8192	       =$80000005 ;8192 FFT
#BASS_DATA_FFT16384			=$80000006	;16384 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_DATA_FFT_REMOVEDC	=$40	;FFT flag: pre-remove DC bias

;- BASS_ChannelGetTags types : what's returned
#BASS_TAG_ID3		         =0      ;ID3v1 tags : TAG_ID3 structure
#BASS_TAG_ID3V2         =1	     ;ID3v2 tags : variable length block
#BASS_TAG_OGG		         =2	     ;OGG comments : series of null-terminated UTF-8 strings
#BASS_TAG_HTTP		        =3	     ;HTTP headers : series of null-terminated ANSI strings
#BASS_TAG_ICY		         =4	     ;ICY headers : series of null-terminated ANSI strings
#BASS_TAG_META		        =5	     ;ICY metadata : ANSI string
#BASS_TAG_APE					=6	;APE tags : series of null-terminated UTF-8 strings
#BASS_TAG_MP4 					=7	;MP4/iTunes metadata : series of null-terminated UTF-8 strings
#BASS_TAG_VENDOR		      =9	     ;OGG encoder : UTF-8 string
#BASS_TAG_LYRICS3	      =10	    ;Lyric3v2 tag : ASCII string
#BASS_TAG_CA_CODEC	=11	;CoreAudio codec info : TAG_CA_CODEC structure
#BASS_TAG_MF			=13	;Media Foundation tags : series of null-terminated UTF-8 strings
#BASS_TAG_WAVEFORMAT	=14	;WAVE format : WAVEFORMATEEX structure
#BASS_TAG_RIFF_INFO	    =$100   ;RIFF "INFO" tags : series of null-terminated ANSI strings
#BASS_TAG_RIFF_BEXT	=$101 ;RIFF/BWF "bext" tags : TAG_BEXT structure
#BASS_TAG_RIFF_CART	=$102 ;RIFF/BWF "cart" tags : TAG_CART structure
#BASS_TAG_RIFF_DISP	=$103 ;RIFF "DISP" text tag : ANSI string
#BASS_TAG_APE_BINARY	=$1000	;+ index #, binary APE tag : TAG_APE_BINARY structure
#BASS_TAG_MUSIC_NAME		  =$10000	;MOD music name : ANSI string
#BASS_TAG_MUSIC_MESSAGE	=$10001	;MOD message : ANSI string
#BASS_TAG_MUSIC_ORDERS	=$10002	;MOD order list : BYTE array of pattern numbers
#BASS_TAG_MUSIC_INST		  =$10100	;+ instrument #, MOD instrument name : ANSI string
#BASS_TAG_MUSIC_SAMPLE	 =$10300	;+ sample #, MOD sample name : ANSI string

;- ID3v1 tag structure
Structure TAG_ID3
	id.a[3]
	title.a[30]
	artist.a[30]
	album.a[30]
	year.a[4]
	comment.a[30]
	genre.b
EndStructure

;- Binary APE tag structure
Structure TAG_APE_BINARY
	*key
	*data
	length.l
EndStructure

;- BWF "bext" tag structure
Structure TAG_BEXT
	Description.a[256]			;// description
	Originator.a[32]			;// name of the originator
	OriginatorReference.a[32]	;// reference of the originator
	OriginationDate.a[10]		;// date of creation (yyyy-mm-dd)
	OriginationTime.a[8]		;// time of creation (hh-mm-ss)
	TimeReference.q			;// first sample count since midnight (little-endian)
	Version.w					;// BWF version (little-endian)
	UMID.b[64]					;// SMPTE UMID
	Reserved.b[190]
	CodingHistory.a[0]			;// history
EndStructure

;- BWF "cart" tag structures
Structure TAG_CART_TIMER
	dwUsage.l ;FOURCC timer usage ID
	dwValue.l ;timer value in samples from head
EndStructure

Structure TAG_CART
	Version.a[4]				;version of the data structure
	Title.a[64]					;title of cart audio sequence
	Artist.a[64]				;artist or creator name
	CutID.a[64]					;cut number identification
	ClientID.a[64]				;client identification
	Category.a[64]				;category ID, PSA, NEWS, etc
	Classification.a[64]		;classification or auxiliary key
	OutCue.a[64]				;out cue text
	StartDate.a[10]				;yyyy-mm-dd
	StartTime.a[8]				;hh:mm:ss
	EndDate.a[10]				;yyyy-mm-dd
	EndTime.a[8]				;hh:mm:ss
	ProducerAppID.a[64]			;name of vendor or application
	ProducerAppVersion.a[64]	;version of producer application
	UserDef.a[64]			;user defined text
	dwLevelReference.l			;sample value for 0 dB reference
	PostTimer.TAG_CART_TIMER[8]	;8 time markers after head
	Reserved.a[276]
	URL.a[1024]					;uniform resource locator
	TagText.a[0]				;free form text for scripts or tags
EndStructure

;CoreAudio codec info structure
Structure TAG_CA_CODEC
	ftype.l					;file format
	atype.l					;audio format
	*name				;description
EndStructure


; #ifndef _WAVEFORMATEX_
; #define _WAVEFORMATEX_
; #pragma pack(push,1)
; typedef struct tWAVEFORMATEX
; {
; 	WORD wFormatTag;
; 	WORD nChannels;
; 	DWORD nSamplesPerSec;
; 	DWORD nAvgBytesPerSec;
; 	WORD nBlockAlign;
; 	WORD wBitsPerSample;
; 	WORD cbSize;
; } WAVEFORMATEX, *PWAVEFORMATEX, *LPWAVEFORMATEX;
; typedef const WAVEFORMATEX *LPCWAVEFORMATEX;
; #pragma pack(pop)
; #endif


;- BASS_ChannelGetLength/GetPosition/SetPosition modes
#BASS_POS_BYTE			     =0	;byte position
#BASS_POS_MUSIC_ORDER	=1	;order.row position, MAKELONG(order,row)
#BASS_POS_DECODE			=$10000000 ;flag: get the decoding (not playing) position
#BASS_POS_DECODETO		=$20000000 ;flag: decode to the position instead of seeking

;- BASS_RecordSetInput flags
#BASS_INPUT_OFF	=$10000
#BASS_INPUT_ON		=$20000

#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

;DX8 effect types, use with BASS_ChannelSetFX
Enumeration 0
	#BASS_FX_DX8_CHORUS
	#BASS_FX_DX8_COMPRESSOR
	#BASS_FX_DX8_DISTORTION
	#BASS_FX_DX8_ECHO
	#BASS_FX_DX8_FLANGER
	#BASS_FX_DX8_GARGLE
	#BASS_FX_DX8_I3DL2REVERB
	#BASS_FX_DX8_PARAMEQ
	#BASS_FX_DX8_REVERB
EndEnumeration

Structure BASS_DX8_CHORUS
	fWetDryMix.f
	fDepth.f
	fFeedback.f
	fFrequency.f
	lWaveform.l  ;0=triangle, 1=sine
	fDelay.f
	lPhase.l     ;BASS_DX8_PHASE_xxx
EndStructure

Structure BASS_DX8_COMPRESSOR
	fGain.f
	fAttack.f
	fRelease.f
	fThreshold.f
	fRatio.f
	fPredelay.f
EndStructure

Structure BASS_DX8_DISTORTION
	fGain.f
	fEdge.f
	fPostEQCenterFrequency.f
	fPostEQBandwidth.f
	fPreLowpassCutoff.f
EndStructure

Structure BASS_DX8_ECHO
	fWetDryMix.f
	fFeedback.f
	fLeftDelay.f
	fRightDelay.f
	lPanDelay.l
EndStructure

Structure BASS_DX8_FLANGER
	fWetDryMix.f
	fDepth.f
	fFeedback.f
	fFrequency.f
	lWaveform.l	;0=triangle, 1=sine
	fDelay.f
	lPhase.l		  ;BASS_DX8_PHASE_xxx
EndStructure

Structure BASS_DX8_GARGLE
	dwRateHz.l    ;Rate of modulation in hz
	dwWaveShape.l ;0=triangle, 1=square
EndStructure

Structure BASS_DX8_I3DL2REVERB
	lRoom.l               ;[-10000, 0]      default: -1000 mB
	lRoomHF.l             ;[-10000, 0]      default: 0 mB
	flRoomRolloffFactor.f ;[0.0, 10.0]      default: 0.0
	flDecayTime.f         ;[0.1, 20.0]      default: 1.49s
	flDecayHFRatio.f      ;[0.1, 2.0]       default: 0.83
	lReflections.l        ;[-10000, 1000]   default: -2602 mB
	flReflectionsDelay.f  ;[0.0, 0.3]       default: 0.007 s
	lReverb.l             ;[-10000, 2000]   default: 200 mB
	flReverbDelay.f       ;[0.0, 0.1]       default: 0.011 s
	flDiffusion.f         ;[0.0, 100.0]     default: 100.0 %
	flDensity.f           ;[0.0, 100.0]     default: 100.0 %
	flHFReference.f       ;[20.0, 20000.0]  default: 5000.0 Hz
EndStructure

Structure BASS_DX8_PARAMEQ
	fCenter.f
	fBandwidth.f
	fGain.f
EndStructure

Structure BASS_DX8_REVERB
	fInGain.f          ;[-96.0,0.0]            default: 0.0 dB
	fReverbMix.f       ;[-96.0,0.0]            default: 0.0 db
	fReverbTime.f      ;[0.001,3000.0]         default: 1000.0 ms
	fHighFreqRTRatio.f ;[0.001,0.999]          default: 0.001
EndStructure

#BASS_DX8_PHASE_NEG_180 =0
#BASS_DX8_PHASE_NEG_90  =1
#BASS_DX8_PHASE_ZERO    =2
#BASS_DX8_PHASE_90      =3
#BASS_DX8_PHASE_180     =4

;- BASS Functions

Prototype.l BASS_SetConfig(option.l,value.l) : Global BASS_SetConfig.BASS_SetConfig
Prototype.l BASS_GetConfig(option.l) : Global BASS_GetConfig.BASS_GetConfig
Prototype.l BASS_SetConfigPtr(option.l,value$) : Global BASS_SetConfigPtr.BASS_SetConfigPtr
Prototype.l BASS_GetConfigPtr(option.l) : Global BASS_GetConfigPtr.BASS_GetConfigPtr
Prototype.l BASS_GetVersion() : Global BASS_GetVersion.BASS_GetVersion
Prototype.l BASS_ErrorGetCode() : Global BASS_ErrorGetCode.BASS_ErrorGetCode
Prototype.l BASS_GetDeviceInfo(device.l,*info.BASS_DEVICEINFO) : Global BASS_GetDeviceInfo.BASS_GetDeviceInfo
CompilerIf #PB_Compiler_OS=#PB_OS_Windows
	Prototype BASS_Init(device.l,freq.l,flags.l,win.l,*dsguid) : Global BASS_Init.BASS_Init
CompilerElse
	Prototype BASS_Init(device.l,freq.l,flags.l,*win,*dsguid) : Global BASS_Init.BASS_Init
CompilerEndIf
Prototype.l BASS_SetDevice(device.l) : Global BASS_SetDevice.BASS_SetDevice
Prototype.l BASS_GetDevice() : Global BASS_GetDevice.BASS_GetDevice
Prototype.l BASS_Free() : Global BASS_Free.BASS_Free
CompilerIf #PB_Compiler_OS=#PB_OS_Windows
	Prototype.l BASS_GetDSoundObject(object.l) : Global BASS_GetDSoundObject.BASS_GetDSoundObject
CompilerEndIf
Prototype.l BASS_GetInfo(*info) : Global BASS_GetInfo.BASS_GetInfo
Prototype.l BASS_Update(length.l) : Global BASS_Update.BASS_Update
Prototype.f BASS_GetCPU() : Global BASS_GetCPU.BASS_GetCPU
Prototype.l BASS_Start() : Global BASS_Start.BASS_Start
Prototype.l BASS_Stop() : Global BASS_Stop.BASS_Stop
Prototype.l BASS_Pause() : Global BASS_Pause.BASS_Pause
Prototype.l BASS_SetVolume(volume.f) : Global BASS_SetVolume.BASS_SetVolume
Prototype.f BASS_GetVolume() : Global BASS_GetVolume.BASS_GetVolume

Prototype.l BASS_PluginLoad(file$,flags.l) : Global BASS_PluginLoad.BASS_PluginLoad
Prototype.l BASS_PluginFree(handle.l) : Global BASS_PluginFree.BASS_PluginFree
Prototype.l BASS_PluginGetInfo(handle.l) : Global BASS_PluginGetInfo.BASS_PluginGetInfo

Prototype.l BASS_Set3DFactors(distf.f,rollf.f,doppf.f) : Global BASS_Set3DFactors.BASS_Set3DFactors
Prototype.l BASS_Get3DFactors(*distf.Float,*rollf.Float,*doppf.Float) : Global BASS_Get3DFactors.BASS_Get3DFactors
Prototype.l BASS_Set3DPosition(*pos.BASS_3DVECTOR,*vel.BASS_3DVECTOR,*front.BASS_3DVECTOR,*top.BASS_3DVECTOR) : Global BASS_Set3DPosition.BASS_Set3DPosition
Prototype.l BASS_Get3DPosition(*pos.BASS_3DVECTOR,*vel.BASS_3DVECTOR,*front.BASS_3DVECTOR,*top.BASS_3DVECTOR) : Global BASS_Get3DPosition.BASS_Get3DPosition
Prototype.l BASS_Apply3D() : Global BASS_Apply3D.BASS_Apply3D
CompilerIf #PB_Compiler_OS=#PB_OS_Windows
	Prototype.l BASS_SetEAXParameters(env.l,vol.f,decay.f,damp.f) : Global BASS_SetEAXParameters.BASS_SetEAXParameters
	Prototype.l BASS_GetEAXParameters(*env.Long,*vol.Float,*decay.Float,*damp.Float) : Global BASS_GetEAXParameters.BASS_GetEAXParameters
CompilerEndIf

Prototype.l BASS_MusicLoad(mem.l,*file,offset.q,length.l,flags.l,freq.l) : Global BASS_MusicLoad.BASS_MusicLoad
Prototype.l BASS_MusicFree(handle.l) : Global BASS_MusicFree.BASS_MusicFree

Prototype.l BASS_SampleLoad(mem.l,*file,offset.q,length.l,max.l,flags.l) : Global BASS_SampleLoad.BASS_SampleLoad
Prototype.l BASS_SampleCreate(length.l,freq.l,chans.l,max.l,flags.l) : Global BASS_SampleCreate.BASS_SampleCreate
Prototype.l BASS_SampleFree(handle.l) : Global BASS_SampleFree.BASS_SampleFree
Prototype.l BASS_SampleSetData(handle.l,*buffer) : Global BASS_SampleSetData.BASS_SampleSetData
Prototype.l BASS_SampleGetData(handle.l,*buffer) : Global BASS_SampleGetData.BASS_SampleGetData
Prototype.l BASS_SampleGetInfo(handle.l,*info.BASS_SAMPLE) : Global BASS_SampleGetInfo.BASS_SampleGetInfo
Prototype.l BASS_SampleSetInfo(handle.l,*info.BASS_SAMPLE) : Global BASS_SampleSetInfo.BASS_SampleSetInfo
Prototype.l BASS_SampleGetChannel(handle.l,onlynew.l) : Global BASS_SampleGetChannel.BASS_SampleGetChannel
Prototype.l BASS_SampleGetChannels(handle.l,*channels.Long) : Global BASS_SampleGetChannels.BASS_SampleGetChannels
Prototype.l BASS_SampleStop(handle.l) : Global BASS_SampleStop.BASS_SampleStop

Prototype.l BASS_StreamCreate(freq.l,chans.l,flags.l,*proc,*user) : Global BASS_StreamCreate.BASS_StreamCreate : 
Prototype.l BASS_StreamCreateFile(mem.l,*file,offset.q,length.q,flags.l) : Global BASS_StreamCreateFile.BASS_StreamCreateFile
Prototype.l BASS_StreamCreateURL(url$,offset.l,flags.l,*proc,*user) : Global BASS_StreamCreateURL.BASS_StreamCreateURL
Prototype.l BASS_StreamCreateFileUser(system.l,flags.l,*proc,*user) : Global BASS_StreamCreateFileUser.BASS_StreamCreateFileUser
Prototype.l BASS_StreamFree(handle.l) : Global BASS_StreamFree.BASS_StreamFree
Prototype.q BASS_StreamGetFilePosition(handle.l,mode.l) : Global BASS_StreamGetFilePosition.BASS_StreamGetFilePosition
Prototype.l BASS_StreamPutData(handle.l,*buffer,length.l) : Global BASS_StreamPutData.BASS_StreamPutData
Prototype.l BASS_StreamPutFileData(handle.l,*buffer,length.l) : Global BASS_StreamPutFileData.BASS_StreamPutFileData

Prototype.l BASS_RecordGetDeviceInfo(device.l,*info.BASS_DEVICEINFO) : Global BASS_RecordGetDeviceInfo.BASS_RecordGetDeviceInfo
Prototype.l BASS_RecordInit(device.l) : Global BASS_RecordInit.BASS_RecordInit
Prototype.l BASS_RecordSetDevice(device.l) : Global BASS_RecordSetDevice.BASS_RecordSetDevice
Prototype.l BASS_RecordGetDevice() : Global BASS_RecordGetDevice.BASS_RecordGetDevice
Prototype.l BASS_RecordFree() : Global BASS_RecordFree.BASS_RecordFree
Prototype.l BASS_RecordGetInfo(*info.BASS_RECORDINFO) : Global BASS_RecordGetInfo.BASS_RecordGetInfo
Prototype.l BASS_RecordGetInputName(input.l) : Global BASS_RecordGetInputName.BASS_RecordGetInputName
Prototype.l BASS_RecordSetInput(input.l,flags.l,volume.f) : Global BASS_RecordSetInput.BASS_RecordSetInput
Prototype.l BASS_RecordGetInput(input.l,*volume.Float) : Global BASS_RecordGetInput.BASS_RecordGetInput
Prototype.l BASS_RecordStart(freq.l,chans.l,flags.l,*proc,*user) : Global BASS_RecordStart.BASS_RecordStart

Prototype.d BASS_ChannelBytes2Seconds(handle.l,pos.q) : Global BASS_ChannelBytes2Seconds.BASS_ChannelBytes2Seconds
Prototype.q BASS_ChannelSeconds2Bytes(handle.l,pos.d) : Global BASS_ChannelSeconds2Bytes.BASS_ChannelSeconds2Bytes
Prototype.l BASS_ChannelGetDevice(handle.l) : Global BASS_ChannelGetDevice.BASS_ChannelGetDevice
Prototype.l BASS_ChannelSetDevice(handle.l,device.l) : Global BASS_ChannelSetDevice.BASS_ChannelSetDevice
Prototype.l BASS_ChannelIsActive(handle.l) : Global BASS_ChannelIsActive.BASS_ChannelIsActive
Prototype.l BASS_ChannelGetInfo(handle.l,*info.BASS_CHANNELINFO) : Global BASS_ChannelGetInfo.BASS_ChannelGetInfo
Prototype.i BASS_ChannelGetTags(handle.l,tags.l) : Global BASS_ChannelGetTags.BASS_ChannelGetTags
Prototype.l BASS_ChannelFlags(handle.l,flags.l,mask.l) : Global BASS_ChannelFlags.BASS_ChannelFlags
Prototype.l BASS_ChannelUpdate(handle.l,length.l) : Global BASS_ChannelUpdate.BASS_ChannelUpdate
Prototype.l BASS_ChannelLock(handle.l,lock.l) : Global BASS_ChannelLock.BASS_ChannelLock
Prototype.l BASS_ChannelPlay(handle.l,restart.l) : Global BASS_ChannelPlay.BASS_ChannelPlay
Prototype.l BASS_ChannelStop(handle.l) : Global BASS_ChannelStop.BASS_ChannelStop
Prototype.l BASS_ChannelPause(handle.l) : Global BASS_ChannelPause.BASS_ChannelPause
Prototype.l BASS_ChannelSetAttribute(handle.l,attrib.l,value.f) : Global BASS_ChannelSetAttribute.BASS_ChannelSetAttribute
Prototype.l BASS_ChannelGetAttribute(handle.l,attrib.l,*value.Float) : Global BASS_ChannelGetAttribute.BASS_ChannelGetAttribute
Prototype.l BASS_ChannelSlideAttribute(handle.l,attrib.l,value.f,time.l) : Global BASS_ChannelSlideAttribute.BASS_ChannelSlideAttribute
Prototype.l BASS_ChannelIsSliding(handle.l,attrib.l) : Global BASS_ChannelIsSliding.BASS_ChannelIsSliding
Prototype.l BASS_ChannelSet3DAttributes(handle.l,mode.l,min.f,max.f,iangle.l,oangle.l,outvol.f) : Global BASS_ChannelSet3DAttributes.BASS_ChannelSet3DAttributes
Prototype.l BASS_ChannelGet3DAttributes(handle.l,*mode.Long,*min.Float,*max.Float,*iangle.Long,*oangle.Long,*outvol.Float) : Global BASS_ChannelGet3DAttributes.BASS_ChannelGet3DAttributes
Prototype.l BASS_ChannelSet3DPosition(handle.l,*pos.BASS_3DVECTOR,*orient.BASS_3DVECTOR,*vel.BASS_3DVECTOR) : Global BASS_ChannelSet3DPosition.BASS_ChannelSet3DPosition
Prototype.l BASS_ChannelGet3DPosition(handle.l,*pos.BASS_3DVECTOR,*orient.BASS_3DVECTOR,*vel.BASS_3DVECTOR) : Global BASS_ChannelGet3DPosition.BASS_ChannelGet3DPosition
Prototype.q BASS_ChannelGetLength(handle.l,mode.l) : Global BASS_ChannelGetLength.BASS_ChannelGetLength
Prototype.l BASS_ChannelSetPosition(handle.l,pos.q,mode.l) : Global BASS_ChannelSetPosition.BASS_ChannelSetPosition
Prototype.q BASS_ChannelGetPosition(handle.l,mode.l) : Global BASS_ChannelGetPosition.BASS_ChannelGetPosition
Prototype.l BASS_ChannelGetLevel(handle.l) : Global BASS_ChannelGetLevel.BASS_ChannelGetLevel
Prototype.l BASS_ChannelGetData(handle.l,*buffer,length.l) : Global BASS_ChannelGetData.BASS_ChannelGetData
Prototype.l BASS_ChannelSetSync(handle.l,type.l,param.q,*proc,*user) : Global BASS_ChannelSetSync.BASS_ChannelSetSync
Prototype.l BASS_ChannelRemoveSync(handle.l,sync.l) : Global BASS_ChannelRemoveSync.BASS_ChannelRemoveSync
Prototype.l BASS_ChannelSetDSP(handle.l,*proc,*user,priority.l) : Global BASS_ChannelSetDSP.BASS_ChannelSetDSP
Prototype.l BASS_ChannelRemoveDSP(handle.l,dsp.l) : Global BASS_ChannelRemoveDSP.BASS_ChannelRemoveDSP
Prototype.l BASS_ChannelSetLink(handle.l,chan.l) : Global BASS_ChannelSetLink.BASS_ChannelSetLink
Prototype.l BASS_ChannelRemoveLink(handle.l,chan.l) : Global BASS_ChannelRemoveLink.BASS_ChannelRemoveLink
Prototype.l BASS_ChannelSetFX(handle.l,type.l,priority.l) : Global BASS_ChannelSetFX.BASS_ChannelSetFX
Prototype.l BASS_ChannelRemoveFX(handle.l,fx.l) : Global BASS_ChannelRemoveFX.BASS_ChannelRemoveFX

Prototype.l BASS_FXSetParameters(handle.l,*params) : Global BASS_FXSetParameters.BASS_FXSetParameters
Prototype.l BASS_FXGetParameters(handle.l,*params) : Global BASS_FXGetParameters.BASS_FXGetParameters
Prototype.l BASS_FXReset(handle.l) : Global BASS_FXReset.BASS_FXReset

Threaded _BASS_Load_Library_DLL_.i

Procedure BASS_Free_Library()
	If IsLibrary(_BASS_Load_Library_DLL_)
		CloseLibrary(_BASS_Load_Library_DLL_)
	EndIf
EndPRocedure

Procedure.i BASS_Load_Library(dllpath$)
	Protected dll.i,result.i,bass_ver.i,bass_rev.i,bass_subver.i,bass_subrev.i
	If IsLibrary(_BASS_Load_Library_DLL_)
		ProcedureReturn #False
	Else
		_BASS_Load_Library_DLL_=OpenLibrary(#PB_Any,dllpath$)
		dll=_BASS_Load_Library_DLL_
	EndIf
	If IsLibrary(dll)
		BASS_GetVersion=GetFunction(dll,"BASS_GetVersion")
		If BASS_GetVersion
			result=BASS_GetVersion()
			bass_ver=PeekB(@result+3)&$FF
			bass_rev=PeekB(@result+2)&$FF
			bass_subver=PeekB(@result+1)&$FF
			bass_subrev=PeekB(@result+0)&$FF
			If (bass_ver<>2) Or (bass_rev<>4)
				BASS_Free_Library()
				ProcedureReturn #False
			EndIf
		EndIf
		
		BASS_SetConfig=GetFunction(dll,"BASS_SetConfig")
		BASS_GetConfig=GetFunction(dll,"BASS_GetConfig")
		BASS_SetConfigPtr=GetFunction(dll,"BASS_SetConfigPtr")
		BASS_GetConfigPtr=GetFunction(dll,"BASS_GetConfigPtr")
		BASS_ErrorGetCode=GetFunction(dll,"BASS_ErrorGetCode")
		BASS_GetDeviceInfo=GetFunction(dll,"BASS_GetDeviceInfo")
		BASS_Init=GetFunction(dll,"BASS_Init")
		BASS_SetDevice=GetFunction(dll,"BASS_SetDevice")
		BASS_GetDevice=GetFunction(dll,"BASS_GetDevice")
		BASS_Free=GetFunction(dll,"BASS_Free")
		BASS_GetDSoundObject=GetFunction(dll,"BASS_GetDSoundObject")
		BASS_GetInfo=GetFunction(dll,"BASS_GetInfo")
		BASS_Update=GetFunction(dll,"BASS_Update")
		BASS_GetCPU=GetFunction(dll,"BASS_GetCPU")
		BASS_Start=GetFunction(dll,"BASS_Start")
		BASS_Stop=GetFunction(dll,"BASS_Stop")
		BASS_Pause=GetFunction(dll,"BASS_Pause")
		BASS_SetVolume=GetFunction(dll,"BASS_SetVolume")
		BASS_GetVolume=GetFunction(dll,"BASS_GetVolume")
		
		BASS_PluginLoad=GetFunction(dll,"BASS_PluginLoad")
		BASS_PluginFree=GetFunction(dll,"BASS_PluginFree")
		BASS_PluginGetInfo=GetFunction(dll,"BASS_PluginGetInfo")
		
		BASS_Set3DFactors=GetFunction(dll,"BASS_Set3DFactors")
		BASS_Get3DFactors=GetFunction(dll,"BASS_Get3DFactors")
		BASS_Set3DPosition=GetFunction(dll,"BASS_Set3DPosition")
		BASS_Get3DPosition=GetFunction(dll,"BASS_Get3DPosition")
		BASS_Apply3D=GetFunction(dll,"BASS_Apply3D")
		CompilerIf #PB_Compiler_OS=#PB_OS_Windows
			BASS_SetEAXParameters=GetFunction(dll,"BASS_SetEAXParameters")
			BASS_GetEAXParameters=GetFunction(dll,"BASS_GetEAXParameters")
		CompilerEndIf
		
		BASS_MusicLoad=GetFunction(dll,"BASS_MusicLoad")
		BASS_MusicFree=GetFunction(dll,"BASS_MusicFree")
		
		BASS_SampleLoad=GetFunction(dll,"BASS_SampleLoad")
		BASS_SampleCreate=GetFunction(dll,"BASS_SampleCreate")
		BASS_SampleFree=GetFunction(dll,"BASS_SampleFree")
		BASS_SampleSetData=GetFunction(dll,"BASS_SampleSetData")
		BASS_SampleGetData=GetFunction(dll,"BASS_SampleGetData")
		BASS_SampleGetInfo=GetFunction(dll,"BASS_SampleGetInfo")
		BASS_SampleSetInfo=GetFunction(dll,"BASS_SampleSetInfo")
		BASS_SampleGetChannel=GetFunction(dll,"BASS_SampleGetChannel")
		BASS_SampleGetChannels=GetFunction(dll,"BASS_SampleGetChannels")
		BASS_SampleStop=GetFunction(dll,"BASS_SampleStop")
		
		BASS_StreamCreate=GetFunction(dll,"BASS_StreamCreate")
		BASS_StreamCreateFile=GetFunction(dll,"BASS_StreamCreateFile")
		BASS_StreamCreateURL=GetFunction(dll,"BASS_StreamCreateURL")
		BASS_StreamCreateFileUser=GetFunction(dll,"BASS_StreamCreateFileUser")
		BASS_StreamFree=GetFunction(dll,"BASS_StreamFree")
		BASS_StreamGetFilePosition=GetFunction(dll,"BASS_StreamGetFilePosition")
		BASS_StreamPutData=GetFunction(dll,"BASS_StreamPutData")
		BASS_StreamPutFileData=GetFunction(dll,"BASS_StreamPutFileData")
		
		BASS_RecordGetDeviceInfo=GetFunction(dll,"BASS_RecordGetDeviceInfo")
		BASS_RecordInit=GetFunction(dll,"BASS_RecordInit")
		BASS_RecordSetDevice=GetFunction(dll,"BASS_RecordSetDevice")
		BASS_RecordGetDevice=GetFunction(dll,"BASS_RecordGetDevice")
		BASS_RecordFree=GetFunction(dll,"BASS_RecordFree")
		BASS_RecordGetInfo=GetFunction(dll,"BASS_RecordGetInfo")
		BASS_RecordGetInputName=GetFunction(dll,"BASS_RecordGetInputName")
		BASS_RecordSetInput=GetFunction(dll,"BASS_RecordSetInput")
		BASS_RecordGetInput=GetFunction(dll,"BASS_RecordGetInput")
		BASS_RecordStart=GetFunction(dll,"BASS_RecordStart")
		
		BASS_ChannelBytes2Seconds=GetFunction(dll,"BASS_ChannelBytes2Seconds")
		BASS_ChannelSeconds2Bytes=GetFunction(dll,"BASS_ChannelSeconds2Bytes")
		BASS_ChannelGetDevice=GetFunction(dll,"BASS_ChannelGetDevice")
		BASS_ChannelSetDevice=GetFunction(dll,"BASS_ChannelSetDevice")
		BASS_ChannelIsActive=GetFunction(dll,"BASS_ChannelIsActive")
		BASS_ChannelGetInfo=GetFunction(dll,"BASS_ChannelGetInfo")
		BASS_ChannelGetTags=GetFunction(dll,"BASS_ChannelGetTags")
		BASS_ChannelFlags=GetFunction(dll,"BASS_ChannelFlags")
		BASS_ChannelUpdate=GetFunction(dll,"BASS_ChannelUpdate")
		BASS_ChannelLock=GetFunction(dll,"BASS_ChannelLock")
		BASS_ChannelPlay=GetFunction(dll,"BASS_ChannelPlay")
		BASS_ChannelStop=GetFunction(dll,"BASS_ChannelStop")
		BASS_ChannelPause=GetFunction(dll,"BASS_ChannelPause")
		BASS_ChannelSetAttribute=GetFunction(dll,"BASS_ChannelSetAttribute")
		BASS_ChannelGetAttribute=GetFunction(dll,"BASS_ChannelGetAttribute")
		BASS_ChannelSlideAttribute=GetFunction(dll,"BASS_ChannelSlideAttribute")
		BASS_ChannelIsSliding=GetFunction(dll,"BASS_ChannelIsSliding")
		BASS_ChannelSet3DAttributes=GetFunction(dll,"BASS_ChannelSet3DAttributes")
		BASS_ChannelGet3DAttributes=GetFunction(dll,"BASS_ChannelGet3DAttributes")
		BASS_ChannelSet3DPosition=GetFunction(dll,"BASS_ChannelSet3DPosition")
		BASS_ChannelGet3DPosition=GetFunction(dll,"BASS_ChannelGet3DPosition")
		BASS_ChannelGetLength=GetFunction(dll,"BASS_ChannelGetLength")
		BASS_ChannelSetPosition=GetFunction(dll,"BASS_ChannelSetPosition")
		BASS_ChannelGetPosition=GetFunction(dll,"BASS_ChannelGetPosition")
		BASS_ChannelGetLevel=GetFunction(dll,"BASS_ChannelGetLevel")
		BASS_ChannelGetData=GetFunction(dll,"BASS_ChannelGetData")
		BASS_ChannelSetSync=GetFunction(dll,"BASS_ChannelSetSync")
		BASS_ChannelRemoveSync=GetFunction(dll,"BASS_ChannelRemoveSync")
		BASS_ChannelSetDSP=GetFunction(dll,"BASS_ChannelSetDSP")
		BASS_ChannelRemoveDSP=GetFunction(dll,"BASS_ChannelRemoveDSP")
		BASS_ChannelSetLink=GetFunction(dll,"BASS_ChannelSetLink")
		BASS_ChannelRemoveLink=GetFunction(dll,"BASS_ChannelRemoveLink")
		BASS_ChannelSetFX=GetFunction(dll,"BASS_ChannelSetFX")
		BASS_ChannelRemoveFX=GetFunction(dll,"BASS_ChannelRemoveFX")
		
		BASS_FXSetParameters=GetFunction(dll,"BASS_FXSetParameters")
		BASS_FXGetParameters=GetFunction(dll,"BASS_FXGetParameters")
		BASS_FXReset=GetFunction(dll,"BASS_FXReset")
		
		ProcedureReturn #True
	EndIf
EndPRocedure

[karmacomposer]

Can the Bass library be used with PureBasic to create a vsti (virtual instrument)?

I noticed it has soundfont support with BassMidi. If this could be used to create a solid vsti .dll file, it would save my life and allow me to create my custom virtual instruments.

Also, is this 32 bit and 64 bit? Is there a Mac version?

Thanks for your answers.

Mike

[Poshu]

64 bits, as far as I remember, there is an experimental one, but no stable release.
mac, yup.
vsti, uh... No idea.

[oryaaaaa]

ASIO, WASAPI, RAW output source code

BASS, ASIO / WASAPI. Music player
http://www.purebasic.fr/english/viewtop ... 40&t=56584

[minimy]

Hello!
I am new with bass and have some doubts.. Some body can helpme?
Is possible record audio with bass?.
And listen mic without recording?.
Is possible use the mixer?.
And to activate or to deactivate the microphone or line input?
Some example in the forum abou this?

Thanks!

[SeregaZ]

i think for start use mixer need this command:
BASS_Init(-1, 44100, 0, WindowID(#Window_0), #Null)
BASS_RecordInit(-1)
Handle = BASS_RecordStart(44100, 2, 0, @Dummy(), 0)

for more information, but it is russian: http://mirashic.narod.ru/radio_bass_record.htm

[minimy]

i think for start use mixer need this command:
BASS_Init(-1, 44100, 0, WindowID(#Window_0), #Null)
BASS_RecordInit(-1)
Handle = BASS_RecordStart(44100, 2, 0, @Dummy(), 0)

for more information, but it is russian: http://mirashic.narod.ru/radio_bass_record.htm

Thanks SeregaZ!
But is possible mute mic from bass? or change output volume?

[ozzie]

But is possible mute mic from bass? or change output volume?

I'm sure you can mute mic, and you can definitely change output volume. These questions are more related to BASS than PureBasic, so I suggest you try the BASS Forum. I use BASS in my app and regularly follow both Forums (BASS and PureBasic).

[minimy]

Ok!, Thanks ozzie!