aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--sound/mods/maxtrax.cpp163
-rw-r--r--sound/mods/maxtrax.h9
2 files changed, 112 insertions, 60 deletions
diff --git a/sound/mods/maxtrax.cpp b/sound/mods/maxtrax.cpp
index 4d02dc7152..80a9861e6c 100644
--- a/sound/mods/maxtrax.cpp
+++ b/sound/mods/maxtrax.cpp
@@ -40,7 +40,7 @@ enum { K_VALUE = 0x9fd77, PREF_PERIOD = 0x8fd77, PERIOD_LIMIT = 0x6f73d };
enum { NO_BEND = 64 << 7, MAX_BEND_RANGE = 24 };
int32 precalcNote(byte baseNote, int16 tune, byte octave) {
- return K_VALUE + 0x3C000 + (1 << 16) - ((baseNote << 14) + (tune << 11) / 3) / 3 - (octave << 16);
+ return K_VALUE + 0x3C000 - ((baseNote << 14) + (tune << 11) / 3) / 3 - (octave << 16);
}
int32 calcVolumeDelta(int32 delta, uint16 time, uint16 vBlankFreq) {
@@ -55,15 +55,60 @@ int32 calcTempo(const uint16 tempo, uint16 vBlankFreq) {
void nullFunc(int) {}
-// define sinetable if needed and setup a compile-time constant
-#ifdef MAXTRAX_HAS_MODULATION
-const int8 tableSine[256] = { 0 }; // todo - fillin values
-const bool kHasModulation = true;
+// Function to calculate 2^x, where x is a fixedpoint number with 16 fraction bits
+// using exp would be more accurate and needs less space if mathlibrary is already linked
+// but this function should be faster and doesnt use floats
+#if 1
+static const uint16 tablePow2[] = {
+ 0, 178, 356, 535, 714, 893, 1073, 1254, 1435, 1617, 1799, 1981, 2164, 2348, 2532, 2716,
+ 2902, 3087, 3273, 3460, 3647, 3834, 4022, 4211, 4400, 4590, 4780, 4971, 5162, 5353, 5546, 5738,
+ 5932, 6125, 6320, 6514, 6710, 6906, 7102, 7299, 7496, 7694, 7893, 8092, 8292, 8492, 8693, 8894,
+ 9096, 9298, 9501, 9704, 9908, 10113, 10318, 10524, 10730, 10937, 11144, 11352, 11560, 11769, 11979, 12189,
+ 12400, 12611, 12823, 13036, 13249, 13462, 13676, 13891, 14106, 14322, 14539, 14756, 14974, 15192, 15411, 15630,
+ 15850, 16071, 16292, 16514, 16737, 16960, 17183, 17408, 17633, 17858, 18084, 18311, 18538, 18766, 18995, 19224,
+ 19454, 19684, 19915, 20147, 20379, 20612, 20846, 21080, 21315, 21550, 21786, 22023, 22260, 22498, 22737, 22977,
+ 23216, 23457, 23698, 23940, 24183, 24426, 24670, 24915, 25160, 25406, 25652, 25900, 26148, 26396, 26645, 26895,
+ 27146, 27397, 27649, 27902, 28155, 28409, 28664, 28919, 29175, 29432, 29690, 29948, 30207, 30466, 30727, 30988,
+ 31249, 31512, 31775, 32039, 32303, 32568, 32834, 33101, 33369, 33637, 33906, 34175, 34446, 34717, 34988, 35261,
+ 35534, 35808, 36083, 36359, 36635, 36912, 37190, 37468, 37747, 38028, 38308, 38590, 38872, 39155, 39439, 39724,
+ 40009, 40295, 40582, 40870, 41158, 41448, 41738, 42029, 42320, 42613, 42906, 43200, 43495, 43790, 44087, 44384,
+ 44682, 44981, 45280, 45581, 45882, 46184, 46487, 46791, 47095, 47401, 47707, 48014, 48322, 48631, 48940, 49251,
+ 49562, 49874, 50187, 50500, 50815, 51131, 51447, 51764, 52082, 52401, 52721, 53041, 53363, 53685, 54008, 54333,
+ 54658, 54983, 55310, 55638, 55966, 56296, 56626, 56957, 57289, 57622, 57956, 58291, 58627, 58964, 59301, 59640,
+ 59979, 60319, 60661, 61003, 61346, 61690, 62035, 62381, 62727, 63075, 63424, 63774, 64124, 64476, 64828, 65182,
+ 0
+};
+inline uint32 pow2Fixed(int32 val) {
+ const uint16 whole = val >> 16;
+ const uint8 index = (uint8)(val >> 8);
+ // calculate fractional part.
+ const uint16 base = tablePow2[index];
+ // linear interpolation and add 1.0
+ uint32 exponent = ((uint32)(uint16)(tablePow2[index + 1] - base) * (uint8)val) + ((uint32)base << 8) + (1 << 24);
+
+ if (whole < 24) {
+ // shift away all but the last fractional bit which is used for rounding,
+ // then round to nearest integer
+ exponent = ((exponent >> (23 - whole)) + 1) >> 1;
+ } else if (whole < 32) {
+ // no need to round here
+ exponent <<= whole - 24;
+ } else if (val > 0) {
+ // overflow
+ exponent = 0xFFFFFFFF;
+ } else {
+ // negative integer, test if >= -0.5
+ exponent = (val >= -0x8000) ? 1 : 0;
+ }
+ return exponent;
+}
#else
-const bool kHasModulation = false;
+inline uint32 pow2Fixed(int32 val) {
+ return (uint32)(expf((float)val * (float)(0.69314718055994530942 / (1 << 16))) + 0.5f);
+}
#endif
-}
+} // End of namespace
namespace Audio {
@@ -239,12 +284,12 @@ endOfEventLoop:
// in that case they are finished after the attackSample is done
if (voice.dmaOff && Paula::getChannelDmaCount((byte)i) >= voice.dmaOff ) {
voice.dmaOff = 0;
- voice.isBlocked = false;
+ voice.isBlocked = 0;
voice.priority = 0;
// disable it in next tick
voice.stopEventTime = 0;
}
- if (!channel.isAltered && !voice.hasPortamento && (!kHasModulation || !channel.modulation))
+ if (!channel.isAltered && !voice.hasPortamento && !channel.modulation)
continue;
// Update Volume and Period
break;
@@ -337,7 +382,7 @@ endOfEventLoop:
voice.preCalcNote = precalcNote(voice.baseNote, patch.tune, voice.octave);
}
voice.lastPeriod = calcNote(voice);
- } else if (channel.isAltered || (kHasModulation && channel.modulation))
+ } else if (channel.isAltered || channel.modulation)
voice.lastPeriod = calcNote(voice);
}
@@ -348,10 +393,11 @@ endOfEventLoop:
for (ChannelContext *c = _channelCtx; c != &_channelCtx[ARRAYSIZE(_channelCtx)]; ++c)
c->isAltered = false;
+#ifdef MAXTRAX_HAS_MODULATION
// original player had _playerCtx.sineValue = _playerCtx.frameUnit >> 2
// this should fit the comments that modtime=1000 is one second ?
- if (kHasModulation)
- _playerCtx.sineValue += _playerCtx.frameUnit;
+ _playerCtx.sineValue += _playerCtx.frameUnit;
+#endif
}
void MaxTrax::controlCh(ChannelContext &channel, const byte command, const byte data) {
@@ -535,13 +581,14 @@ void MaxTrax::killVoice(byte num) {
voice.channel = 0;
voice.envelope = 0;
voice.status = VoiceContext::kStatusFree;
- voice.isBlocked = false;
+ voice.isBlocked = 0;
voice.hasDamper = false;
voice.hasPortamento = false;
voice.priority = 0;
voice.stopEventTime = -1;
voice.dmaOff = 0;
voice.lastVolume = 0;
+ voice.tieBreak = 0;
//voice.uinqueId = 0;
// "stop" voice, set period to 1, vol to 0
@@ -550,40 +597,46 @@ void MaxTrax::killVoice(byte num) {
Paula::setChannelVolume(num, 0);
}
-int8 MaxTrax::pickvoice(const VoiceContext voices[4], uint pick, int16 pri) {
+int8 MaxTrax::pickvoice(uint pick, int16 pri) {
enum { kPrioFlagFixedSide = 1 << 3 };
+ pick &= 3;
if ((pri & (kPrioFlagFixedSide)) == 0) {
const bool leftSide = (uint)(pick - 1) > 1;
- const int leftBest = MIN(voices[0].status, voices[3].status);
- const int rightBest = MIN(voices[1].status, voices[2].status);
+ const int leftBest = MIN(_voiceCtx[0].status, _voiceCtx[3].status);
+ const int rightBest = MIN(_voiceCtx[1].status, _voiceCtx[2].status);
const int sameSide = (leftSide) ? leftBest : rightBest;
const int otherSide = leftBest + rightBest - sameSide;
if (sameSide > VoiceContext::kStatusRelease && otherSide <= VoiceContext::kStatusRelease)
pick ^= 1; // switches sides
}
- pick &= 3;
+ pri &= ~kPrioFlagFixedSide;
for (int i = 2; i > 0; --i) {
- const VoiceContext *voice = &voices[pick];
- const VoiceContext *alternate = &voices[pick ^ 3];
+ VoiceContext *voice = &_voiceCtx[pick];
+ VoiceContext *alternate = &_voiceCtx[pick ^ 3];
+
+ const uint16 voiceVal = voice->status << 8 | voice->lastVolume;
+ const uint16 altVal = alternate->status << 8 | alternate->lastVolume;
+
+ if (voiceVal + voice->tieBreak > altVal
+ || voice->isBlocked > alternate->isBlocked) {
+
+ // this is somewhat different to the original player,
+ // but has a similar result
+ voice->tieBreak = 0;
+ alternate->tieBreak = 1;
- if (voice->status > alternate->status
- || (voice->status == alternate->status && voice->lastVolume > alternate->lastVolume)) {
- // TODO: tiebreaking
pick ^= 3; // switch channels
- const VoiceContext *tmp = voice;
+ VoiceContext *tmp = voice;
voice = alternate;
alternate = tmp;
}
if (voice->isBlocked || voice->priority > pri) {
- pick ^= 3; // switch channels
- if (alternate->isBlocked || alternate->priority > pri) {
- // if not already done, switch sides and try again
- pick ^= 1;
- continue;
- }
+ // if not already done, switch sides and try again
+ pick ^= 1;
+ continue;
}
// succeded
return (int8)pick;
@@ -613,11 +666,21 @@ uint16 MaxTrax::calcNote(const VoiceContext &voice) {
#endif
#ifdef MAXTRAX_HAS_MODULATION
+ static const uint8 tableSine[] = {
+ 0, 5, 12, 18, 24, 30, 37, 43, 49, 55, 61, 67, 73, 79, 85, 91,
+ 97, 103, 108, 114, 120, 125, 131, 136, 141, 146, 151, 156, 161, 166, 171, 176,
+ 180, 184, 189, 193, 197, 201, 205, 208, 212, 215, 219, 222, 225, 228, 230, 233,
+ 236, 238, 240, 242, 244, 246, 247, 249, 250, 251, 252, 253, 254, 254, 255, 255,
+ 255, 255, 255, 254, 254, 253, 252, 251, 250, 249, 247, 246, 244, 242, 240, 238,
+ 236, 233, 230, 228, 225, 222, 219, 215, 212, 208, 205, 201, 197, 193, 189, 184,
+ 180, 176, 171, 166, 161, 156, 151, 146, 141, 136, 131, 125, 120, 114, 108, 103,
+ 97, 91, 85, 79, 73, 67, 61, 55, 49, 43, 37, 30, 24, 18, 12, 5
+ };
if (channel.modulation) {
if ((channel.flags & ChannelContext::kFlagModVolume) == 0) {
- int sineInd = (_playerCtx.sineValue / channel.modulationTime) & 0xFF;
- // TODO - use table
- bend += (int16)(sinf(sineInd * (float)((2 * PI) / 256)) * channel.modulation);
+ const uint8 sineByte = _playerCtx.sineValue / channel.modulationTime;
+ const int16 modVal = ((uint32)(uint16)(tableSine[sineByte & 0x7F] + (sineByte ? 1 : 0)) * channel.modulation) >> 8;
+ bend = (sineByte < 0x80) ? bend + modVal : bend - modVal;
}
}
#endif
@@ -627,13 +690,7 @@ uint16 MaxTrax::calcNote(const VoiceContext &voice) {
const int32 tone = voice.preCalcNote + (bend << 6) / 3;
- if (tone >= PERIOD_LIMIT + (1 << 16)) {
- // calculate 2^tone and round towards nearest integer
- // 2*2^tone = exp((tone+1) * ln(2))
- const uint16 periodX2 = (uint16)expf((float)tone * (float)(0.69314718055994530942 / (1 << 16)));
- return (periodX2 + 1) / 2;
- }
- return 0;
+ return (tone >= PERIOD_LIMIT) ? (uint16)pow2Fixed(tone) : 0;
}
int8 MaxTrax::noteOn(ChannelContext &channel, const byte note, uint16 volume, uint16 pri) {
@@ -650,13 +707,13 @@ int8 MaxTrax::noteOn(ChannelContext &channel, const byte note, uint16 volume, ui
return -1;
int8 voiceNum = -1;
if ((channel.flags & ChannelContext::kFlagMono) == 0) {
- voiceNum = pickvoice(_voiceCtx, (channel.flags & ChannelContext::kFlagRightChannel) != 0 ? 1 : 0, pri);
+ voiceNum = pickvoice((channel.flags & ChannelContext::kFlagRightChannel) != 0 ? 1 : 0, pri);
} else {
VoiceContext *voice = _voiceCtx + ARRAYSIZE(_voiceCtx) - 1;
for (voiceNum = ARRAYSIZE(_voiceCtx) - 1; voiceNum >= 0 && voice->channel != &channel; --voiceNum, --voice)
;
if (voiceNum < 0)
- voiceNum = pickvoice(_voiceCtx, (channel.flags & ChannelContext::kFlagRightChannel) != 0 ? 1 : 0, pri);
+ voiceNum = pickvoice((channel.flags & ChannelContext::kFlagRightChannel) != 0 ? 1 : 0, pri);
else if (voice->status >= VoiceContext::kStatusSustain && (channel.flags & ChannelContext::kFlagPortamento) != 0) {
// reset previous porta
if (voice->hasPortamento)
@@ -673,7 +730,7 @@ int8 MaxTrax::noteOn(ChannelContext &channel, const byte note, uint16 volume, ui
if (voiceNum >= 0) {
VoiceContext &voice = _voiceCtx[voiceNum];
voice.hasDamper = false;
- voice.isBlocked = false;
+ voice.isBlocked = 0;
voice.hasPortamento = false;
if (voice.channel)
killVoice(voiceNum);
@@ -683,10 +740,10 @@ int8 MaxTrax::noteOn(ChannelContext &channel, const byte note, uint16 volume, ui
// always base octave on the note in the command, regardless of porta
const int32 plainNote = precalcNote(note, patch.tune, 0);
- const int32 PREF_PERIOD1 = PREF_PERIOD + (1 << 16);
// calculate which sample to use
- const int useOctave = (plainNote <= PREF_PERIOD1) ? 0 : MIN<int32>((plainNote + 0xFFFF - PREF_PERIOD1) >> 16, patch.sampleOctaves - 1);
+ const int useOctave = (plainNote <= PREF_PERIOD) ? 0 : MIN<int32>((plainNote + 0xFFFF - PREF_PERIOD) >> 16, patch.sampleOctaves - 1);
voice.octave = (byte)useOctave;
+ // adjust precalculated value
voice.preCalcNote = plainNote - (useOctave << 16);
// next calculate the actual period which depends on wether porta is enabled
@@ -709,16 +766,12 @@ int8 MaxTrax::noteOn(ChannelContext &channel, const byte note, uint16 volume, ui
voice.noteVolume = (_playerCtx.handleVolume) ? volume + 1 : 128;
voice.baseVolume = 0;
- const uint16 period = (voice.lastPeriod) ? voice.lastPeriod : 1000;
-
// TODO: since the original player is using the OS-functions, more than 1 sample could be queued up already
// get samplestart for the given octave
const int8 *samplePtr = patch.samplePtr + (patch.sampleTotalLen << useOctave) - patch.sampleTotalLen;
if (patch.sampleAttackLen) {
Paula::setChannelSampleStart(voiceNum, samplePtr);
Paula::setChannelSampleLen(voiceNum, (patch.sampleAttackLen << useOctave) / 2);
- Paula::setChannelPeriod(voiceNum, period);
- Paula::setChannelVolume(voiceNum, 0);
Paula::enableChannel(voiceNum);
// wait for dma-clear
@@ -727,13 +780,8 @@ int8 MaxTrax::noteOn(ChannelContext &channel, const byte note, uint16 volume, ui
if (patch.sampleTotalLen > patch.sampleAttackLen) {
Paula::setChannelSampleStart(voiceNum, samplePtr + (patch.sampleAttackLen << useOctave));
Paula::setChannelSampleLen(voiceNum, ((patch.sampleTotalLen - patch.sampleAttackLen) << useOctave) / 2);
- if (!patch.sampleAttackLen) {
- // need to enable channel
- Paula::setChannelPeriod(voiceNum, period);
- Paula::setChannelVolume(voiceNum, 0);
-
- Paula::enableChannel(voiceNum);
- }
+ if (!patch.sampleAttackLen)
+ Paula::enableChannel(voiceNum); // need to enable channel
// another pointless wait for DMA-Clear???
} else { // no sustain sample
@@ -744,6 +792,9 @@ int8 MaxTrax::noteOn(ChannelContext &channel, const byte note, uint16 volume, ui
Paula::setChannelDmaCount(voiceNum);
voice.dmaOff = 1;
}
+
+ Paula::setChannelPeriod(voiceNum, (voice.lastPeriod) ? voice.lastPeriod : 1000);
+ Paula::setChannelVolume(voiceNum, 0);
}
return voiceNum;
}
@@ -939,7 +990,7 @@ allocError:
return false;
}
-#ifndef NDEBUG
+#if !defined(NDEBUG) && 0
void MaxTrax::outPutEvent(const Event &ev, int num) {
struct {
byte cmd;
diff --git a/sound/mods/maxtrax.h b/sound/mods/maxtrax.h
index 09016b08e7..3cd5ebc94b 100644
--- a/sound/mods/maxtrax.h
+++ b/sound/mods/maxtrax.h
@@ -185,7 +185,6 @@ private:
byte octave;
// byte number;
// byte link;
- byte priority;
enum {
kStatusFree,
kStatusHalt,
@@ -195,10 +194,12 @@ private:
kStatusAttack,
kStatusStart
};
+ uint8 isBlocked;
+ uint8 priority;
byte status;
- bool hasDamper;
- bool isBlocked;
byte lastVolume;
+ byte tieBreak;
+ bool hasDamper;
bool hasPortamento;
byte dmaOff;
@@ -211,7 +212,7 @@ private:
void resetChannel(ChannelContext &chan, bool rightChannel);
void resetPlayer();
- static int8 pickvoice(const VoiceContext voice[4], uint pick, int16 pri);
+ int8 pickvoice(uint pick, int16 pri);
uint16 calcNote(const VoiceContext &voice);
int8 noteOn(ChannelContext &channel, byte note, uint16 volume, uint16 pri);
void killVoice(byte num);