otomatalabs/furnace
8
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

OPL: pretend to be YMU and enable SOME emulation?

Browse source
This commit is contained in:
tildearrow 2022-03-15 00:33:57 -05:00
parent 8355aa0175
commit a65df5cdab
4 changed files with 27 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

16
src/engine/platform/opl.cpp
View file

@ -560,6 +560,11 @@ int DivPlatformOPL::dispatch(DivCommand c) {
chan[c.chan].std.release();
break;
case DIV_CMD_VOLUME: {
if (pretendYMU) {
c.value=pow(((double)c.value/127.0),0.5)*63.0;
if (c.value<0) c.value=0;
if (c.value>63) c.value=63;
}
chan[c.chan].vol=c.value;
if (!chan[c.chan].std.hasVol) {
chan[c.chan].outVol=c.value;
@ -716,6 +721,7 @@ int DivPlatformOPL::dispatch(DivCommand c) {
return 0;
break;
case DIV_CMD_GET_VOLMAX:
if (pretendYMU) return 127;
return 63;
break;
case DIV_CMD_PRE_PORTA:
@ -868,6 +874,7 @@ void DivPlatformOPL::setYMFM(bool use) {
}
void DivPlatformOPL::setOPLType(int type, bool drums) {
pretendYMU=false;
switch (type) {
case 1: case 2:
slotsNonDrums=slotsOPL2;
@ -879,7 +886,7 @@ void DivPlatformOPL::setOPLType(int type, bool drums) {
melodicChans=drums?6:9;
totalChans=drums?11:9;
break;
case 3:
case 3: case 759:
slotsNonDrums=slotsOPL3;
slotsDrums=slotsOPL3Drums;
slots=drums?slotsDrums:slotsNonDrums;
@ -888,9 +895,14 @@ void DivPlatformOPL::setOPLType(int type, bool drums) {
chans=18;
melodicChans=drums?15:18;
totalChans=drums?20:18;
if (type==759) pretendYMU=true;
break;
}
oplType=type;
if (type==759) {
oplType=3;
} else {
oplType=type;
}
properDrumsSys=drums;
}

2
src/engine/platform/opl.h
View file

@ -79,7 +79,7 @@ class DivPlatformOPL: public DivDispatch {
unsigned char lfoValue;
bool useYMFM, update4OpMask;
bool useYMFM, update4OpMask, pretendYMU;
short oldWrites[512];
short pendingWrites[512];