furnace/src/engine/platform/pce.cpp

223 lines
5.9 KiB
C++
Raw Normal View History

#include "pce.h"
#include "../engine.h"
#include <math.h>
//#define rWrite(a,v) pendingWrites[a]=v;
2021-06-07 07:49:43 +00:00
#define rWrite(a,v) writes.emplace(a,v);
#define chWrite(c,a,v) \
if (curChan!=c) { \
curChan=c; \
rWrite(0,curChan); \
} \
rWrite(a,v);
2021-06-08 21:46:27 +00:00
#define FREQ_BASE 1712.0f*2
void DivPlatformPCE::acquire(int& l, int& r) {
while (!writes.empty()) {
2021-06-07 07:49:43 +00:00
QueuedWrite w=writes.front();
pce->Write(cycles,w.addr,w.val);
writes.pop();
}
tempL=0; tempR=0;
2021-06-08 21:46:27 +00:00
pce->Update(4);
2021-06-07 07:49:43 +00:00
pce->ResetTS(0);
//printf("tempL: %d tempR: %d\n",tempL,tempR);
l=tempL;
r=tempR;
}
2021-06-07 07:49:43 +00:00
void DivPlatformPCE::updateWave(int ch) {
DivWavetable* wt=parent->getWave(chan[ch].wave);
2021-06-07 07:49:43 +00:00
chWrite(ch,0x04,0x5f);
chWrite(ch,0x04,0x1f);
2021-06-07 07:49:43 +00:00
for (int i=0; i<32; i++) {
chWrite(ch,0x06,wt->data[i]&31);
}
2021-06-08 21:46:27 +00:00
if (chan[ch].active) {
chWrite(ch,0x04,0x80|chan[ch].outVol);
}
}
void DivPlatformPCE::tick() {
2021-06-07 07:49:43 +00:00
for (int i=0; i<6; i++) {
chan[i].std.next();
if (chan[i].std.hadVol) {
chan[i].outVol=(chan[i].vol*chan[i].std.vol)>>5;
chWrite(i,0x04,0x80|chan[i].outVol);
}
if (chan[i].std.hadArp) {
2021-06-07 07:49:43 +00:00
if (!chan[i].inPorta) {
if (chan[i].std.arpMode) {
2021-06-07 07:49:43 +00:00
chan[i].baseFreq=round(FREQ_BASE/pow(2.0f,((float)(chan[i].std.arp+24)/12.0f)));
} else {
2021-06-07 07:49:43 +00:00
chan[i].baseFreq=round(FREQ_BASE/pow(2.0f,((float)(chan[i].note+chan[i].std.arp-12)/12.0f)));
}
}
chan[i].freqChanged=true;
} else {
if (chan[i].std.arpMode && chan[i].std.finishedArp) {
chan[i].baseFreq=round(FREQ_BASE/pow(2.0f,((float)(chan[i].note)/12.0f)));
chan[i].freqChanged=true;
}
}
if (chan[i].std.hadDuty) {
chan[i].duty=chan[i].std.duty;
2021-06-07 07:49:43 +00:00
//DivInstrument* ins=parent->getIns(chan[i].ins);
}
if (chan[i].std.hadWave) {
if (chan[i].wave!=chan[i].std.wave) {
chan[i].wave=chan[i].std.wave;
2021-06-07 07:49:43 +00:00
updateWave(i);
if (!chan[i].keyOff) chan[i].keyOn=true;
}
}
if (chan[i].freqChanged || chan[i].keyOn || chan[i].keyOff) {
2021-06-07 07:49:43 +00:00
//DivInstrument* ins=parent->getIns(chan[i].ins);
chan[i].freq=(chan[i].baseFreq*(ONE_SEMITONE-chan[i].pitch))/ONE_SEMITONE;
if (chan[i].freq>4095) chan[i].freq=4095;
if (chan[i].note>0x5d) chan[i].freq=0x01;
2021-06-07 07:49:43 +00:00
chWrite(i,0x02,chan[i].freq&0xff);
chWrite(i,0x03,chan[i].freq>>8);
if (chan[i].keyOn) {
2021-06-07 07:49:43 +00:00
if (chan[i].wave<0) {
chan[i].wave=0;
updateWave(i);
}
2021-06-07 07:49:43 +00:00
//rWrite(16+i*5,0x80);
2021-06-07 08:42:18 +00:00
//chWrite(i,0x04,0x80|chan[i].vol);
}
if (chan[i].keyOff) {
2021-06-07 07:49:43 +00:00
chWrite(i,0x04,0);
}
if (chan[i].keyOn) chan[i].keyOn=false;
if (chan[i].keyOff) chan[i].keyOff=false;
chan[i].freqChanged=false;
}
}
}
int DivPlatformPCE::dispatch(DivCommand c) {
switch (c.cmd) {
case DIV_CMD_NOTE_ON:
2021-06-07 07:49:43 +00:00
chan[c.chan].baseFreq=round(FREQ_BASE/pow(2.0f,((float)c.value/12.0f)));
chan[c.chan].freqChanged=true;
chan[c.chan].note=c.value;
chan[c.chan].active=true;
chan[c.chan].keyOn=true;
2021-06-08 21:46:27 +00:00
chWrite(c.chan,0x04,0x80|chan[c.chan].vol);
chan[c.chan].std.init(parent->getIns(chan[c.chan].ins));
break;
case DIV_CMD_NOTE_OFF:
chan[c.chan].active=false;
chan[c.chan].keyOff=true;
chan[c.chan].std.init(NULL);
break;
case DIV_CMD_INSTRUMENT:
if (chan[c.chan].ins!=c.value) {
chan[c.chan].ins=c.value;
}
break;
case DIV_CMD_VOLUME:
2021-06-08 21:46:27 +00:00
if (chan[c.chan].vol!=c.value) {
chan[c.chan].vol=c.value;
if (!chan[c.chan].std.hasVol) {
chan[c.chan].outVol=c.value;
chWrite(c.chan,0x04,0x80|chan[c.chan].outVol);
}
}
break;
case DIV_CMD_GET_VOLUME:
2021-06-08 21:46:27 +00:00
if (chan[c.chan].std.hasVol) {
return chan[c.chan].vol;
}
return chan[c.chan].outVol;
break;
case DIV_CMD_PITCH:
chan[c.chan].pitch=c.value;
chan[c.chan].freqChanged=true;
break;
case DIV_CMD_WAVE:
chan[c.chan].wave=c.value;
2021-06-07 07:49:43 +00:00
updateWave(c.chan);
chan[c.chan].keyOn=true;
break;
case DIV_CMD_NOTE_PORTA: {
int destFreq=round(FREQ_BASE/pow(2.0f,((float)c.value2/12.0f)));
bool return2=false;
if (destFreq>chan[c.chan].baseFreq) {
chan[c.chan].baseFreq+=c.value;
if (chan[c.chan].baseFreq>=destFreq) {
chan[c.chan].baseFreq=destFreq;
return2=true;
}
} else {
chan[c.chan].baseFreq-=c.value;
if (chan[c.chan].baseFreq<=destFreq) {
chan[c.chan].baseFreq=destFreq;
return2=true;
}
}
chan[c.chan].freqChanged=true;
if (return2) {
chan[c.chan].inPorta=false;
return 2;
}
break;
}
case DIV_CMD_STD_NOISE_MODE:
chan[c.chan].duty=c.value;
if (c.chan!=2) {
chan[c.chan].freqChanged=true;
2021-06-07 07:49:43 +00:00
// TODO
}
break;
case DIV_CMD_PANNING: {
lastPan&=~(0x11<<c.chan);
if (c.value==0) c.value=0x11;
lastPan|=c.value<<c.chan;
2021-06-07 07:49:43 +00:00
//rWrite(0x25,lastPan);
break;
}
case DIV_CMD_LEGATO:
chan[c.chan].baseFreq=round(FREQ_BASE/pow(2.0f,((float)c.value/12.0f)));
chan[c.chan].freqChanged=true;
chan[c.chan].note=c.value;
break;
case DIV_CMD_PRE_PORTA:
chan[c.chan].std.init(parent->getIns(chan[c.chan].ins));
chan[c.chan].inPorta=c.value;
break;
case DIV_CMD_GET_VOLMAX:
2021-06-07 07:49:43 +00:00
return 31;
break;
case DIV_ALWAYS_SET_VOLUME:
return 1;
break;
default:
break;
}
return 1;
}
int DivPlatformPCE::init(DivEngine* p, int channels, int sugRate) {
parent=p;
rate=1789773;
pce=new PCE_PSG(&tempL,&tempR,PCE_PSG::REVISION_HUC6280);
lastPan=0xff;
tempL=0;
tempR=0;
cycles=0;
2021-06-07 07:49:43 +00:00
curChan=-1;
// set global volume
rWrite(0,0);
rWrite(0x01,0xff);
// set per-channel initial panning
for (int i=0; i<6; i++) {
chWrite(i,0x05,chan[i].pan);
}
delay=500;
return 6;
}