win midi: fix some silent MIDIs

This commit is contained in:
Roman Fomin 2022-01-11 23:57:26 +07:00
parent d695e5f091
commit 987cd46acd

View File

@ -354,12 +354,10 @@ static boolean I_WIN_InitMusic(void)
return true;
}
static void I_WIN_SetMusicVolume(int volume)
static void UpdateVolume()
{
int i;
volume_factor = (float)volume / 15;
// Send MIDI controller events to adjust the volume.
for (i = 0; i < MIDI_CHANNELS_PER_TRACK; ++i)
{
@ -374,6 +372,18 @@ static void I_WIN_SetMusicVolume(int volume)
}
}
static void I_WIN_SetMusicVolume(int volume)
{
volume_factor = (float)volume / 15;
if (!hMidiStream)
{
return;
}
UpdateVolume();
}
static void I_WIN_StopSong(void *handle)
{
int i;
@ -438,6 +448,8 @@ static void I_WIN_PlaySong(void *handle, boolean looping)
{
MidiErrorMessageBox(mmr);
}
UpdateVolume();
}
static void I_WIN_PauseSong(void *handle)