dev72 - two more compat flags

This commit is contained in:
tildearrow 2022-03-26 22:15:15 -05:00
parent 5c11150b87
commit 9b6e582f8d
7 changed files with 45 additions and 12 deletions

View file

@ -288,8 +288,11 @@ int DivPlatformGB::dispatch(DivCommand c) {
if (chan[c.chan].ins!=c.value || c.value2==1) {
chan[c.chan].ins=c.value;
if (c.chan!=2) {
chan[c.chan].vol=parent->getIns(chan[c.chan].ins)->gb.envVol;
// TODO: also change envelope values
DivInstrument* ins=parent->getIns(chan[c.chan].ins);
chan[c.chan].vol=ins->gb.envVol;
if (parent->song.gbInsAffectsEnvelope) {
rWrite(16+c.chan*5+2,((chan[c.chan].vol<<4))|(ins->gb.envLen&7)|((ins->gb.envDir&1)<<3));
}
}
}
break;