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

Virtual Boy: early modulation work

Browse source
This commit is contained in:
tildearrow 2022-10-10 22:10:23 -05:00
parent f679aadf68
commit b23939a124
3 changed files with 26 additions and 8 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

26
src/engine/platform/vb.cpp
View file

@ -303,17 +303,32 @@ int DivPlatformVB::dispatch(DivCommand c) {
case DIV_CMD_FDS_MOD_DEPTH: // set modulation case DIV_CMD_FDS_MOD_DEPTH: // set modulation
if (c.chan!=4) break; if (c.chan!=4) break;
modulation=c.value; modulation=c.value;
chWrite(4,0x06,modulation); chWrite(4,0x07,modulation);
if (modulation!=0) { if (modulation!=0) {
chan[c.chan].envHigh|=0x10; chan[c.chan].envHigh|=0x70;
} else { } else {
chan[c.chan].envHigh&=~0x10; chan[c.chan].envHigh&=~0x70;
} }
writeEnv(4); writeEnv(4);
chWrite(c.chan,0x00,0x80);
break; break;
case DIV_CMD_FDS_MOD_WAVE: // set modulation wave case DIV_CMD_FDS_MOD_WAVE: { // set modulation wave
if (c.chan!=4) break;
DivWavetable* wt=parent->getWave(c.value);
for (int i=0; i<32; i++) {
if (wt->max<1 || wt->len<1) {
modTable[i]=0;
rWrite(0x280+(i<<2),0);
} else {
int data=(wt->data[i*wt->len/32]*255/wt->max)-128;
if (data<-128) data=-128;
if (data>127) data=127;
modTable[i]=data;
rWrite(0x280+(i<<2),modTable[i]);
}
}
break; break;
}
case DIV_CMD_PANNING: { case DIV_CMD_PANNING: {
chan[c.chan].pan=(c.value&0xf0)|(c.value2>>4); chan[c.chan].pan=(c.value&0xf0)|(c.value2>>4);
chWrite(c.chan,0x01,isMuted[c.chan]?0:chan[c.chan].pan); chWrite(c.chan,0x01,isMuted[c.chan]?0:chan[c.chan].pan);
@ -399,6 +414,7 @@ void DivPlatformVB::reset() {
cycles=0; cycles=0;
curChan=-1; curChan=-1;
modulation=0; modulation=0;
memset(modTable,0,32);
// set per-channel initial values // set per-channel initial values
for (int i=0; i<6; i++) { for (int i=0; i<6; i++) {
chWrite(i,0x01,isMuted[i]?0:chan[i].pan); chWrite(i,0x01,isMuted[i]?0:chan[i].pan);

1
src/engine/platform/vb.h
View file

@ -76,6 +76,7 @@ class DivPlatformVB: public DivDispatch {
int tempL; int tempL;
int tempR; int tempR;
unsigned char modulation; unsigned char modulation;
signed char modTable[32];
VSU* vb; VSU* vb;
unsigned char regPool[0x600]; unsigned char regPool[0x600];
void updateWave(int ch); void updateWave(int ch);

7
src/engine/sysDef.cpp
View file

@ -1183,9 +1183,10 @@ void DivEngine::registerSystems() {
{ {
{0x10, {DIV_CMD_WAVE, "10xx: Set waveform"}}, {0x10, {DIV_CMD_WAVE, "10xx: Set waveform"}},
{0x11, {DIV_CMD_STD_NOISE_MODE, "11xx: Set noise length (0 to 7)"}}, {0x11, {DIV_CMD_STD_NOISE_MODE, "11xx: Set noise length (0 to 7)"}},
{0x12, {DIV_CMD_STD_NOISE_FREQ, "12xy: Setup envelope (x: enabled/loop (1: enable, 2: loop, 3: enable+loop); y: speed/direction (0-7: down, 8-F: up))"}}, {0x12, {DIV_CMD_STD_NOISE_FREQ, "12xy: Setup envelope (x: enabled/loop (1: enable, 3: enable+loop); y: speed/direction (0-7: down, 8-F: up))"}},
{0x14, {DIV_CMD_FDS_MOD_DEPTH, "14xy: Setup modulation (channel 5 only)"}}, {0x13, {DIV_CMD_GB_SWEEP_TIME, "13xy: Setup sweep (x: speed; y: shift; channel 5 only)"}},
{0x15, {DIV_CMD_FDS_MOD_WAVE, "15xx: Set modulation waveform (channel 5 only)"}}, {0x14, {DIV_CMD_FDS_MOD_DEPTH, "14xy: Setup modulation (x: enabled/loop (1: enable, 3: enable+loop); y: speed; channel 5 only)"}},
{0x15, {DIV_CMD_FDS_MOD_WAVE, "15xx: Set modulation waveform (x: wavetable; channel 5 only)"}},
} }
); );