|
- /*
- ZynAddSubFX - a software synthesizer
-
- ADnote.cpp - The "additive" synthesizer
- Copyright (C) 2002-2005 Nasca Octavian Paul
- Author: Nasca Octavian Paul
-
- This program is free software; you can redistribute it and/or
- modify it under the terms of the GNU General Public License
- as published by the Free Software Foundation; either version 2
- of the License, or (at your option) any later version.
- */
-
- #include <cmath>
- #include <cstdlib>
- #include <cstdio>
- #include <cstring>
- #include <cassert>
- #include <stdint.h>
-
- #include "../globals.h"
- #include "../Misc/Util.h"
- #include "../Misc/Allocator.h"
- #include "../Params/ADnoteParameters.h"
- #include "../Containers/ScratchString.h"
- #include "ModFilter.h"
- #include "OscilGen.h"
- #include "ADnote.h"
-
- namespace zyncarla {
-
- ADnote::ADnote(ADnoteParameters *pars_, SynthParams &spars,
- WatchManager *wm, const char *prefix)
- :SynthNote(spars), pars(*pars_)
- {
- memory.beginTransaction();
- tmpwavel = memory.valloc<float>(synth.buffersize);
- tmpwaver = memory.valloc<float>(synth.buffersize);
- bypassl = memory.valloc<float>(synth.buffersize);
- bypassr = memory.valloc<float>(synth.buffersize);
-
- ADnoteParameters &pars = *pars_;
- portamento = spars.portamento;
- midinote = spars.note;
- NoteEnabled = ON;
- basefreq = spars.frequency;
- velocity = spars.velocity;
- stereo = pars.GlobalPar.PStereo;
-
- NoteGlobalPar.Detune = getdetune(pars.GlobalPar.PDetuneType,
- pars.GlobalPar.PCoarseDetune,
- pars.GlobalPar.PDetune);
- bandwidthDetuneMultiplier = pars.getBandwidthDetuneMultiplier();
-
- if(pars.GlobalPar.PPanning == 0)
- NoteGlobalPar.Panning = RND;
- else
- NoteGlobalPar.Panning = pars.GlobalPar.PPanning / 128.0f;
-
-
- NoteGlobalPar.Fadein_adjustment =
- pars.GlobalPar.Fadein_adjustment / (float)FADEIN_ADJUSTMENT_SCALE;
- NoteGlobalPar.Fadein_adjustment *= NoteGlobalPar.Fadein_adjustment;
- if(pars.GlobalPar.PPunchStrength != 0) {
- NoteGlobalPar.Punch.Enabled = 1;
- NoteGlobalPar.Punch.t = 1.0f; //start from 1.0f and to 0.0f
- NoteGlobalPar.Punch.initialvalue =
- ((powf(10, 1.5f * pars.GlobalPar.PPunchStrength / 127.0f) - 1.0f)
- * VelF(velocity,
- pars.GlobalPar.PPunchVelocitySensing));
- float time =
- powf(10, 3.0f * pars.GlobalPar.PPunchTime / 127.0f) / 10000.0f; //0.1f .. 100 ms
- float stretch = powf(440.0f / spars.frequency,
- pars.GlobalPar.PPunchStretch / 64.0f);
- NoteGlobalPar.Punch.dt = 1.0f / (time * synth.samplerate_f * stretch);
- }
- else
- NoteGlobalPar.Punch.Enabled = 0;
-
- for(int nvoice = 0; nvoice < NUM_VOICES; ++nvoice)
- setupVoice(nvoice);
-
- max_unison = 1;
- for(int nvoice = 0; nvoice < NUM_VOICES; ++nvoice)
- if(unison_size[nvoice] > max_unison)
- max_unison = unison_size[nvoice];
-
-
- tmpwave_unison = memory.valloc<float*>(max_unison);
- for(int k = 0; k < max_unison; ++k) {
- tmpwave_unison[k] = memory.valloc<float>(synth.buffersize);
- memset(tmpwave_unison[k], 0, synth.bufferbytes);
- }
-
- initparameters(wm, prefix);
- memory.endTransaction();
- }
-
- void ADnote::setupVoice(int nvoice)
- {
- auto ¶m = pars.VoicePar[nvoice];
- auto &voice = NoteVoicePar[nvoice];
-
-
- for (int i = 0; i < 14; i++)
- pinking[nvoice][i] = 0.0;
-
- param.OscilSmp->newrandseed(prng());
- voice.OscilSmp = NULL;
- voice.FMSmp = NULL;
- voice.VoiceOut = NULL;
-
- voice.FMVoice = -1;
- unison_size[nvoice] = 1;
-
- if(!pars.VoicePar[nvoice].Enabled) {
- voice.Enabled = OFF;
- return; //the voice is disabled
- }
-
- const int BendAdj = pars.VoicePar[nvoice].PBendAdjust - 64;
- if (BendAdj % 24 == 0)
- voice.BendAdjust = BendAdj / 24;
- else
- voice.BendAdjust = BendAdj / 24.0f;
-
- const float offset_val = (param.POffsetHz - 64)/64.0f;
- voice.OffsetHz = 15.0f*(offset_val * sqrtf(fabsf(offset_val)));
-
- unison_stereo_spread[nvoice] =
- pars.VoicePar[nvoice].Unison_stereo_spread / 127.0f;
-
- int unison = setupVoiceUnison(nvoice);
-
-
- oscfreqhi[nvoice] = memory.valloc<int>(unison);
- oscfreqlo[nvoice] = memory.valloc<float>(unison);
- oscfreqhiFM[nvoice] = memory.valloc<unsigned int>(unison);
- oscfreqloFM[nvoice] = memory.valloc<float>(unison);
- oscposhi[nvoice] = memory.valloc<int>(unison);
- oscposlo[nvoice] = memory.valloc<float>(unison);
- oscposhiFM[nvoice] = memory.valloc<unsigned int>(unison);
- oscposloFM[nvoice] = memory.valloc<float>(unison);
-
- voice.Enabled = ON;
- voice.fixedfreq = pars.VoicePar[nvoice].Pfixedfreq;
- voice.fixedfreqET = pars.VoicePar[nvoice].PfixedfreqET;
-
- setupVoiceDetune(nvoice);
-
- for(int k = 0; k < unison; ++k) {
- oscposhi[nvoice][k] = 0;
- oscposlo[nvoice][k] = 0.0f;
- oscposhiFM[nvoice][k] = 0;
- oscposloFM[nvoice][k] = 0.0f;
- }
-
- //the extra points contains the first point
- voice.OscilSmp =
- memory.valloc<float>(synth.oscilsize + OSCIL_SMP_EXTRA_SAMPLES);
-
- //Get the voice's oscil or external's voice oscil
- int vc = nvoice;
- if(pars.VoicePar[nvoice].Pextoscil != -1)
- vc = pars.VoicePar[nvoice].Pextoscil;
- if(!pars.GlobalPar.Hrandgrouping)
- pars.VoicePar[vc].OscilSmp->newrandseed(prng());
- int oscposhi_start =
- pars.VoicePar[vc].OscilSmp->get(NoteVoicePar[nvoice].OscilSmp,
- getvoicebasefreq(nvoice),
- pars.VoicePar[nvoice].Presonance);
-
- // This code was planned for biasing the carrier in MOD_RING
- // but that's on hold for the moment. Disabled 'cos small
- // machines run this stuff too.
- //
- // //Find range of generated wave
- // float min = NoteVoicePar[nvoice].OscilSmp[0];
- // float max = min;
- // float *smpls = &(NoteVoicePar[nvoice].OscilSmp[1]);
- // for (int i = synth.oscilsize-1; i--; smpls++)
- // if (*smpls > max)
- // max = *smpls;
- // else if (*smpls < min)
- // min = *smpls;
- // NoteVoicePar[nvoice].OscilSmpMin = min;
- // NoteVoicePar[nvoice].OscilSmpMax = max;
-
- //I store the first elments to the last position for speedups
- for(int i = 0; i < OSCIL_SMP_EXTRA_SAMPLES; ++i)
- voice.OscilSmp[synth.oscilsize + i] = voice.OscilSmp[i];
-
- voice.phase_offset = (int)((pars.VoicePar[nvoice].Poscilphase
- - 64.0f) / 128.0f * synth.oscilsize + synth.oscilsize * 4);
- oscposhi_start += NoteVoicePar[nvoice].phase_offset;
-
- int kth_start = oscposhi_start;
- for(int k = 0; k < unison; ++k) {
- oscposhi[nvoice][k] = kth_start % synth.oscilsize;
- //put random starting point for other subvoices
- kth_start = oscposhi_start +
- (int)(RND * pars.VoicePar[nvoice].Unison_phase_randomness /
- 127.0f * (synth.oscilsize - 1));
- }
-
- voice.FreqLfo = NULL;
- voice.FreqEnvelope = NULL;
-
- voice.AmpLfo = NULL;
- voice.AmpEnvelope = NULL;
-
- voice.Filter = NULL;
- voice.FilterEnvelope = NULL;
- voice.FilterLfo = NULL;
-
- voice.filterbypass = param.Pfilterbypass;
-
- setupVoiceMod(nvoice);
-
- voice.FMVoice = param.PFMVoice;
- voice.FMFreqEnvelope = NULL;
- voice.FMAmpEnvelope = NULL;
-
- FMoldsmp[nvoice] = memory.valloc<float>(unison);
- for(int k = 0; k < unison; ++k)
- FMoldsmp[nvoice][k] = 0.0f; //this is for FM (integration)
-
- firsttick[nvoice] = 1;
- voice.DelayTicks =
- (int)((expf(param.PDelay / 127.0f * logf(50.0f))
- - 1.0f) / synth.buffersize_f / 10.0f * synth.samplerate_f);
- }
-
- int ADnote::setupVoiceUnison(int nvoice)
- {
- int unison = pars.VoicePar[nvoice].Unison_size;
- if(unison < 1)
- unison = 1;
-
- bool is_pwm = pars.VoicePar[nvoice].PFMEnabled == PW_MOD;
-
- if (pars.VoicePar[nvoice].Type != 0) {
- // Since noise unison of greater than two is touch goofy...
- if (unison > 2)
- unison = 2;
- } else if (is_pwm) {
- /* Pulse width mod uses pairs of subvoices. */
- unison *= 2;
- // This many is likely to sound like noise anyhow.
- if (unison > 64)
- unison = 64;
- }
-
- //compute unison
- unison_size[nvoice] = unison;
-
- unison_base_freq_rap[nvoice] = memory.valloc<float>(unison);
- unison_freq_rap[nvoice] = memory.valloc<float>(unison);
- unison_invert_phase[nvoice] = memory.valloc<bool>(unison);
- const float unison_spread =
- pars.getUnisonFrequencySpreadCents(nvoice);
- const float unison_real_spread = powf(2.0f, (unison_spread * 0.5f) / 1200.0f);
- const float unison_vibratto_a =
- pars.VoicePar[nvoice].Unison_vibratto / 127.0f; //0.0f .. 1.0f
-
- const int true_unison = unison / (is_pwm ? 2 : 1);
- switch(true_unison) {
- case 1:
- unison_base_freq_rap[nvoice][0] = 1.0f; //if the unison is not used, always make the only subvoice to have the default note
- break;
- case 2: { //unison for 2 subvoices
- unison_base_freq_rap[nvoice][0] = 1.0f / unison_real_spread;
- unison_base_freq_rap[nvoice][1] = unison_real_spread;
- };
- break;
- default: { //unison for more than 2 subvoices
- float unison_values[true_unison];
- float min = -1e-6, max = 1e-6;
- for(int k = 0; k < true_unison; ++k) {
- float step = (k / (float) (true_unison - 1)) * 2.0f - 1.0f; //this makes the unison spread more uniform
- float val = step + (RND * 2.0f - 1.0f) / (true_unison - 1);
- unison_values[k] = val;
- if (min > val) {
- min = val;
- }
- if (max < val) {
- max = val;
- }
- }
- const float diff = max - min;
- for(int k = 0; k < true_unison; ++k) {
- unison_values[k] =
- (unison_values[k] - (max + min) * 0.5f) / diff; //the lowest value will be -1 and the highest will be 1
- unison_base_freq_rap[nvoice][k] =
- powf(2.0f, (unison_spread * unison_values[k]) / 1200);
- }
- };
- }
- if (is_pwm)
- for (int i = true_unison - 1; i >= 0; i--) {
- unison_base_freq_rap[nvoice][2*i + 1] =
- unison_base_freq_rap[nvoice][i];
- unison_base_freq_rap[nvoice][2*i] =
- unison_base_freq_rap[nvoice][i];
- }
-
- //unison vibrattos
- if(unison > 2 || (!is_pwm && unison > 1))
- for(int k = 0; k < unison; ++k) //reduce the frequency difference for larger vibrattos
- unison_base_freq_rap[nvoice][k] = 1.0f
- + (unison_base_freq_rap[
- nvoice][k] - 1.0f)
- * (1.0f - unison_vibratto_a);
- unison_vibratto[nvoice].step = memory.valloc<float>(unison);
- unison_vibratto[nvoice].position = memory.valloc<float>(unison);
- unison_vibratto[nvoice].amplitude =
- (unison_real_spread - 1.0f) * unison_vibratto_a;
-
- const float increments_per_second = synth.samplerate_f / synth.buffersize_f;
- const float vib_speed = pars.VoicePar[nvoice].Unison_vibratto_speed / 127.0f;
- const float vibratto_base_period = 0.25f * powf(2.0f, (1.0f - vib_speed) * 4.0f);
- for(int k = 0; k < unison; ++k) {
- unison_vibratto[nvoice].position[k] = RND * 1.8f - 0.9f;
- //make period to vary randomly from 50% to 200% vibratto base period
- const float vibratto_period = vibratto_base_period
- * powf(2.0f, RND * 2.0f - 1.0f);
-
- const float m = (RND < 0.5f ? -1.0f : 1.0f) *
- 4.0f / (vibratto_period * increments_per_second);
- unison_vibratto[nvoice].step[k] = m;
-
- // Ugly, but the alternative is likely uglier.
- if (is_pwm)
- for (int i = 0; i < unison; i += 2) {
- unison_vibratto[nvoice].step[i+1] =
- unison_vibratto[nvoice].step[i];
- unison_vibratto[nvoice].position[i+1] =
- unison_vibratto[nvoice].position[i];
- }
- }
-
- if(unison <= 2) { //no vibratto for a single voice
- if (is_pwm) {
- unison_vibratto[nvoice].step[1] = 0.0f;
- unison_vibratto[nvoice].position[1] = 0.0f;
- }
- if (is_pwm || unison == 1) {
- unison_vibratto[nvoice].step[0] = 0.0f;
- unison_vibratto[nvoice].position[0] = 0.0f;
- unison_vibratto[nvoice].amplitude = 0.0f;
- }
- }
-
- //phase invert for unison
- unison_invert_phase[nvoice][0] = false;
- if(unison != 1) {
- int inv = pars.VoicePar[nvoice].Unison_invert_phase;
- switch(inv) {
- case 0:
- for(int k = 0; k < unison; ++k)
- unison_invert_phase[nvoice][k] = false;
- break;
- case 1:
- for(int k = 0; k < unison; ++k)
- unison_invert_phase[nvoice][k] = (RND > 0.5f);
- break;
- default:
- for(int k = 0; k < unison; ++k)
- unison_invert_phase[nvoice][k] =
- (k % inv == 0) ? true : false;
- break;
- }
- }
- return unison;
- }
-
- void ADnote::setupVoiceDetune(int nvoice)
- {
- //use the Globalpars.detunetype if the detunetype is 0
- if(pars.VoicePar[nvoice].PDetuneType != 0) {
- NoteVoicePar[nvoice].Detune = getdetune(
- pars.VoicePar[nvoice].PDetuneType,
- pars.VoicePar[nvoice].
- PCoarseDetune,
- 8192); //coarse detune
- NoteVoicePar[nvoice].FineDetune = getdetune(
- pars.VoicePar[nvoice].PDetuneType,
- 0,
- pars.VoicePar[nvoice].PDetune); //fine detune
- }
- else {
- NoteVoicePar[nvoice].Detune = getdetune(
- pars.GlobalPar.PDetuneType,
- pars.VoicePar[nvoice].
- PCoarseDetune,
- 8192); //coarse detune
- NoteVoicePar[nvoice].FineDetune = getdetune(
- pars.GlobalPar.PDetuneType,
- 0,
- pars.VoicePar[nvoice].PDetune); //fine detune
- }
- if(pars.VoicePar[nvoice].PFMDetuneType != 0)
- NoteVoicePar[nvoice].FMDetune = getdetune(
- pars.VoicePar[nvoice].PFMDetuneType,
- pars.VoicePar[nvoice].
- PFMCoarseDetune,
- pars.VoicePar[nvoice].PFMDetune);
- else
- NoteVoicePar[nvoice].FMDetune = getdetune(
- pars.GlobalPar.PDetuneType,
- pars.VoicePar[nvoice].
- PFMCoarseDetune,
- pars.VoicePar[nvoice].PFMDetune);
- }
-
- void ADnote::setupVoiceMod(int nvoice, bool first_run)
- {
- auto ¶m = pars.VoicePar[nvoice];
- auto &voice = NoteVoicePar[nvoice];
- if (param.Type != 0)
- voice.FMEnabled = NONE;
- else
- switch(param.PFMEnabled) {
- case 1:
- voice.FMEnabled = MORPH;
- break;
- case 2:
- voice.FMEnabled = RING_MOD;
- break;
- case 3:
- voice.FMEnabled = PHASE_MOD;
- break;
- case 4:
- voice.FMEnabled = FREQ_MOD;
- break;
- case 5:
- voice.FMEnabled = PW_MOD;
- break;
- default:
- voice.FMEnabled = NONE;
- }
-
- voice.FMFreqFixed = param.PFMFixedFreq;
-
- //Triggers when a user enables modulation on a running voice
- if(!first_run && voice.FMEnabled != NONE && voice.FMSmp == NULL && voice.FMVoice < 0) {
- param.FMSmp->newrandseed(prng());
- voice.FMSmp = memory.valloc<float>(synth.oscilsize + OSCIL_SMP_EXTRA_SAMPLES);
- memset(voice.FMSmp, 0, sizeof(float)*(synth.oscilsize + OSCIL_SMP_EXTRA_SAMPLES));
- int vc = nvoice;
- if(param.PextFMoscil != -1)
- vc = param.PextFMoscil;
-
- float tmp = 1.0f;
- if((pars.VoicePar[vc].FMSmp->Padaptiveharmonics != 0)
- || (voice.FMEnabled == MORPH)
- || (voice.FMEnabled == RING_MOD))
- tmp = getFMvoicebasefreq(nvoice);
-
- if(!pars.GlobalPar.Hrandgrouping)
- pars.VoicePar[vc].FMSmp->newrandseed(prng());
-
- for(int k = 0; k < unison_size[nvoice]; ++k)
- oscposhiFM[nvoice][k] = (oscposhi[nvoice][k]
- + pars.VoicePar[vc].FMSmp->get(
- voice.FMSmp, tmp))
- % synth.oscilsize;
-
- for(int i = 0; i < OSCIL_SMP_EXTRA_SAMPLES; ++i)
- voice.FMSmp[synth.oscilsize + i] = voice.FMSmp[i];
- int oscposhiFM_add =
- (int)((param.PFMoscilphase
- - 64.0f) / 128.0f * synth.oscilsize
- + synth.oscilsize * 4);
- for(int k = 0; k < unison_size[nvoice]; ++k) {
- oscposhiFM[nvoice][k] += oscposhiFM_add;
- oscposhiFM[nvoice][k] %= synth.oscilsize;
- }
- }
-
-
- //Compute the Voice's modulator volume (incl. damping)
- float fmvoldamp = powf(440.0f / getvoicebasefreq(nvoice),
- param.PFMVolumeDamp / 64.0f - 1.0f);
- const float fmvolume_ = param.PFMVolume / 127.0f;
- switch(voice.FMEnabled) {
- case PHASE_MOD:
- case PW_MOD:
- fmvoldamp = powf(440.0f / getvoicebasefreq(nvoice),
- param.PFMVolumeDamp / 64.0f);
- voice.FMVolume = (expf(fmvolume_ * FM_AMP_MULTIPLIER) - 1.0f)
- * fmvoldamp * 4.0f;
- break;
- case FREQ_MOD:
- voice.FMVolume = (expf(fmvolume_ * FM_AMP_MULTIPLIER) - 1.0f)
- * fmvoldamp * 4.0f;
- break;
- default:
- if(fmvoldamp > 1.0f)
- fmvoldamp = 1.0f;
- voice.FMVolume = fmvolume_ * fmvoldamp;
- }
-
- //Voice's modulator velocity sensing
- NoteVoicePar[nvoice].FMVolume *=
- VelF(velocity, pars.VoicePar[nvoice].PFMVelocityScaleFunction);
- }
-
- SynthNote *ADnote::cloneLegato(void)
- {
- SynthParams sp{memory, ctl, synth, time, legato.param.freq, velocity,
- (bool)portamento, legato.param.midinote, true};
- return memory.alloc<ADnote>(&pars, sp);
- }
-
- // ADlegatonote: This function is (mostly) a copy of ADnote(...) and
- // initparameters() stuck together with some lines removed so that it
- // only alter the already playing note (to perform legato). It is
- // possible I left stuff that is not required for this.
- void ADnote::legatonote(LegatoParams lpars)
- {
- //ADnoteParameters &pars = *partparams;
-
- // Manage legato stuff
- if(legato.update(lpars))
- return;
-
- portamento = lpars.portamento;
- midinote = lpars.midinote;
- basefreq = lpars.frequency;
-
- if(velocity > 1.0f)
- velocity = 1.0f;
- velocity = lpars.velocity;
-
- NoteGlobalPar.Detune = getdetune(pars.GlobalPar.PDetuneType,
- pars.GlobalPar.PCoarseDetune,
- pars.GlobalPar.PDetune);
- bandwidthDetuneMultiplier = pars.getBandwidthDetuneMultiplier();
-
- if(pars.GlobalPar.PPanning == 0)
- NoteGlobalPar.Panning = RND;
- else
- NoteGlobalPar.Panning = pars.GlobalPar.PPanning / 128.0f;
-
- NoteGlobalPar.Filter->updateSense(velocity,
- pars.GlobalPar.PFilterVelocityScale,
- pars.GlobalPar.PFilterVelocityScaleFunction);
-
-
- for(int nvoice = 0; nvoice < NUM_VOICES; ++nvoice) {
- if(NoteVoicePar[nvoice].Enabled == OFF)
- continue; //(gf) Stay the same as first note in legato.
-
- NoteVoicePar[nvoice].fixedfreq = pars.VoicePar[nvoice].Pfixedfreq;
- NoteVoicePar[nvoice].fixedfreqET = pars.VoicePar[nvoice].PfixedfreqET;
-
- //use the Globalpars.detunetype if the detunetype is 0
- if(pars.VoicePar[nvoice].PDetuneType != 0) {
- NoteVoicePar[nvoice].Detune = getdetune(
- pars.VoicePar[nvoice].PDetuneType,
- pars.VoicePar[nvoice].PCoarseDetune,
- 8192); //coarse detune
- NoteVoicePar[nvoice].FineDetune = getdetune(
- pars.VoicePar[nvoice].PDetuneType,
- 0,
- pars.VoicePar[nvoice].PDetune); //fine detune
- }
- else {
- NoteVoicePar[nvoice].Detune = getdetune(
- pars.GlobalPar.PDetuneType,
- pars.VoicePar[nvoice].PCoarseDetune,
- 8192); //coarse detune
- NoteVoicePar[nvoice].FineDetune = getdetune(
- pars.GlobalPar.PDetuneType,
- 0,
- pars.VoicePar[nvoice].PDetune); //fine detune
- }
- if(pars.VoicePar[nvoice].PFMDetuneType != 0)
- NoteVoicePar[nvoice].FMDetune = getdetune(
- pars.VoicePar[nvoice].PFMDetuneType,
- pars.VoicePar[nvoice].PFMCoarseDetune,
- pars.VoicePar[nvoice].PFMDetune);
- else
- NoteVoicePar[nvoice].FMDetune = getdetune(
- pars.GlobalPar.PDetuneType,
- pars.VoicePar[nvoice].PFMCoarseDetune,
- pars.VoicePar[nvoice].PFMDetune);
-
-
- //Get the voice's oscil or external's voice oscil
- int vc = nvoice;
- if(pars.VoicePar[nvoice].Pextoscil != -1)
- vc = pars.VoicePar[nvoice].Pextoscil;
- if(!pars.GlobalPar.Hrandgrouping)
- pars.VoicePar[vc].OscilSmp->newrandseed(prng());
-
- pars.VoicePar[vc].OscilSmp->get(NoteVoicePar[nvoice].OscilSmp,
- getvoicebasefreq(nvoice),
- pars.VoicePar[nvoice].Presonance); //(gf)Modif of the above line.
-
- //I store the first elments to the last position for speedups
- for(int i = 0; i < OSCIL_SMP_EXTRA_SAMPLES; ++i)
- NoteVoicePar[nvoice].OscilSmp[synth.oscilsize
- + i] =
- NoteVoicePar[nvoice].OscilSmp[i];
-
- auto &voiceFilter = NoteVoicePar[nvoice].Filter;
- if(voiceFilter) {
- const auto &vce = pars.VoicePar[nvoice];
- voiceFilter->updateSense(velocity, vce.PFilterVelocityScale,
- vce.PFilterVelocityScaleFunction);
- }
-
- NoteVoicePar[nvoice].filterbypass =
- pars.VoicePar[nvoice].Pfilterbypass;
-
-
- NoteVoicePar[nvoice].FMVoice = pars.VoicePar[nvoice].PFMVoice;
-
- //Compute the Voice's modulator volume (incl. damping)
- float fmvoldamp = powf(440.0f / getvoicebasefreq(nvoice),
- pars.VoicePar[nvoice].PFMVolumeDamp / 64.0f
- - 1.0f);
-
- switch(NoteVoicePar[nvoice].FMEnabled) {
- case PHASE_MOD:
- case PW_MOD:
- fmvoldamp =
- powf(440.0f / getvoicebasefreq(
- nvoice), pars.VoicePar[nvoice].PFMVolumeDamp
- / 64.0f);
- NoteVoicePar[nvoice].FMVolume =
- (expf(pars.VoicePar[nvoice].PFMVolume / 127.0f
- * FM_AMP_MULTIPLIER) - 1.0f) * fmvoldamp * 4.0f;
- break;
- case FREQ_MOD:
- NoteVoicePar[nvoice].FMVolume =
- (expf(pars.VoicePar[nvoice].PFMVolume / 127.0f
- * FM_AMP_MULTIPLIER) - 1.0f) * fmvoldamp * 4.0f;
- break;
- default:
- if(fmvoldamp > 1.0f)
- fmvoldamp = 1.0f;
- NoteVoicePar[nvoice].FMVolume =
- pars.VoicePar[nvoice].PFMVolume
- / 127.0f * fmvoldamp;
- }
-
- //Voice's modulator velocity sensing
- NoteVoicePar[nvoice].FMVolume *=
- VelF(velocity,
- pars.VoicePar[nvoice].PFMVelocityScaleFunction);
-
- NoteVoicePar[nvoice].DelayTicks =
- (int)((expf(pars.VoicePar[nvoice].PDelay / 127.0f
- * logf(50.0f))
- - 1.0f) / synth.buffersize_f / 10.0f * synth.samplerate_f);
- }
-
- /// initparameters();
-
- ///////////////
- // Altered content of initparameters():
-
- int tmp[NUM_VOICES];
-
- NoteGlobalPar.Volume = 4.0f
- * powf(0.1f, 3.0f
- * (1.0f - pars.GlobalPar.PVolume
- / 96.0f)) //-60 dB .. 0 dB
- * VelF(
- velocity,
- pars.GlobalPar.PAmpVelocityScaleFunction); //velocity sensing
-
- globalnewamplitude = NoteGlobalPar.Volume
- * NoteGlobalPar.AmpEnvelope->envout_dB()
- * NoteGlobalPar.AmpLfo->amplfoout();
-
- {
- auto *filter = NoteGlobalPar.Filter;
- filter->updateSense(velocity, pars.GlobalPar.PFilterVelocityScale,
- pars.GlobalPar.PFilterVelocityScaleFunction);
- filter->updateNoteFreq(basefreq);
- }
-
- // Forbids the Modulation Voice to be greater or equal than voice
- for(int i = 0; i < NUM_VOICES; ++i)
- if(NoteVoicePar[i].FMVoice >= i)
- NoteVoicePar[i].FMVoice = -1;
-
- // Voice Parameter init
- for(unsigned nvoice = 0; nvoice < NUM_VOICES; ++nvoice) {
- if(NoteVoicePar[nvoice].Enabled == 0)
- continue;
-
- NoteVoicePar[nvoice].noisetype = pars.VoicePar[nvoice].Type;
- /* Voice Amplitude Parameters Init */
- NoteVoicePar[nvoice].Volume =
- powf(0.1f, 3.0f
- * (1.0f - pars.VoicePar[nvoice].PVolume / 127.0f)) // -60 dB .. 0 dB
- * VelF(velocity,
- pars.VoicePar[nvoice].PAmpVelocityScaleFunction); //velocity
- if(pars.VoicePar[nvoice].PVolume == 0)
- NoteVoicePar[nvoice].Volume = 0;
-
- if(pars.VoicePar[nvoice].PVolumeminus != 0)
- NoteVoicePar[nvoice].Volume = -NoteVoicePar[nvoice].Volume;
-
- if(pars.VoicePar[nvoice].PPanning == 0)
- NoteVoicePar[nvoice].Panning = RND; // random panning
- else
- NoteVoicePar[nvoice].Panning =
- pars.VoicePar[nvoice].PPanning / 128.0f;
-
- newamplitude[nvoice] = 1.0f;
- if(pars.VoicePar[nvoice].PAmpEnvelopeEnabled
- && NoteVoicePar[nvoice].AmpEnvelope)
- newamplitude[nvoice] *= NoteVoicePar[nvoice].AmpEnvelope->envout_dB();
-
-
- if(pars.VoicePar[nvoice].PAmpLfoEnabled && NoteVoicePar[nvoice].AmpLfo)
- newamplitude[nvoice] *= NoteVoicePar[nvoice].AmpLfo->amplfoout();
-
- auto *voiceFilter = NoteVoicePar[nvoice].Filter;
- if(voiceFilter) {
- voiceFilter->updateSense(velocity, pars.VoicePar[nvoice].PFilterVelocityScale,
- pars.VoicePar[nvoice].PFilterVelocityScaleFunction);
- voiceFilter->updateNoteFreq(basefreq);
- }
-
- /* Voice Modulation Parameters Init */
- if((NoteVoicePar[nvoice].FMEnabled != NONE)
- && (NoteVoicePar[nvoice].FMVoice < 0)) {
- pars.VoicePar[nvoice].FMSmp->newrandseed(prng());
-
- //Perform Anti-aliasing only on MORPH or RING MODULATION
-
- int vc = nvoice;
- if(pars.VoicePar[nvoice].PextFMoscil != -1)
- vc = pars.VoicePar[nvoice].PextFMoscil;
-
- if(!pars.GlobalPar.Hrandgrouping)
- pars.VoicePar[vc].FMSmp->newrandseed(prng());
-
- for(int i = 0; i < OSCIL_SMP_EXTRA_SAMPLES; ++i)
- NoteVoicePar[nvoice].FMSmp[synth.oscilsize + i] =
- NoteVoicePar[nvoice].FMSmp[i];
- }
-
- FMnewamplitude[nvoice] = NoteVoicePar[nvoice].FMVolume
- * ctl.fmamp.relamp;
-
- if(pars.VoicePar[nvoice].PFMAmpEnvelopeEnabled
- && NoteVoicePar[nvoice].FMAmpEnvelope)
- FMnewamplitude[nvoice] *=
- NoteVoicePar[nvoice].FMAmpEnvelope->envout_dB();
- }
-
- for(int nvoice = 0; nvoice < NUM_VOICES; ++nvoice) {
- for(unsigned i = nvoice + 1; i < NUM_VOICES; ++i)
- tmp[i] = 0;
- for(unsigned i = nvoice + 1; i < NUM_VOICES; ++i)
- if((NoteVoicePar[i].FMVoice == nvoice) && (tmp[i] == 0))
- tmp[i] = 1;
- }
- }
-
-
- /*
- * Kill a voice of ADnote
- */
- void ADnote::KillVoice(int nvoice)
- {
- memory.devalloc(oscfreqhi[nvoice]);
- memory.devalloc(oscfreqlo[nvoice]);
- memory.devalloc(oscfreqhiFM[nvoice]);
- memory.devalloc(oscfreqloFM[nvoice]);
- memory.devalloc(oscposhi[nvoice]);
- memory.devalloc(oscposlo[nvoice]);
- memory.devalloc(oscposhiFM[nvoice]);
- memory.devalloc(oscposloFM[nvoice]);
-
- memory.devalloc(unison_base_freq_rap[nvoice]);
- memory.devalloc(unison_freq_rap[nvoice]);
- memory.devalloc(unison_invert_phase[nvoice]);
- memory.devalloc(FMoldsmp[nvoice]);
- memory.devalloc(unison_vibratto[nvoice].step);
- memory.devalloc(unison_vibratto[nvoice].position);
-
- NoteVoicePar[nvoice].kill(memory, synth);
- }
-
- /*
- * Kill the note
- */
- void ADnote::KillNote()
- {
- for(unsigned nvoice = 0; nvoice < NUM_VOICES; ++nvoice) {
- if(NoteVoicePar[nvoice].Enabled == ON)
- KillVoice(nvoice);
-
- if(NoteVoicePar[nvoice].VoiceOut)
- memory.dealloc(NoteVoicePar[nvoice].VoiceOut);
- }
-
- NoteGlobalPar.kill(memory);
-
- NoteEnabled = OFF;
- }
-
- ADnote::~ADnote()
- {
- if(NoteEnabled == ON)
- KillNote();
- memory.devalloc(tmpwavel);
- memory.devalloc(tmpwaver);
- memory.devalloc(bypassl);
- memory.devalloc(bypassr);
- for(int k = 0; k < max_unison; ++k)
- memory.devalloc(tmpwave_unison[k]);
- memory.devalloc(tmpwave_unison);
- }
-
-
- /*
- * Init the parameters
- */
- void ADnote::initparameters(WatchManager *wm, const char *prefix)
- {
- int tmp[NUM_VOICES];
- ScratchString pre = prefix;
- //ADnoteParameters &pars = *partparams;
-
- // Global Parameters
- NoteGlobalPar.initparameters(pars.GlobalPar, synth,
- time,
- memory, basefreq, velocity,
- stereo, wm, prefix);
-
- NoteGlobalPar.AmpEnvelope->envout_dB(); //discard the first envelope output
- globalnewamplitude = NoteGlobalPar.Volume
- * NoteGlobalPar.AmpEnvelope->envout_dB()
- * NoteGlobalPar.AmpLfo->amplfoout();
-
- // Forbids the Modulation Voice to be greater or equal than voice
- for(int i = 0; i < NUM_VOICES; ++i)
- if(NoteVoicePar[i].FMVoice >= i)
- NoteVoicePar[i].FMVoice = -1;
-
- // Voice Parameter init
- for(int nvoice = 0; nvoice < NUM_VOICES; ++nvoice) {
- Voice &vce = NoteVoicePar[nvoice];
- ADnoteVoiceParam ¶m = pars.VoicePar[nvoice];
-
- if(vce.Enabled == 0)
- continue;
-
- vce.noisetype = param.Type;
- /* Voice Amplitude Parameters Init */
- vce.Volume = powf(0.1f, 3.0f * (1.0f - param.PVolume / 127.0f)) // -60dB..0dB
- * VelF(velocity, param.PAmpVelocityScaleFunction);
- if(param.PVolume == 0)
- vce.Volume = 0;
-
- if(param.PVolumeminus)
- vce.Volume = -vce.Volume;
-
- if(param.PPanning == 0)
- vce.Panning = RND; // random panning
- else
- vce.Panning = param.PPanning / 128.0f;
-
- newamplitude[nvoice] = 1.0f;
- if(param.PAmpEnvelopeEnabled) {
- vce.AmpEnvelope = memory.alloc<Envelope>(*param.AmpEnvelope,
- basefreq, synth.dt(), wm,
- (pre+"VoicePar"+nvoice+"/AmpEnvelope/").c_str);
- vce.AmpEnvelope->envout_dB(); //discard the first envelope sample
- newamplitude[nvoice] *= vce.AmpEnvelope->envout_dB();
- }
-
- if(param.PAmpLfoEnabled) {
- vce.AmpLfo = memory.alloc<LFO>(*param.AmpLfo, basefreq, time, wm,
- (pre+"VoicePar"+nvoice+"/AmpLfo/").c_str);
- newamplitude[nvoice] *= vce.AmpLfo->amplfoout();
- }
-
- /* Voice Frequency Parameters Init */
- if(param.PFreqEnvelopeEnabled)
- vce.FreqEnvelope = memory.alloc<Envelope>(*param.FreqEnvelope,
- basefreq, synth.dt(), wm,
- (pre+"VoicePar"+nvoice+"/FreqEnvelope/").c_str);
-
- if(param.PFreqLfoEnabled)
- vce.FreqLfo = memory.alloc<LFO>(*param.FreqLfo, basefreq, time, wm,
- (pre+"VoicePar"+nvoice+"/FreqLfo/").c_str);
-
- /* Voice Filter Parameters Init */
- if(param.PFilterEnabled) {
- vce.Filter = memory.alloc<ModFilter>(*param.VoiceFilter, synth, time, memory, stereo,
- basefreq);
- vce.Filter->updateSense(velocity, param.PFilterVelocityScale,
- param.PFilterVelocityScaleFunction);
-
-
- if(param.PFilterEnvelopeEnabled) {
- vce.FilterEnvelope =
- memory.alloc<Envelope>(*param.FilterEnvelope,
- basefreq, synth.dt(), wm,
- (pre+"VoicePar"+nvoice+"/FilterEnvelope/").c_str);
- vce.Filter->addMod(*vce.FilterEnvelope);
- }
-
- if(param.PFilterLfoEnabled) {
- vce.FilterLfo = memory.alloc<LFO>(*param.FilterLfo, basefreq, time, wm,
- (pre+"VoicePar"+nvoice+"/FilterLfo/").c_str);
- vce.Filter->addMod(*vce.FilterLfo);
- }
- }
-
- /* Voice Modulation Parameters Init */
- if((vce.FMEnabled != NONE) && (vce.FMVoice < 0)) {
- param.FMSmp->newrandseed(prng());
- vce.FMSmp = memory.valloc<float>(synth.oscilsize + OSCIL_SMP_EXTRA_SAMPLES);
-
- //Perform Anti-aliasing only on MORPH or RING MODULATION
-
- int vc = nvoice;
- if(param.PextFMoscil != -1)
- vc = param.PextFMoscil;
-
- float tmp = 1.0f;
- if((pars.VoicePar[vc].FMSmp->Padaptiveharmonics != 0)
- || (vce.FMEnabled == MORPH)
- || (vce.FMEnabled == RING_MOD))
- tmp = getFMvoicebasefreq(nvoice);
-
- if(!pars.GlobalPar.Hrandgrouping)
- pars.VoicePar[vc].FMSmp->newrandseed(prng());
-
- for(int k = 0; k < unison_size[nvoice]; ++k)
- oscposhiFM[nvoice][k] = (oscposhi[nvoice][k]
- + pars.VoicePar[vc].FMSmp->get(
- vce.FMSmp, tmp))
- % synth.oscilsize;
-
- for(int i = 0; i < OSCIL_SMP_EXTRA_SAMPLES; ++i)
- vce.FMSmp[synth.oscilsize + i] = vce.FMSmp[i];
- int oscposhiFM_add =
- (int)((param.PFMoscilphase
- - 64.0f) / 128.0f * synth.oscilsize
- + synth.oscilsize * 4);
- for(int k = 0; k < unison_size[nvoice]; ++k) {
- oscposhiFM[nvoice][k] += oscposhiFM_add;
- oscposhiFM[nvoice][k] %= synth.oscilsize;
- }
- }
-
- if(param.PFMFreqEnvelopeEnabled)
- vce.FMFreqEnvelope = memory.alloc<Envelope>(*param.FMFreqEnvelope,
- basefreq, synth.dt(), wm,
- (pre+"VoicePar"+nvoice+"/FMFreqEnvelope/").c_str);
-
- FMnewamplitude[nvoice] = vce.FMVolume * ctl.fmamp.relamp;
-
- if(param.PFMAmpEnvelopeEnabled) {
- vce.FMAmpEnvelope =
- memory.alloc<Envelope>(*param.FMAmpEnvelope,
- basefreq, synth.dt(), wm,
- (pre+"VoicePar"+nvoice+"/FMAmpEnvelope/").c_str);
- FMnewamplitude[nvoice] *= vce.FMAmpEnvelope->envout_dB();
- }
- }
-
- for(int nvoice = 0; nvoice < NUM_VOICES; ++nvoice) {
- for(int i = nvoice + 1; i < NUM_VOICES; ++i)
- tmp[i] = 0;
- for(int i = nvoice + 1; i < NUM_VOICES; ++i)
- if((NoteVoicePar[i].FMVoice == nvoice) && (tmp[i] == 0)) {
- NoteVoicePar[nvoice].VoiceOut =
- memory.valloc<float>(synth.buffersize);
- tmp[i] = 1;
- }
-
- if(NoteVoicePar[nvoice].VoiceOut)
- memset(NoteVoicePar[nvoice].VoiceOut, 0, synth.bufferbytes);
- }
- }
-
-
- /*
- * Computes the relative frequency of each unison voice and it's vibratto
- * This must be called before setfreq* functions
- */
- void ADnote::compute_unison_freq_rap(int nvoice) {
- if(unison_size[nvoice] == 1) { //no unison
- unison_freq_rap[nvoice][0] = 1.0f;
- return;
- }
- float relbw = ctl.bandwidth.relbw * bandwidthDetuneMultiplier;
- for(int k = 0; k < unison_size[nvoice]; ++k) {
- float pos = unison_vibratto[nvoice].position[k];
- float step = unison_vibratto[nvoice].step[k];
- pos += step;
- if(pos <= -1.0f) {
- pos = -1.0f;
- step = -step;
- }
- if(pos >= 1.0f) {
- pos = 1.0f;
- step = -step;
- }
- float vibratto_val = (pos - 0.333333333f * pos * pos * pos) * 1.5f; //make the vibratto lfo smoother
- unison_freq_rap[nvoice][k] = 1.0f
- + ((unison_base_freq_rap[nvoice][k]
- - 1.0f) + vibratto_val
- * unison_vibratto[nvoice].amplitude)
- * relbw;
-
- unison_vibratto[nvoice].position[k] = pos;
- step = unison_vibratto[nvoice].step[k] = step;
- }
- }
-
-
- /*
- * Computes the frequency of an oscillator
- */
- void ADnote::setfreq(int nvoice, float in_freq)
- {
- for(int k = 0; k < unison_size[nvoice]; ++k) {
- float freq = fabs(in_freq) * unison_freq_rap[nvoice][k];
- float speed = freq * synth.oscilsize_f / synth.samplerate_f;
- if(speed > synth.oscilsize_f)
- speed = synth.oscilsize_f;
-
- F2I(speed, oscfreqhi[nvoice][k]);
- oscfreqlo[nvoice][k] = speed - floor(speed);
- }
- }
-
- /*
- * Computes the frequency of an modullator oscillator
- */
- void ADnote::setfreqFM(int nvoice, float in_freq)
- {
- for(int k = 0; k < unison_size[nvoice]; ++k) {
- float freq = fabs(in_freq) * unison_freq_rap[nvoice][k];
- float speed = freq * synth.oscilsize_f / synth.samplerate_f;
- if(speed > synth.samplerate_f)
- speed = synth.samplerate_f;
-
- F2I(speed, oscfreqhiFM[nvoice][k]);
- oscfreqloFM[nvoice][k] = speed - floor(speed);
- }
- }
-
- /*
- * Get Voice base frequency
- */
- float ADnote::getvoicebasefreq(int nvoice) const
- {
- float detune = NoteVoicePar[nvoice].Detune / 100.0f
- + NoteVoicePar[nvoice].FineDetune / 100.0f
- * ctl.bandwidth.relbw * bandwidthDetuneMultiplier
- + NoteGlobalPar.Detune / 100.0f;
-
- if(NoteVoicePar[nvoice].fixedfreq == 0)
- return this->basefreq * powf(2, detune / 12.0f);
- else { //the fixed freq is enabled
- float fixedfreq = 440.0f;
- int fixedfreqET = NoteVoicePar[nvoice].fixedfreqET;
- if(fixedfreqET != 0) { //if the frequency varies according the keyboard note
- float tmp =
- (midinote
- - 69.0f) / 12.0f
- * (powf(2.0f, (fixedfreqET - 1) / 63.0f) - 1.0f);
- if(fixedfreqET <= 64)
- fixedfreq *= powf(2.0f, tmp);
- else
- fixedfreq *= powf(3.0f, tmp);
- }
- return fixedfreq * powf(2.0f, detune / 12.0f);
- }
- }
-
- /*
- * Get Voice's Modullator base frequency
- */
- float ADnote::getFMvoicebasefreq(int nvoice) const
- {
- float detune = NoteVoicePar[nvoice].FMDetune / 100.0f;
- return getvoicebasefreq(nvoice) * powf(2, detune / 12.0f);
- }
-
- /*
- * Computes all the parameters for each tick
- */
- void ADnote::computecurrentparameters()
- {
- int nvoice;
- float voicefreq, voicepitch, FMfreq,
- FMrelativepitch, globalpitch;
- globalpitch = 0.01f * (NoteGlobalPar.FreqEnvelope->envout()
- + NoteGlobalPar.FreqLfo->lfoout()
- * ctl.modwheel.relmod);
- globaloldamplitude = globalnewamplitude;
- globalnewamplitude = NoteGlobalPar.Volume
- * NoteGlobalPar.AmpEnvelope->envout_dB()
- * NoteGlobalPar.AmpLfo->amplfoout();
-
- NoteGlobalPar.Filter->update(ctl.filtercutoff.relfreq,
- ctl.filterq.relq);
-
-
- //compute the portamento, if it is used by this note
- float portamentofreqrap = 1.0f;
- if(portamento != 0) { //this voice use portamento
- portamentofreqrap = ctl.portamento.freqrap;
- if(ctl.portamento.used == 0) //the portamento has finished
- portamento = 0; //this note is no longer "portamented"
- }
-
- //compute parameters for all voices
- for(nvoice = 0; nvoice < NUM_VOICES; ++nvoice) {
- if(NoteVoicePar[nvoice].Enabled != ON)
- continue;
- NoteVoicePar[nvoice].DelayTicks -= 1;
- if(NoteVoicePar[nvoice].DelayTicks > 0)
- continue;
-
- compute_unison_freq_rap(nvoice);
-
- /*******************/
- /* Voice Amplitude */
- /*******************/
- oldamplitude[nvoice] = newamplitude[nvoice];
- newamplitude[nvoice] = 1.0f;
-
- if(NoteVoicePar[nvoice].AmpEnvelope)
- newamplitude[nvoice] *= NoteVoicePar[nvoice].AmpEnvelope->envout_dB();
-
- if(NoteVoicePar[nvoice].AmpLfo)
- newamplitude[nvoice] *= NoteVoicePar[nvoice].AmpLfo->amplfoout();
-
- /****************/
- /* Voice Filter */
- /****************/
- auto *voiceFilter = NoteVoicePar[nvoice].Filter;
- if(voiceFilter) {
- voiceFilter->update(ctl.filtercutoff.relfreq,
- ctl.filterq.relq);
- }
-
- if(NoteVoicePar[nvoice].noisetype == 0) { //compute only if the voice isn't noise
- /*******************/
- /* Voice Frequency */
- /*******************/
- voicepitch = 0.0f;
- if(NoteVoicePar[nvoice].FreqLfo)
- voicepitch += NoteVoicePar[nvoice].FreqLfo->lfoout() / 100.0f
- * ctl.bandwidth.relbw;
-
- if(NoteVoicePar[nvoice].FreqEnvelope)
- voicepitch += NoteVoicePar[nvoice].FreqEnvelope->envout()
- / 100.0f;
- voicefreq = getvoicebasefreq(nvoice)
- * powf(2, (voicepitch + globalpitch) / 12.0f); //Hz frequency
- voicefreq *=
- powf(ctl.pitchwheel.relfreq, NoteVoicePar[nvoice].BendAdjust); //change the frequency by the controller
- setfreq(nvoice, voicefreq * portamentofreqrap + NoteVoicePar[nvoice].OffsetHz);
-
- /***************/
- /* Modulator */
- /***************/
-
-
- if(NoteVoicePar[nvoice].FMEnabled != NONE) {
- FMrelativepitch = NoteVoicePar[nvoice].FMDetune / 100.0f;
- if(NoteVoicePar[nvoice].FMFreqEnvelope)
- FMrelativepitch +=
- NoteVoicePar[nvoice].FMFreqEnvelope->envout() / 100;
- if (NoteVoicePar[nvoice].FMFreqFixed)
- FMfreq =
- powf(2.0f, FMrelativepitch
- / 12.0f) * 440.0f;
- else
- FMfreq =
- powf(2.0f, FMrelativepitch
- / 12.0f) * voicefreq * portamentofreqrap;
- setfreqFM(nvoice, FMfreq);
-
- FMoldamplitude[nvoice] = FMnewamplitude[nvoice];
- FMnewamplitude[nvoice] = NoteVoicePar[nvoice].FMVolume
- * ctl.fmamp.relamp;
- if(NoteVoicePar[nvoice].FMAmpEnvelope)
- FMnewamplitude[nvoice] *=
- NoteVoicePar[nvoice].FMAmpEnvelope->envout_dB();
- }
- }
- }
- }
-
-
- /*
- * Fadein in a way that removes clicks but keep sound "punchy"
- */
- inline void ADnote::fadein(float *smps) const
- {
- int zerocrossings = 0;
- for(int i = 1; i < synth.buffersize; ++i)
- if((smps[i - 1] < 0.0f) && (smps[i] > 0.0f))
- zerocrossings++; //this is only the possitive crossings
-
- float tmp = (synth.buffersize_f - 1.0f) / (zerocrossings + 1) / 3.0f;
- if(tmp < 8.0f)
- tmp = 8.0f;
- tmp *= NoteGlobalPar.Fadein_adjustment;
-
- int n;
- F2I(tmp, n); //how many samples is the fade-in
- if(n > synth.buffersize)
- n = synth.buffersize;
- for(int i = 0; i < n; ++i) { //fade-in
- float tmp = 0.5f - cosf((float)i / (float) n * PI) * 0.5f;
- smps[i] *= tmp;
- }
- }
-
- /*
- * Computes the Oscillator (Without Modulation) - LinearInterpolation
- */
-
- /* As the code here is a bit odd due to optimization, here is what happens
- * First the current possition and frequency are retrieved from the running
- * state. These are broken up into high and low portions to indicate how many
- * samples are skipped in one step and how many fractional samples are skipped.
- * Outside of this method the fractional samples are just handled with floating
- * point code, but that's a bit slower than it needs to be. In this code the low
- * portions are known to exist between 0.0 and 1.0 and it is known that they are
- * stored in single precision floating point IEEE numbers. This implies that
- * a maximum of 24 bits are significant. The below code does your standard
- * linear interpolation that you'll see throughout this codebase, but by
- * sticking to integers for tracking the overflow of the low portion, around 15%
- * of the execution time was shaved off in the ADnote test.
- */
- inline void ADnote::ComputeVoiceOscillator_LinearInterpolation(int nvoice)
- {
- for(int k = 0; k < unison_size[nvoice]; ++k) {
- int poshi = oscposhi[nvoice][k];
- int poslo = oscposlo[nvoice][k] * (1<<24);
- int freqhi = oscfreqhi[nvoice][k];
- int freqlo = oscfreqlo[nvoice][k] * (1<<24);
- float *smps = NoteVoicePar[nvoice].OscilSmp;
- float *tw = tmpwave_unison[k];
- assert(oscfreqlo[nvoice][k] < 1.0f);
- for(int i = 0; i < synth.buffersize; ++i) {
- tw[i] = (smps[poshi] * ((1<<24) - poslo) + smps[poshi + 1] * poslo)/(1.0f*(1<<24));
- poslo += freqlo;
- poshi += freqhi + (poslo>>24);
- poslo &= 0xffffff;
- poshi &= synth.oscilsize - 1;
- }
- oscposhi[nvoice][k] = poshi;
- oscposlo[nvoice][k] = poslo/(1.0f*(1<<24));
- }
- }
-
-
-
- /*
- * Computes the Oscillator (Without Modulation) - CubicInterpolation
- *
- The differences from the Linear are to little to deserve to be used. This is because I am using a large synth.oscilsize (>512)
- inline void ADnote::ComputeVoiceOscillator_CubicInterpolation(int nvoice){
- int i,poshi;
- float poslo;
-
- poshi=oscposhi[nvoice];
- poslo=oscposlo[nvoice];
- float *smps=NoteVoicePar[nvoice].OscilSmp;
- float xm1,x0,x1,x2,a,b,c;
- for (i=0;i<synth.buffersize;i++){
- xm1=smps[poshi];
- x0=smps[poshi+1];
- x1=smps[poshi+2];
- x2=smps[poshi+3];
- a=(3.0f * (x0-x1) - xm1 + x2) / 2.0f;
- b = 2.0f*x1 + xm1 - (5.0f*x0 + x2) / 2.0f;
- c = (x1 - xm1) / 2.0f;
- tmpwave[i]=(((a * poslo) + b) * poslo + c) * poslo + x0;
- printf("a\n");
- //tmpwave[i]=smps[poshi]*(1.0f-poslo)+smps[poshi+1]*poslo;
- poslo+=oscfreqlo[nvoice];
- if (poslo>=1.0f) {
- poslo-=1.0f;
- poshi++;
- };
- poshi+=oscfreqhi[nvoice];
- poshi&=synth.oscilsize-1;
- };
- oscposhi[nvoice]=poshi;
- oscposlo[nvoice]=poslo;
- };
- */
- /*
- * Computes the Oscillator (Morphing)
- */
- inline void ADnote::ComputeVoiceOscillatorMorph(int nvoice)
- {
- ComputeVoiceOscillator_LinearInterpolation(nvoice);
- if(FMnewamplitude[nvoice] > 1.0f)
- FMnewamplitude[nvoice] = 1.0f;
- if(FMoldamplitude[nvoice] > 1.0f)
- FMoldamplitude[nvoice] = 1.0f;
-
- if(NoteVoicePar[nvoice].FMVoice >= 0) {
- //if I use VoiceOut[] as modullator
- int FMVoice = NoteVoicePar[nvoice].FMVoice;
- for(int k = 0; k < unison_size[nvoice]; ++k) {
- float *tw = tmpwave_unison[k];
- for(int i = 0; i < synth.buffersize; ++i) {
- float amp = INTERPOLATE_AMPLITUDE(FMoldamplitude[nvoice],
- FMnewamplitude[nvoice],
- i,
- synth.buffersize);
- tw[i] = tw[i]
- * (1.0f - amp) + amp * NoteVoicePar[FMVoice].VoiceOut[i];
- }
- }
- }
- else
- for(int k = 0; k < unison_size[nvoice]; ++k) {
- int poshiFM = oscposhiFM[nvoice][k];
- float posloFM = oscposloFM[nvoice][k];
- int freqhiFM = oscfreqhiFM[nvoice][k];
- float freqloFM = oscfreqloFM[nvoice][k];
- float *tw = tmpwave_unison[k];
-
- for(int i = 0; i < synth.buffersize; ++i) {
- float amp = INTERPOLATE_AMPLITUDE(FMoldamplitude[nvoice],
- FMnewamplitude[nvoice],
- i,
- synth.buffersize);
- tw[i] = tw[i] * (1.0f - amp) + amp
- * (NoteVoicePar[nvoice].FMSmp[poshiFM] * (1 - posloFM)
- + NoteVoicePar[nvoice].FMSmp[poshiFM + 1] * posloFM);
- posloFM += freqloFM;
- if(posloFM >= 1.0f) {
- posloFM -= 1.0f;
- poshiFM++;
- }
- poshiFM += freqhiFM;
- poshiFM &= synth.oscilsize - 1;
- }
- oscposhiFM[nvoice][k] = poshiFM;
- oscposloFM[nvoice][k] = posloFM;
- }
- }
-
- /*
- * Computes the Oscillator (Ring Modulation)
- */
- inline void ADnote::ComputeVoiceOscillatorRingModulation(int nvoice)
- {
- ComputeVoiceOscillator_LinearInterpolation(nvoice);
- if(FMnewamplitude[nvoice] > 1.0f)
- FMnewamplitude[nvoice] = 1.0f;
- if(FMoldamplitude[nvoice] > 1.0f)
- FMoldamplitude[nvoice] = 1.0f;
- if(NoteVoicePar[nvoice].FMVoice >= 0)
- // if I use VoiceOut[] as modullator
- for(int k = 0; k < unison_size[nvoice]; ++k) {
- float *tw = tmpwave_unison[k];
- for(int i = 0; i < synth.buffersize; ++i) {
- float amp = INTERPOLATE_AMPLITUDE(FMoldamplitude[nvoice],
- FMnewamplitude[nvoice],
- i,
- synth.buffersize);
- int FMVoice = NoteVoicePar[nvoice].FMVoice;
- tw[i] *= (1.0f - amp) + amp * NoteVoicePar[FMVoice].VoiceOut[i];
- }
- }
- else
- for(int k = 0; k < unison_size[nvoice]; ++k) {
- int poshiFM = oscposhiFM[nvoice][k];
- float posloFM = oscposloFM[nvoice][k];
- int freqhiFM = oscfreqhiFM[nvoice][k];
- float freqloFM = oscfreqloFM[nvoice][k];
- float *tw = tmpwave_unison[k];
-
- for(int i = 0; i < synth.buffersize; ++i) {
- float amp = INTERPOLATE_AMPLITUDE(FMoldamplitude[nvoice],
- FMnewamplitude[nvoice],
- i,
- synth.buffersize);
- tw[i] *= (NoteVoicePar[nvoice].FMSmp[poshiFM] * (1.0f - posloFM)
- + NoteVoicePar[nvoice].FMSmp[poshiFM
- + 1] * posloFM) * amp
- + (1.0f - amp);
- posloFM += freqloFM;
- if(posloFM >= 1.0f) {
- posloFM -= 1.0f;
- poshiFM++;
- }
- poshiFM += freqhiFM;
- poshiFM &= synth.oscilsize - 1;
- }
- oscposhiFM[nvoice][k] = poshiFM;
- oscposloFM[nvoice][k] = posloFM;
- }
- }
-
- /*
- * Computes the Oscillator (Phase Modulation or Frequency Modulation)
- */
- inline void ADnote::ComputeVoiceOscillatorFrequencyModulation(int nvoice,
- int FMmode)
- {
- if(NoteVoicePar[nvoice].FMVoice >= 0) {
- //if I use VoiceOut[] as modulator
- for(int k = 0; k < unison_size[nvoice]; ++k) {
- float *tw = tmpwave_unison[k];
- const float *smps = NoteVoicePar[NoteVoicePar[nvoice].FMVoice].VoiceOut;
- if (FMmode == PW_MOD && (k & 1))
- for (int i = 0; i < synth.buffersize; ++i)
- tw[i] = -smps[i];
- else
- memcpy(tw, smps, synth.bufferbytes);
- }
- } else {
- //Compute the modulator and store it in tmpwave_unison[][]
- for(int k = 0; k < unison_size[nvoice]; ++k) {
- int poshiFM = oscposhiFM[nvoice][k];
- int posloFM = oscposloFM[nvoice][k] * (1<<24);
- int freqhiFM = oscfreqhiFM[nvoice][k];
- int freqloFM = oscfreqloFM[nvoice][k] * (1<<24);
- float *tw = tmpwave_unison[k];
- const float *smps = NoteVoicePar[nvoice].FMSmp;
-
- for(int i = 0; i < synth.buffersize; ++i) {
- tw[i] = (smps[poshiFM] * ((1<<24) - posloFM)
- + smps[poshiFM + 1] * posloFM) / (1.0f*(1<<24));
- if (FMmode == PW_MOD && (k & 1))
- tw[i] = -tw[i];
-
- posloFM += freqloFM;
- if(posloFM >= (1<<24)) {
- posloFM &= 0xffffff;//fmod(posloFM, 1.0f);
- poshiFM++;
- }
- poshiFM += freqhiFM;
- poshiFM &= synth.oscilsize - 1;
- }
- oscposhiFM[nvoice][k] = poshiFM;
- oscposloFM[nvoice][k] = posloFM/((1<<24)*1.0f);
- }
- }
- // Amplitude interpolation
- if(ABOVE_AMPLITUDE_THRESHOLD(FMoldamplitude[nvoice],
- FMnewamplitude[nvoice])) {
- for(int k = 0; k < unison_size[nvoice]; ++k) {
- float *tw = tmpwave_unison[k];
- for(int i = 0; i < synth.buffersize; ++i)
- tw[i] *= INTERPOLATE_AMPLITUDE(FMoldamplitude[nvoice],
- FMnewamplitude[nvoice],
- i,
- synth.buffersize);
- }
- } else {
- for(int k = 0; k < unison_size[nvoice]; ++k) {
- float *tw = tmpwave_unison[k];
- for(int i = 0; i < synth.buffersize; ++i)
- tw[i] *= FMnewamplitude[nvoice];
- }
- }
-
-
- //normalize: makes all sample-rates, oscil_sizes to produce same sound
- if(FMmode == FREQ_MOD) { //Frequency modulation
- const float normalize = synth.oscilsize_f / 262144.0f * 44100.0f
- / synth.samplerate_f;
- for(int k = 0; k < unison_size[nvoice]; ++k) {
- float *tw = tmpwave_unison[k];
- float fmold = FMoldsmp[nvoice][k];
- for(int i = 0; i < synth.buffersize; ++i) {
- fmold = fmod(fmold + tw[i] * normalize, synth.oscilsize);
- tw[i] = fmold;
- }
- FMoldsmp[nvoice][k] = fmold;
- }
- }
- else { //Phase or PWM modulation
- const float normalize = synth.oscilsize_f / 262144.0f;
- for(int k = 0; k < unison_size[nvoice]; ++k) {
- float *tw = tmpwave_unison[k];
- for(int i = 0; i < synth.buffersize; ++i)
- tw[i] *= normalize;
- }
- }
-
- //do the modulation
- for(int k = 0; k < unison_size[nvoice]; ++k) {
- float *smps = NoteVoicePar[nvoice].OscilSmp;
- float *tw = tmpwave_unison[k];
- int poshi = oscposhi[nvoice][k];
- int poslo = oscposlo[nvoice][k] * (1<<24);
- int freqhi = oscfreqhi[nvoice][k];
- int freqlo = oscfreqlo[nvoice][k] * (1<<24);
-
- for(int i = 0; i < synth.buffersize; ++i) {
- int FMmodfreqhi = 0;
- F2I(tw[i], FMmodfreqhi);
- float FMmodfreqlo = tw[i]-FMmodfreqhi;//fmod(tw[i] /*+ 0.0000000001f*/, 1.0f);
- if(FMmodfreqhi < 0)
- FMmodfreqlo++;
-
- //carrier
- int carposhi = poshi + FMmodfreqhi;
- int carposlo = poslo + FMmodfreqlo;
- if (FMmode == PW_MOD && (k & 1))
- carposhi += NoteVoicePar[nvoice].phase_offset;
-
- if(carposlo >= (1<<24)) {
- carposhi++;
- carposlo &= 0xffffff;//fmod(carposlo, 1.0f);
- }
- carposhi &= (synth.oscilsize - 1);
-
- tw[i] = (smps[carposhi] * ((1<<24) - carposlo)
- + smps[carposhi + 1] * carposlo)/(1.0f*(1<<24));
-
- poslo += freqlo;
- if(poslo >= (1<<24)) {
- poslo &= 0xffffff;//fmod(poslo, 1.0f);
- poshi++;
- }
-
- poshi += freqhi;
- poshi &= synth.oscilsize - 1;
- }
- oscposhi[nvoice][k] = poshi;
- oscposlo[nvoice][k] = (poslo)/((1<<24)*1.0f);
- }
- }
-
-
- /*
- * Computes the Noise
- */
- inline void ADnote::ComputeVoiceWhiteNoise(int nvoice)
- {
- for(int k = 0; k < unison_size[nvoice]; ++k) {
- float *tw = tmpwave_unison[k];
- for(int i = 0; i < synth.buffersize; ++i)
- tw[i] = RND * 2.0f - 1.0f;
- }
- }
-
- inline void ADnote::ComputeVoicePinkNoise(int nvoice)
- {
- for(int k = 0; k < unison_size[nvoice]; ++k) {
- float *tw = tmpwave_unison[k];
- float *f = &pinking[nvoice][k > 0 ? 7 : 0];
- for(int i = 0; i < synth.buffersize; ++i) {
- float white = (RND-0.5)/4.0;
- f[0] = 0.99886*f[0]+white*0.0555179;
- f[1] = 0.99332*f[1]+white*0.0750759;
- f[2] = 0.96900*f[2]+white*0.1538520;
- f[3] = 0.86650*f[3]+white*0.3104856;
- f[4] = 0.55000*f[4]+white*0.5329522;
- f[5] = -0.7616*f[5]-white*0.0168980;
- tw[i] = f[0]+f[1]+f[2]+f[3]+f[4]+f[5]+f[6]+white*0.5362;
- f[6] = white*0.115926;
- }
- }
- }
-
- inline void ADnote::ComputeVoiceDC(int nvoice)
- {
- for(int k = 0; k < unison_size[nvoice]; ++k) {
- float *tw = tmpwave_unison[k];
- for(int i = 0; i < synth.buffersize; ++i)
- tw[i] = 1.0f;
- }
- }
-
-
-
- /*
- * Compute the ADnote samples
- * Returns 0 if the note is finished
- */
- int ADnote::noteout(float *outl, float *outr)
- {
- memcpy(outl, synth.denormalkillbuf, synth.bufferbytes);
- memcpy(outr, synth.denormalkillbuf, synth.bufferbytes);
-
- if(NoteEnabled == OFF)
- return 0;
-
- memset(bypassl, 0, synth.bufferbytes);
- memset(bypassr, 0, synth.bufferbytes);
-
- //Update Changed Parameters From UI
- for(unsigned nvoice = 0; nvoice < NUM_VOICES; ++nvoice) {
- if((NoteVoicePar[nvoice].Enabled != ON)
- || (NoteVoicePar[nvoice].DelayTicks > 0))
- continue;
- setupVoiceDetune(nvoice);
- setupVoiceMod(nvoice, false);
- }
-
- computecurrentparameters();
-
- for(unsigned nvoice = 0; nvoice < NUM_VOICES; ++nvoice) {
- if((NoteVoicePar[nvoice].Enabled != ON)
- || (NoteVoicePar[nvoice].DelayTicks > 0))
- continue;
- switch (NoteVoicePar[nvoice].noisetype) {
- case 0: //voice mode=sound
- switch(NoteVoicePar[nvoice].FMEnabled) {
- case MORPH:
- ComputeVoiceOscillatorMorph(nvoice);
- break;
- case RING_MOD:
- ComputeVoiceOscillatorRingModulation(nvoice);
- break;
- case FREQ_MOD:
- case PHASE_MOD:
- case PW_MOD:
- ComputeVoiceOscillatorFrequencyModulation(nvoice,
- NoteVoicePar[nvoice].FMEnabled);
- break;
- default:
- ComputeVoiceOscillator_LinearInterpolation(nvoice);
- //if (config.cfg.Interpolation) ComputeVoiceOscillator_CubicInterpolation(nvoice);
- }
- break;
- case 1:
- ComputeVoiceWhiteNoise(nvoice);
- break;
- case 2:
- ComputeVoicePinkNoise(nvoice);
- break;
- default:
- ComputeVoiceDC(nvoice);
- break;
- }
- // Voice Processing
-
-
- //mix subvoices into voice
- memset(tmpwavel, 0, synth.bufferbytes);
- if(stereo)
- memset(tmpwaver, 0, synth.bufferbytes);
- for(int k = 0; k < unison_size[nvoice]; ++k) {
- float *tw = tmpwave_unison[k];
- if(stereo) {
- float stereo_pos = 0;
- bool is_pwm = NoteVoicePar[nvoice].FMEnabled == PW_MOD;
- if (is_pwm) {
- if(unison_size[nvoice] > 2)
- stereo_pos = k/2
- / (float)(unison_size[nvoice]/2
- - 1) * 2.0f - 1.0f;
- } else if(unison_size[nvoice] > 1) {
- stereo_pos = k
- / (float)(unison_size[nvoice]
- - 1) * 2.0f - 1.0f;
- }
- float stereo_spread = unison_stereo_spread[nvoice] * 2.0f; //between 0 and 2.0f
- if(stereo_spread > 1.0f) {
- float stereo_pos_1 = (stereo_pos >= 0.0f) ? 1.0f : -1.0f;
- stereo_pos =
- (2.0f
- - stereo_spread) * stereo_pos
- + (stereo_spread - 1.0f) * stereo_pos_1;
- }
- else
- stereo_pos *= stereo_spread;
-
- if(unison_size[nvoice] == 1 ||
- (is_pwm && unison_size[nvoice] == 2))
- stereo_pos = 0.0f;
- float panning = (stereo_pos + 1.0f) * 0.5f;
-
-
- float lvol = (1.0f - panning) * 2.0f;
- if(lvol > 1.0f)
- lvol = 1.0f;
-
- float rvol = panning * 2.0f;
- if(rvol > 1.0f)
- rvol = 1.0f;
-
- if(unison_invert_phase[nvoice][k]) {
- lvol = -lvol;
- rvol = -rvol;
- }
-
- for(int i = 0; i < synth.buffersize; ++i)
- tmpwavel[i] += tw[i] * lvol;
- for(int i = 0; i < synth.buffersize; ++i)
- tmpwaver[i] += tw[i] * rvol;
- }
- else
- for(int i = 0; i < synth.buffersize; ++i)
- tmpwavel[i] += tw[i];
- }
-
-
- float unison_amplitude = 1.0f / sqrt(unison_size[nvoice]); //reduce the amplitude for large unison sizes
- // Amplitude
- float oldam = oldamplitude[nvoice] * unison_amplitude;
- float newam = newamplitude[nvoice] * unison_amplitude;
-
- if(ABOVE_AMPLITUDE_THRESHOLD(oldam, newam)) {
- int rest = synth.buffersize;
- //test if the amplitude if raising and the difference is high
- if((newam > oldam) && ((newam - oldam) > 0.25f)) {
- rest = 10;
- if(rest > synth.buffersize)
- rest = synth.buffersize;
- for(int i = 0; i < synth.buffersize - rest; ++i)
- tmpwavel[i] *= oldam;
- if(stereo)
- for(int i = 0; i < synth.buffersize - rest; ++i)
- tmpwaver[i] *= oldam;
- }
- // Amplitude interpolation
- for(int i = 0; i < rest; ++i) {
- float amp = INTERPOLATE_AMPLITUDE(oldam, newam, i, rest);
- tmpwavel[i + (synth.buffersize - rest)] *= amp;
- if(stereo)
- tmpwaver[i + (synth.buffersize - rest)] *= amp;
- }
- }
- else {
- for(int i = 0; i < synth.buffersize; ++i)
- tmpwavel[i] *= newam;
- if(stereo)
- for(int i = 0; i < synth.buffersize; ++i)
- tmpwaver[i] *= newam;
- }
-
- // Fade in
- if(firsttick[nvoice] != 0) {
- fadein(&tmpwavel[0]);
- if(stereo)
- fadein(&tmpwaver[0]);
- firsttick[nvoice] = 0;
- }
-
- // Filter
- if(NoteVoicePar[nvoice].Filter) {
- if(stereo)
- NoteVoicePar[nvoice].Filter->filter(tmpwavel, tmpwaver);
- else
- NoteVoicePar[nvoice].Filter->filter(tmpwavel, 0);
- }
-
- //check if the amplitude envelope is finished, if yes, the voice will be fadeout
- if(NoteVoicePar[nvoice].AmpEnvelope)
- if(NoteVoicePar[nvoice].AmpEnvelope->finished()) {
- for(int i = 0; i < synth.buffersize; ++i)
- tmpwavel[i] *= 1.0f - (float)i / synth.buffersize_f;
- if(stereo)
- for(int i = 0; i < synth.buffersize; ++i)
- tmpwaver[i] *= 1.0f - (float)i / synth.buffersize_f;
- }
- //the voice is killed later
-
-
- // Put the ADnote samples in VoiceOut (without appling Global volume, because I wish to use this voice as a modullator)
- if(NoteVoicePar[nvoice].VoiceOut) {
- if(stereo)
- for(int i = 0; i < synth.buffersize; ++i)
- NoteVoicePar[nvoice].VoiceOut[i] = tmpwavel[i]
- + tmpwaver[i];
- else //mono
- for(int i = 0; i < synth.buffersize; ++i)
- NoteVoicePar[nvoice].VoiceOut[i] = tmpwavel[i];
- }
-
-
- // Add the voice that do not bypass the filter to out
- if(NoteVoicePar[nvoice].filterbypass == 0) { //no bypass
- if(stereo)
- for(int i = 0; i < synth.buffersize; ++i) { //stereo
- outl[i] += tmpwavel[i] * NoteVoicePar[nvoice].Volume
- * NoteVoicePar[nvoice].Panning * 2.0f;
- outr[i] += tmpwaver[i] * NoteVoicePar[nvoice].Volume
- * (1.0f - NoteVoicePar[nvoice].Panning) * 2.0f;
- }
- else
- for(int i = 0; i < synth.buffersize; ++i) //mono
- outl[i] += tmpwavel[i] * NoteVoicePar[nvoice].Volume;
- }
- else { //bypass the filter
- if(stereo)
- for(int i = 0; i < synth.buffersize; ++i) { //stereo
- bypassl[i] += tmpwavel[i] * NoteVoicePar[nvoice].Volume
- * NoteVoicePar[nvoice].Panning * 2.0f;
- bypassr[i] += tmpwaver[i] * NoteVoicePar[nvoice].Volume
- * (1.0f
- - NoteVoicePar[nvoice].Panning) * 2.0f;
- }
- else
- for(int i = 0; i < synth.buffersize; ++i) //mono
- bypassl[i] += tmpwavel[i] * NoteVoicePar[nvoice].Volume;
- }
- // chech if there is necesary to proces the voice longer (if the Amplitude envelope isn't finished)
- if(NoteVoicePar[nvoice].AmpEnvelope)
- if(NoteVoicePar[nvoice].AmpEnvelope->finished())
- KillVoice(nvoice);
- }
-
-
- //Processing Global parameters
- if(stereo) {
- NoteGlobalPar.Filter->filter(outl, outr);
- } else { //set the right channel=left channel
- NoteGlobalPar.Filter->filter(outl, 0);
- memcpy(outr, outl, synth.bufferbytes);
- memcpy(bypassr, bypassl, synth.bufferbytes);
- }
-
- for(int i = 0; i < synth.buffersize; ++i) {
- outl[i] += bypassl[i];
- outr[i] += bypassr[i];
- }
-
- if(ABOVE_AMPLITUDE_THRESHOLD(globaloldamplitude, globalnewamplitude))
- // Amplitude Interpolation
- for(int i = 0; i < synth.buffersize; ++i) {
- float tmpvol = INTERPOLATE_AMPLITUDE(globaloldamplitude,
- globalnewamplitude,
- i,
- synth.buffersize);
- outl[i] *= tmpvol * NoteGlobalPar.Panning;
- outr[i] *= tmpvol * (1.0f - NoteGlobalPar.Panning);
- }
- else
- for(int i = 0; i < synth.buffersize; ++i) {
- outl[i] *= globalnewamplitude * NoteGlobalPar.Panning;
- outr[i] *= globalnewamplitude * (1.0f - NoteGlobalPar.Panning);
- }
-
- //Apply the punch
- if(NoteGlobalPar.Punch.Enabled != 0)
- for(int i = 0; i < synth.buffersize; ++i) {
- float punchamp = NoteGlobalPar.Punch.initialvalue
- * NoteGlobalPar.Punch.t + 1.0f;
- outl[i] *= punchamp;
- outr[i] *= punchamp;
- NoteGlobalPar.Punch.t -= NoteGlobalPar.Punch.dt;
- if(NoteGlobalPar.Punch.t < 0.0f) {
- NoteGlobalPar.Punch.Enabled = 0;
- break;
- }
- }
-
-
- // Apply legato-specific sound signal modifications
- legato.apply(*this, outl, outr);
-
-
- // Check if the global amplitude is finished.
- // If it does, disable the note
- if(NoteGlobalPar.AmpEnvelope->finished()) {
- for(int i = 0; i < synth.buffersize; ++i) { //fade-out
- float tmp = 1.0f - (float)i / synth.buffersize_f;
- outl[i] *= tmp;
- outr[i] *= tmp;
- }
- KillNote();
- }
- return 1;
- }
-
-
- /*
- * Release the key (NoteOff)
- */
- void ADnote::releasekey()
- {
- for(int nvoice = 0; nvoice < NUM_VOICES; ++nvoice)
- NoteVoicePar[nvoice].releasekey();
- NoteGlobalPar.FreqEnvelope->releasekey();
- NoteGlobalPar.FilterEnvelope->releasekey();
- NoteGlobalPar.AmpEnvelope->releasekey();
- }
-
- /*
- * Check if the note is finished
- */
- bool ADnote::finished() const
- {
- if(NoteEnabled == ON)
- return 0;
- else
- return 1;
- }
-
- void ADnote::entomb(void)
- {
- NoteGlobalPar.AmpEnvelope->forceFinish();
- }
-
- void ADnote::Voice::releasekey()
- {
- if(!Enabled)
- return;
- if(AmpEnvelope)
- AmpEnvelope->releasekey();
- if(FreqEnvelope)
- FreqEnvelope->releasekey();
- if(FilterEnvelope)
- FilterEnvelope->releasekey();
- if(FMFreqEnvelope)
- FMFreqEnvelope->releasekey();
- if(FMAmpEnvelope)
- FMAmpEnvelope->releasekey();
- }
-
- void ADnote::Voice::kill(Allocator &memory, const SYNTH_T &synth)
- {
- memory.devalloc(OscilSmp);
- memory.dealloc(FreqEnvelope);
- memory.dealloc(FreqLfo);
- memory.dealloc(AmpEnvelope);
- memory.dealloc(AmpLfo);
- memory.dealloc(Filter);
- memory.dealloc(FilterEnvelope);
- memory.dealloc(FilterLfo);
- memory.dealloc(FMFreqEnvelope);
- memory.dealloc(FMAmpEnvelope);
-
- if((FMEnabled != NONE) && (FMVoice < 0))
- memory.devalloc(FMSmp);
-
- if(VoiceOut)
- memset(VoiceOut, 0, synth.bufferbytes);
- //the buffer can't be safely deleted as it may be
- //an input to another voice
-
- Enabled = OFF;
- }
-
- void ADnote::Global::kill(Allocator &memory)
- {
- memory.dealloc(FreqEnvelope);
- memory.dealloc(FreqLfo);
- memory.dealloc(AmpEnvelope);
- memory.dealloc(AmpLfo);
- memory.dealloc(Filter);
- memory.dealloc(FilterEnvelope);
- memory.dealloc(FilterLfo);
- }
-
- void ADnote::Global::initparameters(const ADnoteGlobalParam ¶m,
- const SYNTH_T &synth,
- const AbsTime &time,
- class Allocator &memory,
- float basefreq, float velocity,
- bool stereo,
- WatchManager *wm,
- const char *prefix)
- {
- ScratchString pre = prefix;
- FreqEnvelope = memory.alloc<Envelope>(*param.FreqEnvelope, basefreq,
- synth.dt(), wm, (pre+"GlobalPar/FreqEnvelope/").c_str);
- FreqLfo = memory.alloc<LFO>(*param.FreqLfo, basefreq, time, wm,
- (pre+"GlobalPar/FreqLfo/").c_str);
-
- AmpEnvelope = memory.alloc<Envelope>(*param.AmpEnvelope, basefreq,
- synth.dt(), wm, (pre+"GlobalPar/AmpEnvelope/").c_str);
- AmpLfo = memory.alloc<LFO>(*param.AmpLfo, basefreq, time, wm,
- (pre+"GlobalPar/AmpLfo/").c_str);
-
- Volume = 4.0f * powf(0.1f, 3.0f * (1.0f - param.PVolume / 96.0f)) //-60 dB .. 0 dB
- * VelF(velocity, param.PAmpVelocityScaleFunction); //sensing
-
- Filter = memory.alloc<ModFilter>(*param.GlobalFilter, synth, time, memory,
- stereo, basefreq);
-
- FilterEnvelope = memory.alloc<Envelope>(*param.FilterEnvelope, basefreq,
- synth.dt(), wm, (pre+"GlobalPar/FilterEnvelope/").c_str);
- FilterLfo = memory.alloc<LFO>(*param.FilterLfo, basefreq, time, wm,
- (pre+"GlobalPar/FilterLfo/").c_str);
-
- Filter->addMod(*FilterEnvelope);
- Filter->addMod(*FilterLfo);
-
- {
- Filter->updateSense(velocity, param.PFilterVelocityScale,
- param.PFilterVelocityScaleFunction);
- }
- }
-
- }
|