282 lines
7.8 KiB
C
282 lines
7.8 KiB
C
/*
|
|
BASS simple playback test
|
|
Copyright (c) 1999-2019 Un4seen Developments Ltd.
|
|
*/
|
|
|
|
#include <windows.h>
|
|
#include <commctrl.h>
|
|
#include <stdio.h>
|
|
#include "bass.h"
|
|
|
|
HWND win = NULL;
|
|
|
|
HSTREAM *strs = NULL;
|
|
int strc = 0;
|
|
HMUSIC *mods = NULL;
|
|
int modc = 0;
|
|
HSAMPLE *sams = NULL;
|
|
int samc = 0;
|
|
|
|
// display error messages
|
|
void Error(const char *es)
|
|
{
|
|
char mes[200];
|
|
sprintf(mes, "%s\n(error code: %d)", es, BASS_ErrorGetCode());
|
|
MessageBox(win, mes, 0, 0);
|
|
}
|
|
|
|
// messaging macros
|
|
#define MESS(id,m,w,l) SendDlgItemMessage(win,id,m,(WPARAM)(w),(LPARAM)(l))
|
|
#define STLM(m,w,l) MESS(10,m,w,l)
|
|
#define MLM(m,w,l) MESS(20,m,w,l)
|
|
#define SLM(m,w,l) MESS(30,m,w,l)
|
|
#define GETSTR() STLM(LB_GETCURSEL,0,0)
|
|
#define GETMOD() MLM(LB_GETCURSEL,0,0)
|
|
#define GETSAM() SLM(LB_GETCURSEL,0,0)
|
|
|
|
INT_PTR CALLBACK dialogproc(HWND h, UINT m, WPARAM w, LPARAM l)
|
|
{
|
|
static OPENFILENAME ofn;
|
|
|
|
switch (m) {
|
|
case WM_TIMER:
|
|
{
|
|
// update the CPU usage display
|
|
char text[10];
|
|
sprintf(text, "%.2f", BASS_GetCPU());
|
|
MESS(40, WM_SETTEXT, 0, text);
|
|
// update volume slider in case it's been changed outside of the app
|
|
MESS(43, TBM_SETPOS, 1, BASS_GetVolume() * 100);
|
|
}
|
|
break;
|
|
|
|
case WM_COMMAND:
|
|
switch (LOWORD(w)) {
|
|
case IDCANCEL:
|
|
EndDialog(h, 0);
|
|
break;
|
|
|
|
case 14:
|
|
{
|
|
char file[MAX_PATH] = "";
|
|
HSTREAM str;
|
|
ofn.lpstrFilter = "Streamable files (wav/aif/mp3/mp2/mp1/ogg)\0*.wav;*.aif;*.mp3;*.mp2;*.mp1;*.ogg\0All files\0*.*\0\0";
|
|
ofn.lpstrFile = file;
|
|
if (GetOpenFileName(&ofn)) {
|
|
if (str = BASS_StreamCreateFile(FALSE, file, 0, 0, 0)) {
|
|
strc++;
|
|
strs = (HSTREAM*)realloc((void*)strs, strc * sizeof(*strs));
|
|
strs[strc - 1] = str;
|
|
STLM(LB_ADDSTRING, 0, strrchr(file, '\\') + 1);
|
|
} else
|
|
Error("Can't open stream");
|
|
}
|
|
}
|
|
break;
|
|
case 15:
|
|
{
|
|
int s = GETSTR();
|
|
if (s != LB_ERR) {
|
|
STLM(LB_DELETESTRING, s, 0);
|
|
BASS_StreamFree(strs[s]); // free the stream
|
|
strc--;
|
|
memcpy(strs + s, strs + s + 1, (strc - s) * sizeof(*strs));
|
|
}
|
|
}
|
|
break;
|
|
case 11:
|
|
{
|
|
int s = GETSTR();
|
|
if (s != LB_ERR)
|
|
if (!BASS_ChannelPlay(strs[s], FALSE)) // play the stream (continue from current position)
|
|
Error("Can't play stream");
|
|
}
|
|
break;
|
|
case 12:
|
|
{
|
|
int s = GETSTR();
|
|
if (s != LB_ERR) BASS_ChannelStop(strs[s]); // stop the stream
|
|
}
|
|
break;
|
|
case 13:
|
|
{
|
|
int s = GETSTR();
|
|
if (s != LB_ERR) BASS_ChannelPlay(strs[s], TRUE); // play the stream from the start
|
|
}
|
|
break;
|
|
|
|
case 24:
|
|
{
|
|
char file[MAX_PATH] = "";
|
|
HMUSIC mod;
|
|
ofn.lpstrFilter = "MOD music files (mo3/xm/mod/s3m/it/mtm/umx)\0*.mo3;*.xm;*.mod;*.s3m;*.it;*.mtm;*.umx\0All files\0*.*\0\0";
|
|
ofn.lpstrFile = file;
|
|
if (GetOpenFileName(&ofn)) {
|
|
// load a music from "file" with ramping enabled
|
|
if (mod = BASS_MusicLoad(FALSE, file, 0, 0, BASS_MUSIC_RAMPS, 1)) {
|
|
modc++;
|
|
mods = (HMUSIC*)realloc((void*)mods, modc * sizeof(*mods));
|
|
mods[modc - 1] = mod;
|
|
MLM(LB_ADDSTRING, 0, strrchr(file, '\\') + 1);
|
|
} else
|
|
Error("Can't load music");
|
|
}
|
|
}
|
|
break;
|
|
case 25:
|
|
{
|
|
int s = GETMOD();
|
|
if (s != LB_ERR) {
|
|
MLM(LB_DELETESTRING, s, 0);
|
|
BASS_MusicFree(mods[s]); // free the music
|
|
modc--;
|
|
memcpy(mods + s, mods + s + 1, (modc - s) * sizeof(*mods));
|
|
}
|
|
}
|
|
break;
|
|
case 21:
|
|
{
|
|
int s = GETMOD();
|
|
if (s != LB_ERR)
|
|
if (!BASS_ChannelPlay(mods[s], FALSE)) // play the music (continue from current position)
|
|
Error("Can't play music");
|
|
}
|
|
break;
|
|
case 22:
|
|
{
|
|
int s = GETMOD();
|
|
if (s != LB_ERR) BASS_ChannelStop(mods[s]); // stop the music
|
|
}
|
|
break;
|
|
case 23:
|
|
{
|
|
int s = GETMOD();
|
|
if (s != LB_ERR) BASS_ChannelPlay(mods[s], TRUE); // play the music from the start
|
|
}
|
|
break;
|
|
|
|
case 32:
|
|
{
|
|
char file[MAX_PATH] = "";
|
|
HSAMPLE sam;
|
|
ofn.lpstrFilter = "Sample files (wav/aif)\0*.wav;*.aif\0All files\0*.*\0\0";
|
|
ofn.lpstrFile = file;
|
|
if (GetOpenFileName(&ofn)) {
|
|
/* Load a sample from "file" and give it a max of 3 simultaneous
|
|
playings using playback position as override decider */
|
|
if (sam = BASS_SampleLoad(FALSE, file, 0, 0, 3, BASS_SAMPLE_OVER_POS)) {
|
|
samc++;
|
|
sams = (HSAMPLE*)realloc((void*)sams, samc * sizeof(*sams));
|
|
sams[samc - 1] = sam;
|
|
SLM(LB_ADDSTRING, 0, strrchr(file, '\\') + 1);
|
|
} else
|
|
Error("Can't load sample");
|
|
}
|
|
}
|
|
break;
|
|
case 33:
|
|
{
|
|
int s = GETSAM();
|
|
if (s != LB_ERR) {
|
|
SLM(LB_DELETESTRING, s, 0);
|
|
BASS_SampleFree(sams[s]); // free the sample
|
|
samc--;
|
|
memcpy(sams + s, sams + s + 1, (samc - s) * sizeof(*sams));
|
|
}
|
|
}
|
|
break;
|
|
case 31:
|
|
{
|
|
int s = GETSAM();
|
|
if (s != LB_ERR) {
|
|
// play the sample (at default rate, volume=50%, random pan position)
|
|
HCHANNEL ch = BASS_SampleGetChannel(sams[s], FALSE);
|
|
BASS_ChannelSetAttribute(ch, BASS_ATTRIB_VOL, 0.5f);
|
|
BASS_ChannelSetAttribute(ch, BASS_ATTRIB_PAN, ((rand() % 201) - 100) / 100.f);
|
|
if (!BASS_ChannelPlay(ch, FALSE))
|
|
Error("Can't play sample");
|
|
}
|
|
}
|
|
break;
|
|
|
|
case 41:
|
|
BASS_Pause(); // pause output
|
|
break;
|
|
case 42:
|
|
BASS_Start(); // resume output
|
|
break;
|
|
case 44:
|
|
BASS_SetConfig(BASS_CONFIG_UPDATETHREADS, MESS(44, BM_GETCHECK, 0, 0) ? 2 : 1); // set 1 or 2 update threads
|
|
break;
|
|
}
|
|
break;
|
|
|
|
case WM_HSCROLL:
|
|
if (l && LOWORD(w) != SB_THUMBPOSITION && LOWORD(w) != SB_ENDSCROLL) {
|
|
int p = SendMessage((HWND)l, TBM_GETPOS, 0, 0);
|
|
switch (GetDlgCtrlID((HWND)l)) {
|
|
case 16:
|
|
BASS_SetConfig(BASS_CONFIG_GVOL_STREAM, p * 100); // global stream volume (0-10000)
|
|
break;
|
|
case 26:
|
|
BASS_SetConfig(BASS_CONFIG_GVOL_MUSIC, p * 100); // global MOD volume (0-10000)
|
|
break;
|
|
case 34:
|
|
BASS_SetConfig(BASS_CONFIG_GVOL_SAMPLE, p * 100); // global sample volume (0-10000)
|
|
break;
|
|
case 43:
|
|
BASS_SetVolume(p / 100.f); // output volume (0-1)
|
|
break;
|
|
}
|
|
}
|
|
break;
|
|
|
|
case WM_INITDIALOG:
|
|
win = h;
|
|
// initialize default output device
|
|
if (!BASS_Init(-1, 44100, 0, win, NULL)) {
|
|
Error("Can't initialize device");
|
|
EndDialog(win, 0);
|
|
return 0;
|
|
}
|
|
// initialize volume sliders
|
|
MESS(16, TBM_SETRANGE, 1, MAKELONG(0, 100));
|
|
MESS(16, TBM_SETPOS, 1, 100);
|
|
MESS(26, TBM_SETRANGE, 1, MAKELONG(0, 100));
|
|
MESS(26, TBM_SETPOS, 1, 100);
|
|
MESS(34, TBM_SETRANGE, 1, MAKELONG(0, 100));
|
|
MESS(34, TBM_SETPOS, 1, 100);
|
|
MESS(43, TBM_SETRANGE, 1, MAKELONG(0, 100));
|
|
MESS(43, TBM_SETPOS, 1, BASS_GetVolume() * 100);
|
|
SetTimer(h, 1, 500, NULL);
|
|
memset(&ofn, 0, sizeof(ofn));
|
|
ofn.lStructSize = sizeof(ofn);
|
|
ofn.hwndOwner = h;
|
|
ofn.nMaxFile = MAX_PATH;
|
|
ofn.Flags = OFN_HIDEREADONLY | OFN_EXPLORER;
|
|
return 1;
|
|
|
|
case WM_DESTROY:
|
|
KillTimer(h, 1);
|
|
BASS_Free(); // close output
|
|
break;
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
int PASCAL WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance, LPSTR lpCmdLine, int nCmdShow)
|
|
{
|
|
// check the correct BASS was loaded
|
|
if (HIWORD(BASS_GetVersion()) != BASSVERSION) {
|
|
MessageBox(0, "An incorrect version of BASS.DLL was loaded", 0, MB_ICONERROR);
|
|
return 0;
|
|
}
|
|
|
|
// enable "Default" device that follows default device changes
|
|
BASS_SetConfig(BASS_CONFIG_DEV_DEFAULT, 1);
|
|
|
|
// display the window
|
|
DialogBox(hInstance, MAKEINTRESOURCE(1000), NULL, dialogproc);
|
|
|
|
return 0;
|
|
}
|