FMOD Community Project

The forum is locked. These are the original blitzbasic.com forums, kept so they can still be read. No new topics, replies or edits can be made here. To join in, head over to the Blitz3D+ forums.

Mystik

Here is a quick test for playing mods. No error checking though.

Framework brl.glmax2d
'----------------------
Import brl.retro
Import brl.blitz
Import brl.freeaudioaudio
'Import brl.oggloader   'causes probs with fmod on mac, thats why I had to use framework. Any help?
Import brl.system	
Import pub.fmod




	Graphics 800,600,0,50

	FSOUND_SetOutput(FSOUND_OUTPUT_MAC) ' Ensure you use FSOUND_OUTPUT_MAC 
	
	FSOUND_SetDriver(0)
	
	If Not FSOUND_Init(44100, 32, FSOUND_INIT_USEDEFAULTMIDISYNTH)

		RuntimeError "Init Error "
	Else
		
		Mod_:Int = FMUSIC_LoadSong(cstr("an-path.xm"))
		FMUSIC_SetLooping(Mod_, False)
		FMUSIC_PlaySong(Mod_);

				While Not KeyHit(KEY_ESCAPE)
					Cls
					DrawText "Fmod Mac Test - Press ESCAPE to sxit",0,0
					Flip
				Wend
	
			
		
	EndIf
	
	
	End