mirror of
https://github.com/thestk/stk
synced 2026-01-11 20:11:52 +00:00
61 lines
1.9 KiB
C++
61 lines
1.9 KiB
C++
/******************************************/
|
|
/* Heavy Metal Synth Subclass */
|
|
/* of Algorithm 3 (TX81Z) Subclass of */
|
|
/* 3 Operator FM Synth */
|
|
/* by Perry R. Cook, 1995-96 */
|
|
/******************************************/
|
|
|
|
#include "HeavyMtl.h"
|
|
|
|
HeavyMtl :: HeavyMtl() : FM4Alg3()
|
|
{
|
|
this->loadWaves("rawwaves/sinewave.raw",
|
|
"rawwaves/twopeaks.raw",
|
|
"rawwaves/twopeaks.raw",
|
|
"rawwaves/sinewave.raw");
|
|
|
|
this->setRatio(0,(MY_FLOAT) (1.00 * 1.000));
|
|
this->setRatio(1,(MY_FLOAT) (4.00 * 0.999));
|
|
this->setRatio(2,(MY_FLOAT) (3.00 * 1.001));
|
|
this->setRatio(3,(MY_FLOAT) (0.50 * 1.002));
|
|
gains[0] = __FM4Op_gains[92];
|
|
gains[1] = __FM4Op_gains[76];
|
|
gains[2] = __FM4Op_gains[91];
|
|
gains[3] = __FM4Op_gains[68];
|
|
adsr[0]->setAllTimes((MY_FLOAT) 0.001,(MY_FLOAT) 0.001,(MY_FLOAT) 1.0,(MY_FLOAT) 0.01);
|
|
adsr[1]->setAllTimes((MY_FLOAT) 0.001,(MY_FLOAT) 0.010,(MY_FLOAT) 1.0,(MY_FLOAT) 0.50);
|
|
adsr[2]->setAllTimes((MY_FLOAT) 0.010,(MY_FLOAT) 0.005,(MY_FLOAT) 1.0,(MY_FLOAT) 0.20);
|
|
adsr[3]->setAllTimes((MY_FLOAT) 0.030,(MY_FLOAT) 0.010,(MY_FLOAT) 0.2,(MY_FLOAT) 0.20);
|
|
twozero->setGain((MY_FLOAT) 2.0);
|
|
vibWave->setFreq((MY_FLOAT) 5.5);
|
|
modDepth = (MY_FLOAT) 0.00;
|
|
}
|
|
|
|
HeavyMtl :: ~HeavyMtl()
|
|
{
|
|
|
|
}
|
|
|
|
void HeavyMtl :: setFreq(MY_FLOAT frequency)
|
|
{
|
|
baseFreq = frequency;
|
|
waves[0]->setFreq(baseFreq * ratios[0]);
|
|
waves[1]->setFreq(baseFreq * ratios[1]);
|
|
waves[2]->setFreq(baseFreq * ratios[2]);
|
|
waves[3]->setFreq(baseFreq * ratios[3]);
|
|
}
|
|
|
|
void HeavyMtl :: noteOn(MY_FLOAT freq, MY_FLOAT amp)
|
|
{
|
|
gains[0] = amp * __FM4Op_gains[92];
|
|
gains[1] = amp * __FM4Op_gains[76];
|
|
gains[2] = amp * __FM4Op_gains[91];
|
|
gains[3] = amp * __FM4Op_gains[68];
|
|
this->setFreq(freq);
|
|
this->keyOn();
|
|
#if defined(_debug_)
|
|
printf("HeavyMtl : NoteOn: Freq=%lf Amp=%lf\n",freq,amp);
|
|
#endif
|
|
}
|
|
|