All pastes #802949 Raw Edit

Stuff

public text v1 · immutable
#802949 ·published 2007-11-30 19:45 UTC
rendered paste body
#include "bass.h"
#include "tune.h"
HWND win=NULL;
DWORD chan;

BOOL PlayFile()
{
	if (!(chan=BASS_StreamCreateFile(FALSE,theTune,0,0,BASS_SAMPLE_LOOP))
		&& !(chan=BASS_MusicLoad(1,theTune,0,0,BASS_MUSIC_RAMP|BASS_MUSIC_SURROUND2|BASS_SAMPLE_LOOP,0))) {
		}
	BASS_ChannelPlay(chan,FALSE);
	return TRUE;
}

int PASCAL WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance,LPSTR lpCmdLine, int nCmdShow)
{
if (!BASS_Init(-1,44100,0,0,NULL)) {
		return -1;
			}
			if (!PlayFile()) {
				BASS_Free();
				return -1;
			}
while (GetAsyncKeyState(VK_ESCAPE)>=0) 
	{ 
		Sleep(1000); 
	}
	return 0;
}