@@ -0,0 +1,246 @@ | |||
#include "gen_exported.h" | |||
namespace gen_exported { | |||
/******************************************************************************************************************* | |||
Copyright (c) 2012 Cycling '74 | |||
Permission is hereby granted, free of charge, to any person obtaining a copy of this software | |||
and associated documentation files (the "Software"), to deal in the Software without restriction, | |||
including without limitation the rights to use, copy, modify, merge, publish, distribute, sublicense, | |||
and/or sell copies of the Software, and to permit persons to whom the Software is furnished to do so, | |||
subject to the following conditions: | |||
The above copyright notice and this permission notice shall be included in all copies | |||
or substantial portions of the Software. | |||
THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, | |||
INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. | |||
IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, | |||
WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE | |||
OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. | |||
*******************************************************************************************************************/ | |||
// global noise generator | |||
Noise noise; | |||
static const int GENLIB_LOOPCOUNT_BAIL = 100000; | |||
// The State struct contains all the state and procedures for the gendsp kernel | |||
typedef struct State { | |||
CommonState __commonstate; | |||
Delay m_delay_3; | |||
SineCycle m_cycle_7; | |||
SineData __sinedata; | |||
double m_depth_5; | |||
double m_tone_6; | |||
double samplerate; | |||
double m_rate_4; | |||
double m_y_2; | |||
double m_smth_1; | |||
int vectorsize; | |||
int __exception; | |||
// re-initialize all member variables; | |||
inline void reset(double __sr, int __vs) { | |||
__exception = 0; | |||
vectorsize = __vs; | |||
samplerate = __sr; | |||
m_smth_1 = 0; | |||
m_y_2 = 0; | |||
m_delay_3.reset("m_delay_3", 48000); | |||
m_rate_4 = 5; | |||
m_depth_5 = 1; | |||
m_tone_6 = 6000; | |||
m_cycle_7.reset(samplerate, 0); | |||
genlib_reset_complete(this); | |||
}; | |||
// the signal processing routine; | |||
inline int perform(t_sample ** __ins, t_sample ** __outs, int __n) { | |||
vectorsize = __n; | |||
const t_sample * __in1 = __ins[0]; | |||
t_sample * __out1 = __outs[0]; | |||
if (__exception) { | |||
return __exception; | |||
} else if (( (__in1 == 0) || (__out1 == 0) )) { | |||
__exception = GENLIB_ERR_NULL_BUFFER; | |||
return __exception; | |||
}; | |||
double expr_12601 = safediv(((m_tone_6 * 2) * 3.1415926535898), 48000); | |||
double sin_12592 = sin(expr_12601); | |||
double clamp_12593 = ((sin_12592 <= 1e-05) ? 1e-05 : ((sin_12592 >= 0.99999) ? 0.99999 : sin_12592)); | |||
// the main sample loop; | |||
while ((__n--)) { | |||
const double in1 = (*(__in1++)); | |||
double mix_12606 = (m_y_2 + (clamp_12593 * (in1 - m_y_2))); | |||
double mix_12590 = mix_12606; | |||
m_cycle_7.freq(m_rate_4); | |||
double cycle_12596 = m_cycle_7(__sinedata); | |||
double cycleindex_12597 = m_cycle_7.phase(); | |||
double add_12595 = (cycle_12596 + 1); | |||
double mul_12594 = (add_12595 * 0.5); | |||
double mul_12598 = (m_depth_5 * mul_12594); | |||
double mstosamps_12589 = (mul_12598 * (samplerate * 0.001)); | |||
double mix_12607 = (mstosamps_12589 + (0.999 * (m_smth_1 - mstosamps_12589))); | |||
double mix_12588 = mix_12607; | |||
double tap_12600 = m_delay_3.read_linear(mix_12588); | |||
double out1 = tap_12600; | |||
double y0_next_12602 = mix_12590; | |||
double smth_next_12603 = mix_12588; | |||
m_delay_3.write(mix_12590); | |||
m_y_2 = y0_next_12602; | |||
m_smth_1 = smth_next_12603; | |||
m_delay_3.step(); | |||
// assign results to output buffer; | |||
(*(__out1++)) = out1; | |||
}; | |||
return __exception; | |||
}; | |||
inline void set_rate(double _value) { | |||
m_rate_4 = (_value < 0.1 ? 0.1 : (_value > 10 ? 10 : _value)); | |||
}; | |||
inline void set_depth(double _value) { | |||
m_depth_5 = (_value < 0 ? 0 : (_value > 5 ? 5 : _value)); | |||
}; | |||
inline void set_tone(double _value) { | |||
m_tone_6 = (_value < 500 ? 500 : (_value > 12000 ? 12000 : _value)); | |||
}; | |||
} State; | |||
/// | |||
/// Configuration for the genlib API | |||
/// | |||
/// Number of signal inputs and outputs | |||
int gen_kernel_numins = 1; | |||
int gen_kernel_numouts = 1; | |||
int num_inputs() { return gen_kernel_numins; } | |||
int num_outputs() { return gen_kernel_numouts; } | |||
int num_params() { return 3; } | |||
/// Assistive lables for the signal inputs and outputs | |||
const char * gen_kernel_innames[] = { "in1" }; | |||
const char * gen_kernel_outnames[] = { "out1" }; | |||
/// Invoke the signal process of a State object | |||
int perform(CommonState *cself, t_sample **ins, long numins, t_sample **outs, long numouts, long n) { | |||
State * self = (State *)cself; | |||
return self->perform(ins, outs, n); | |||
} | |||
/// Reset all parameters and stateful operators of a State object | |||
void reset(CommonState *cself) { | |||
State * self = (State *)cself; | |||
self->reset(cself->sr, cself->vs); | |||
} | |||
/// Set a parameter of a State object | |||
void setparameter(CommonState *cself, long index, double value, void *ref) { | |||
State * self = (State *)cself; | |||
switch (index) { | |||
case 0: self->set_rate(value); break; | |||
case 1: self->set_depth(value); break; | |||
case 2: self->set_tone(value); break; | |||
default: break; | |||
} | |||
} | |||
/// Get the value of a parameter of a State object | |||
void getparameter(CommonState *cself, long index, double *value) { | |||
State *self = (State *)cself; | |||
switch (index) { | |||
case 0: *value = self->m_rate_4; break; | |||
case 1: *value = self->m_depth_5; break; | |||
case 2: *value = self->m_tone_6; break; | |||
default: break; | |||
} | |||
} | |||
/// Allocate and configure a new State object and it's internal CommonState: | |||
void * create(double sr, long vs) { | |||
State *self = new State; | |||
self->reset(sr, vs); | |||
ParamInfo *pi; | |||
self->__commonstate.inputnames = gen_kernel_innames; | |||
self->__commonstate.outputnames = gen_kernel_outnames; | |||
self->__commonstate.numins = gen_kernel_numins; | |||
self->__commonstate.numouts = gen_kernel_numouts; | |||
self->__commonstate.sr = sr; | |||
self->__commonstate.vs = vs; | |||
self->__commonstate.params = (ParamInfo *)genlib_sysmem_newptr(3 * sizeof(ParamInfo)); | |||
self->__commonstate.numparams = 3; | |||
// initialize parameter 0 ("m_rate_4") | |||
pi = self->__commonstate.params + 0; | |||
pi->name = "rate"; | |||
pi->paramtype = GENLIB_PARAMTYPE_FLOAT; | |||
pi->defaultvalue = self->m_rate_4; | |||
pi->defaultref = 0; | |||
pi->hasinputminmax = false; | |||
pi->inputmin = 0; | |||
pi->inputmax = 1; | |||
pi->hasminmax = true; | |||
pi->outputmin = 0.1; | |||
pi->outputmax = 10; | |||
pi->exp = 0; | |||
pi->units = ""; // no units defined | |||
// initialize parameter 1 ("m_depth_5") | |||
pi = self->__commonstate.params + 1; | |||
pi->name = "depth"; | |||
pi->paramtype = GENLIB_PARAMTYPE_FLOAT; | |||
pi->defaultvalue = self->m_depth_5; | |||
pi->defaultref = 0; | |||
pi->hasinputminmax = false; | |||
pi->inputmin = 0; | |||
pi->inputmax = 1; | |||
pi->hasminmax = true; | |||
pi->outputmin = 0; | |||
pi->outputmax = 5; | |||
pi->exp = 0; | |||
pi->units = ""; // no units defined | |||
// initialize parameter 2 ("m_tone_6") | |||
pi = self->__commonstate.params + 2; | |||
pi->name = "tone"; | |||
pi->paramtype = GENLIB_PARAMTYPE_FLOAT; | |||
pi->defaultvalue = self->m_tone_6; | |||
pi->defaultref = 0; | |||
pi->hasinputminmax = false; | |||
pi->inputmin = 0; | |||
pi->inputmax = 1; | |||
pi->hasminmax = true; | |||
pi->outputmin = 500; | |||
pi->outputmax = 12000; | |||
pi->exp = 0; | |||
pi->units = ""; // no units defined | |||
return self; | |||
} | |||
/// Release all resources and memory used by a State object: | |||
void destroy(CommonState *cself) { | |||
State * self = (State *)cself; | |||
genlib_sysmem_freeptr(cself->params); | |||
delete self; | |||
} | |||
} // gen_exported:: |
@@ -0,0 +1,37 @@ | |||
/******************************************************************************************************************* | |||
Copyright (c) 2012 Cycling '74 | |||
Permission is hereby granted, free of charge, to any person obtaining a copy of this software | |||
and associated documentation files (the "Software"), to deal in the Software without restriction, | |||
including without limitation the rights to use, copy, modify, merge, publish, distribute, sublicense, | |||
and/or sell copies of the Software, and to permit persons to whom the Software is furnished to do so, | |||
subject to the following conditions: | |||
The above copyright notice and this permission notice shall be included in all copies | |||
or substantial portions of the Software. | |||
THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, | |||
INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. | |||
IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, | |||
WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE | |||
OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. | |||
*******************************************************************************************************************/ | |||
#include "genlib.h" | |||
#include "genlib_exportfunctions.h" | |||
#include "genlib_ops.h" | |||
namespace gen_exported { | |||
int num_inputs(); | |||
int num_outputs(); | |||
int num_params(); | |||
int perform(CommonState *cself, t_sample **ins, long numins, t_sample **outs, long numouts, long n); | |||
void reset(CommonState *cself); | |||
void setparameter(CommonState *cself, long index, double value, void *ref); | |||
void getparameter(CommonState *cself, long index, double *value); | |||
void * create(double sr, long vs); | |||
void destroy(CommonState *cself); | |||
} // gen_exported:: |
@@ -0,0 +1,459 @@ | |||
{ | |||
"patcher" : { | |||
"fileversion" : 1, | |||
"appversion" : { | |||
"major" : 6, | |||
"minor" : 1, | |||
"revision" : 9, | |||
"architecture" : "x86" | |||
} | |||
, | |||
"rect" : [ 0.0, 48.0, 960.0, 705.0 ], | |||
"bgcolor" : [ 0.9, 0.9, 0.9, 1.0 ], | |||
"bglocked" : 0, | |||
"openinpresentation" : 0, | |||
"default_fontsize" : 12.0, | |||
"default_fontface" : 0, | |||
"default_fontname" : "Arial", | |||
"gridonopen" : 0, | |||
"gridsize" : [ 15.0, 15.0 ], | |||
"gridsnaponopen" : 0, | |||
"statusbarvisible" : 2, | |||
"toolbarvisible" : 1, | |||
"boxanimatetime" : 200, | |||
"imprint" : 0, | |||
"enablehscroll" : 1, | |||
"enablevscroll" : 1, | |||
"devicewidth" : 0.0, | |||
"description" : "", | |||
"digest" : "", | |||
"tags" : "", | |||
"boxes" : [ { | |||
"box" : { | |||
"fontname" : "Arial", | |||
"fontsize" : 12.0, | |||
"id" : "obj-80", | |||
"maxclass" : "newobj", | |||
"numinlets" : 1, | |||
"numoutlets" : 1, | |||
"outlettype" : [ "" ], | |||
"patching_rect" : [ 114.0, 372.0, 75.0, 20.0 ], | |||
"text" : "history smth" | |||
} | |||
} | |||
, { | |||
"box" : { | |||
"fontname" : "Arial", | |||
"fontsize" : 12.0, | |||
"id" : "obj-81", | |||
"maxclass" : "newobj", | |||
"numinlets" : 2, | |||
"numoutlets" : 1, | |||
"outlettype" : [ "" ], | |||
"patching_rect" : [ 51.0, 372.0, 63.0, 20.0 ], | |||
"text" : "mix 0.999" | |||
} | |||
} | |||
, { | |||
"box" : { | |||
"fontname" : "Arial", | |||
"fontsize" : 12.0, | |||
"id" : "obj-40", | |||
"maxclass" : "newobj", | |||
"numinlets" : 1, | |||
"numoutlets" : 1, | |||
"outlettype" : [ "" ], | |||
"patching_rect" : [ 51.0, 342.0, 72.0, 20.0 ], | |||
"text" : "mstosamps" | |||
} | |||
} | |||
, { | |||
"box" : { | |||
"fontname" : "Arial", | |||
"fontsize" : 12.0, | |||
"id" : "obj-15", | |||
"maxclass" : "newobj", | |||
"numinlets" : 3, | |||
"numoutlets" : 1, | |||
"outlettype" : [ "" ], | |||
"patching_rect" : [ 30.5, 166.0, 46.0, 20.0 ], | |||
"text" : "mix" | |||
} | |||
} | |||
, { | |||
"box" : { | |||
"fontname" : "Arial", | |||
"fontsize" : 12.0, | |||
"id" : "obj-16", | |||
"maxclass" : "newobj", | |||
"numinlets" : 1, | |||
"numoutlets" : 1, | |||
"outlettype" : [ "" ], | |||
"patching_rect" : [ 57.5, 66.0, 144.0, 20.0 ], | |||
"text" : "expr out=in1*2*PI/48000\\;" | |||
} | |||
} | |||
, { | |||
"box" : { | |||
"fontname" : "Arial", | |||
"fontsize" : 12.0, | |||
"id" : "obj-24", | |||
"maxclass" : "newobj", | |||
"numinlets" : 1, | |||
"numoutlets" : 1, | |||
"outlettype" : [ "" ], | |||
"patching_rect" : [ 30.5, 141.0, 72.0, 20.0 ], | |||
"text" : "history y0 0" | |||
} | |||
} | |||
, { | |||
"box" : { | |||
"fontname" : "Arial", | |||
"fontsize" : 12.0, | |||
"id" : "obj-31", | |||
"maxclass" : "newobj", | |||
"numinlets" : 1, | |||
"numoutlets" : 1, | |||
"outlettype" : [ "" ], | |||
"patching_rect" : [ 57.5, 91.0, 26.0, 20.0 ], | |||
"text" : "sin" | |||
} | |||
} | |||
, { | |||
"box" : { | |||
"fontname" : "Arial", | |||
"fontsize" : 12.0, | |||
"id" : "obj-35", | |||
"maxclass" : "newobj", | |||
"numinlets" : 1, | |||
"numoutlets" : 1, | |||
"outlettype" : [ "" ], | |||
"patching_rect" : [ 57.5, 116.0, 125.0, 20.0 ], | |||
"text" : "clip 0.00001 0.99999" | |||
} | |||
} | |||
, { | |||
"box" : { | |||
"fontname" : "Arial", | |||
"fontsize" : 12.0, | |||
"id" : "obj-38", | |||
"maxclass" : "newobj", | |||
"numinlets" : 0, | |||
"numoutlets" : 1, | |||
"outlettype" : [ "" ], | |||
"patching_rect" : [ 57.5, 41.0, 234.0, 20.0 ], | |||
"text" : "param tone 6000 @min 500 @max 12000" | |||
} | |||
} | |||
, { | |||
"box" : { | |||
"fontname" : "Arial", | |||
"fontsize" : 12.0, | |||
"id" : "obj-62", | |||
"maxclass" : "newobj", | |||
"numinlets" : 1, | |||
"numoutlets" : 1, | |||
"outlettype" : [ "" ], | |||
"patching_rect" : [ 64.5, 292.0, 35.0, 20.0 ], | |||
"text" : "* 0.5" | |||
} | |||
} | |||
, { | |||
"box" : { | |||
"fontname" : "Arial", | |||
"fontsize" : 12.0, | |||
"id" : "obj-61", | |||
"maxclass" : "newobj", | |||
"numinlets" : 1, | |||
"numoutlets" : 1, | |||
"outlettype" : [ "" ], | |||
"patching_rect" : [ 64.5, 267.0, 28.0, 20.0 ], | |||
"text" : "+ 1" | |||
} | |||
} | |||
, { | |||
"box" : { | |||
"fontname" : "Arial", | |||
"fontsize" : 12.0, | |||
"id" : "obj-11", | |||
"maxclass" : "newobj", | |||
"numinlets" : 0, | |||
"numoutlets" : 1, | |||
"outlettype" : [ "" ], | |||
"patching_rect" : [ 64.5, 216.0, 188.0, 20.0 ], | |||
"text" : "param rate 5 @min 0.1 @max 10" | |||
} | |||
} | |||
, { | |||
"box" : { | |||
"fontname" : "Arial", | |||
"fontsize" : 12.0, | |||
"id" : "obj-58", | |||
"maxclass" : "newobj", | |||
"numinlets" : 1, | |||
"numoutlets" : 2, | |||
"outlettype" : [ "", "" ], | |||
"patching_rect" : [ 64.5, 241.5, 38.0, 20.0 ], | |||
"text" : "cycle" | |||
} | |||
} | |||
, { | |||
"box" : { | |||
"fontname" : "Arial", | |||
"fontsize" : 12.0, | |||
"id" : "obj-52", | |||
"maxclass" : "newobj", | |||
"numinlets" : 2, | |||
"numoutlets" : 1, | |||
"outlettype" : [ "" ], | |||
"patching_rect" : [ 51.0, 317.0, 32.5, 20.0 ], | |||
"text" : "*" | |||
} | |||
} | |||
, { | |||
"box" : { | |||
"fontname" : "Arial", | |||
"fontsize" : 12.0, | |||
"id" : "obj-49", | |||
"maxclass" : "newobj", | |||
"numinlets" : 0, | |||
"numoutlets" : 1, | |||
"outlettype" : [ "" ], | |||
"patching_rect" : [ 51.0, 191.0, 181.0, 20.0 ], | |||
"text" : "param depth 1 @min 0 @max 5" | |||
} | |||
} | |||
, { | |||
"box" : { | |||
"fontname" : "Arial", | |||
"fontsize" : 12.0, | |||
"id" : "obj-29", | |||
"maxclass" : "newobj", | |||
"numinlets" : 2, | |||
"numoutlets" : 1, | |||
"outlettype" : [ "" ], | |||
"patching_rect" : [ 31.0, 402.0, 39.0, 20.0 ], | |||
"text" : "delay" | |||
} | |||
} | |||
, { | |||
"box" : { | |||
"fontname" : "Arial", | |||
"fontsize" : 12.0, | |||
"id" : "obj-1", | |||
"maxclass" : "newobj", | |||
"numinlets" : 0, | |||
"numoutlets" : 1, | |||
"outlettype" : [ "" ], | |||
"patching_rect" : [ 44.0, 16.0, 30.0, 20.0 ], | |||
"text" : "in 1" | |||
} | |||
} | |||
, { | |||
"box" : { | |||
"fontname" : "Arial", | |||
"fontsize" : 12.0, | |||
"id" : "obj-4", | |||
"maxclass" : "newobj", | |||
"numinlets" : 1, | |||
"numoutlets" : 0, | |||
"patching_rect" : [ 31.0, 427.0, 37.0, 20.0 ], | |||
"text" : "out 1" | |||
} | |||
} | |||
], | |||
"lines" : [ { | |||
"patchline" : { | |||
"destination" : [ "obj-15", 1 ], | |||
"disabled" : 0, | |||
"hidden" : 0, | |||
"source" : [ "obj-1", 0 ] | |||
} | |||
} | |||
, { | |||
"patchline" : { | |||
"destination" : [ "obj-58", 0 ], | |||
"disabled" : 0, | |||
"hidden" : 0, | |||
"source" : [ "obj-11", 0 ] | |||
} | |||
} | |||
, { | |||
"patchline" : { | |||
"destination" : [ "obj-24", 0 ], | |||
"disabled" : 0, | |||
"hidden" : 0, | |||
"midpoints" : [ 40.0, 193.0, 13.0, 193.0, 13.0, 133.0, 40.0, 133.0 ], | |||
"source" : [ "obj-15", 0 ] | |||
} | |||
} | |||
, { | |||
"patchline" : { | |||
"destination" : [ "obj-29", 0 ], | |||
"disabled" : 0, | |||
"hidden" : 0, | |||
"source" : [ "obj-15", 0 ] | |||
} | |||
} | |||
, { | |||
"patchline" : { | |||
"destination" : [ "obj-31", 0 ], | |||
"disabled" : 0, | |||
"hidden" : 0, | |||
"source" : [ "obj-16", 0 ] | |||
} | |||
} | |||
, { | |||
"patchline" : { | |||
"destination" : [ "obj-15", 0 ], | |||
"disabled" : 0, | |||
"hidden" : 0, | |||
"source" : [ "obj-24", 0 ] | |||
} | |||
} | |||
, { | |||
"patchline" : { | |||
"destination" : [ "obj-4", 0 ], | |||
"disabled" : 0, | |||
"hidden" : 0, | |||
"source" : [ "obj-29", 0 ] | |||
} | |||
} | |||
, { | |||
"patchline" : { | |||
"destination" : [ "obj-35", 0 ], | |||
"disabled" : 0, | |||
"hidden" : 0, | |||
"source" : [ "obj-31", 0 ] | |||
} | |||
} | |||
, { | |||
"patchline" : { | |||
"destination" : [ "obj-15", 2 ], | |||
"disabled" : 0, | |||
"hidden" : 0, | |||
"source" : [ "obj-35", 0 ] | |||
} | |||
} | |||
, { | |||
"patchline" : { | |||
"destination" : [ "obj-16", 0 ], | |||
"disabled" : 0, | |||
"hidden" : 0, | |||
"source" : [ "obj-38", 0 ] | |||
} | |||
} | |||
, { | |||
"patchline" : { | |||
"destination" : [ "obj-81", 0 ], | |||
"disabled" : 0, | |||
"hidden" : 0, | |||
"midpoints" : [ 60.5, 365.0, 60.5, 365.0 ], | |||
"source" : [ "obj-40", 0 ] | |||
} | |||
} | |||
, { | |||
"patchline" : { | |||
"destination" : [ "obj-52", 0 ], | |||
"disabled" : 0, | |||
"hidden" : 0, | |||
"source" : [ "obj-49", 0 ] | |||
} | |||
} | |||
, { | |||
"patchline" : { | |||
"destination" : [ "obj-40", 0 ], | |||
"disabled" : 0, | |||
"hidden" : 0, | |||
"source" : [ "obj-52", 0 ] | |||
} | |||
} | |||
, { | |||
"patchline" : { | |||
"destination" : [ "obj-61", 0 ], | |||
"disabled" : 0, | |||
"hidden" : 0, | |||
"source" : [ "obj-58", 0 ] | |||
} | |||
} | |||
, { | |||
"patchline" : { | |||
"destination" : [ "obj-62", 0 ], | |||
"disabled" : 0, | |||
"hidden" : 0, | |||
"source" : [ "obj-61", 0 ] | |||
} | |||
} | |||
, { | |||
"patchline" : { | |||
"destination" : [ "obj-52", 1 ], | |||
"disabled" : 0, | |||
"hidden" : 0, | |||
"source" : [ "obj-62", 0 ] | |||
} | |||
} | |||
, { | |||
"patchline" : { | |||
"destination" : [ "obj-81", 1 ], | |||
"disabled" : 0, | |||
"hidden" : 0, | |||
"source" : [ "obj-80", 0 ] | |||
} | |||
} | |||
, { | |||
"patchline" : { | |||
"destination" : [ "obj-29", 1 ], | |||
"disabled" : 0, | |||
"hidden" : 0, | |||
"source" : [ "obj-81", 0 ] | |||
} | |||
} | |||
, { | |||
"patchline" : { | |||
"destination" : [ "obj-80", 0 ], | |||
"disabled" : 0, | |||
"hidden" : 0, | |||
"source" : [ "obj-81", 0 ] | |||
} | |||
} | |||
] | |||
} | |||
} |
@@ -31,20 +31,22 @@ static const int GENLIB_LOOPCOUNT_BAIL = 100000; | |||
// The State struct contains all the state and procedures for the gendsp kernel | |||
typedef struct State { | |||
CommonState __commonstate; | |||
DCBlock m_dcblock_11; | |||
Delay m_delay_2; | |||
Delay m_delay_3; | |||
SineCycle m_cycle_12; | |||
DCBlock m_dcblock_13; | |||
Delay m_delay_5; | |||
Delay m_delay_4; | |||
SineCycle m_cycle_14; | |||
SineData __sinedata; | |||
double m_mix_9; | |||
double m_morph_9; | |||
double m_tone_10; | |||
double m_mix_12; | |||
double m_repeats_11; | |||
double m_rate_8; | |||
double m_morph_10; | |||
double m_time_6; | |||
double m_smth_3; | |||
double m_depth_7; | |||
double m_repeats_5; | |||
double m_time_4; | |||
double m_tone_6; | |||
double m_smth_1; | |||
double samplerate; | |||
double m_y_1; | |||
double m_y_2; | |||
int vectorsize; | |||
int __exception; | |||
// re-initialize all member variables; | |||
@@ -52,18 +54,20 @@ typedef struct State { | |||
__exception = 0; | |||
vectorsize = __vs; | |||
samplerate = __sr; | |||
m_y_1 = 0; | |||
m_delay_2.reset("m_delay_2", 48000); | |||
m_delay_3.reset("m_delay_3", 48000); | |||
m_time_4 = 500; | |||
m_repeats_5 = 75; | |||
m_tone_6 = 2500; | |||
m_smth_1 = 0; | |||
m_y_2 = 0; | |||
m_smth_3 = 0; | |||
m_delay_4.reset("m_delay_4", 48000); | |||
m_delay_5.reset("m_delay_5", 48000); | |||
m_time_6 = 500; | |||
m_depth_7 = 1; | |||
m_rate_8 = 2; | |||
m_mix_9 = 100; | |||
m_morph_10 = 50; | |||
m_dcblock_11.reset(); | |||
m_cycle_12.reset(samplerate, 0); | |||
m_morph_9 = 50; | |||
m_tone_10 = 3000; | |||
m_repeats_11 = 75; | |||
m_mix_12 = 100; | |||
m_dcblock_13.reset(); | |||
m_cycle_14.reset(samplerate, 0); | |||
genlib_reset_complete(this); | |||
}; | |||
@@ -80,64 +84,72 @@ typedef struct State { | |||
return __exception; | |||
}; | |||
double mstosamps_1384 = (m_time_4 * (samplerate * 0.001)); | |||
double mul_1357 = (m_mix_9 * 0.01); | |||
double expr_1364 = safediv(((m_tone_6 * 2) * 3.1415926535898), 48000); | |||
double sin_1365 = sin(expr_1364); | |||
double clamp_1366 = ((sin_1365 <= 1e-05) ? 1e-05 : ((sin_1365 >= 0.99999) ? 0.99999 : sin_1365)); | |||
double mul_1385 = (m_morph_10 * -1); | |||
double add_1386 = (mul_1385 + 150); | |||
double mul_1387 = (add_1386 * 0.01); | |||
double mul_1390 = (mul_1387 * mul_1357); | |||
double mul_1361 = (m_repeats_5 * 0.01); | |||
double mul_1352 = (m_morph_10 * -1.4); | |||
double add_1350 = (mul_1352 + 70); | |||
double abs_1351 = fabs(add_1350); | |||
double mul_1359 = (abs_1351 * 0.01); | |||
double mul_1354 = (m_morph_10 * 1.4); | |||
double sub_1353 = (mul_1354 - 70); | |||
double mul_1360 = (sub_1353 * 0.01); | |||
int lt_1343 = (m_morph_10 < 50); | |||
double mul_1388 = (m_morph_10 * -0.4); | |||
double add_1389 = (mul_1388 + 20); | |||
double mul_1344 = (lt_1343 * add_1389); | |||
int gt_1348 = (m_morph_10 > 50); | |||
double mul_1349 = (gt_1348 * m_morph_10); | |||
double mul_1346 = (mul_1349 * -0.6); | |||
double add_1347 = (mul_1346 + 130); | |||
double clamp_1345 = ((add_1347 <= 70) ? 70 : ((add_1347 >= 100) ? 100 : add_1347)); | |||
double mul_1358 = (clamp_1345 * 0.01); | |||
double mul_12532 = (m_mix_12 * 0.01); | |||
double mstosamps_12544 = (m_time_6 * (samplerate * 0.001)); | |||
double expr_12576 = safediv(((m_tone_10 * 2) * 3.1415926535898), 48000); | |||
double sin_12539 = sin(expr_12576); | |||
double clamp_12540 = ((sin_12539 <= 1e-05) ? 1e-05 : ((sin_12539 >= 0.99999) ? 0.99999 : sin_12539)); | |||
double mul_12536 = (m_repeats_11 * 0.01); | |||
double mul_12557 = (m_morph_9 * -0.8); | |||
double add_12555 = (mul_12557 + 40); | |||
double abs_12556 = fabs(add_12555); | |||
double mul_12560 = (abs_12556 * 0.01); | |||
int lt_12547 = (m_morph_9 < 50); | |||
double mul_12529 = (m_morph_9 * -0.8); | |||
double add_12527 = (mul_12529 + 40); | |||
double abs_12528 = fabs(add_12527); | |||
double rsub_12526 = (80 - abs_12528); | |||
double mul_12530 = (rsub_12526 * 0.01); | |||
double mul_12546 = (m_morph_9 * -0.4); | |||
double add_12545 = (mul_12546 + 20); | |||
double mul_12548 = (lt_12547 * add_12545); | |||
double mul_12559 = (m_morph_9 * 0.8); | |||
double sub_12558 = (mul_12559 - 40); | |||
double mul_12561 = (sub_12558 * 0.01); | |||
int gt_12553 = (m_morph_9 > 50); | |||
double mul_12552 = (gt_12553 * m_morph_9); | |||
double sub_12551 = (mul_12552 - 50); | |||
double clamp_12550 = ((sub_12551 <= 0) ? 0 : ((sub_12551 >= 50) ? 50 : sub_12551)); | |||
double mul_12554 = (clamp_12550 * 0.04); | |||
double add_12549 = (mul_12548 + mul_12554); | |||
// the main sample loop; | |||
while ((__n--)) { | |||
const double in1 = (*(__in1++)); | |||
double tap_1383 = m_delay_3.read_cubic(mstosamps_1384); | |||
double mix_6935 = (m_y_1 + (clamp_1366 * (tap_1383 - m_y_1))); | |||
double mix_1363 = mix_6935; | |||
double mul_1380 = (mix_1363 * mul_1361); | |||
double dcblock_1355 = m_dcblock_11(mul_1380); | |||
double clamp_1356 = ((dcblock_1355 <= -1) ? -1 : ((dcblock_1355 >= 1) ? 1 : dcblock_1355)); | |||
m_cycle_12.freq(m_rate_8); | |||
double cycle_1369 = m_cycle_12(__sinedata); | |||
double cycleindex_1370 = m_cycle_12.phase(); | |||
double add_1368 = (cycle_1369 + 1); | |||
double mul_1367 = (add_1368 * 0.5); | |||
double mul_1372 = (m_depth_7 * mul_1367); | |||
double add_1371 = (mul_1344 + mul_1372); | |||
double mstosamps_1362 = (add_1371 * (samplerate * 0.001)); | |||
double tap_1377 = m_delay_2.read_linear(mstosamps_1362); | |||
double mul_1375 = (tap_1377 * mul_1358); | |||
double mul_1373 = (tap_1377 * mul_1360); | |||
double add_1379 = (mix_1363 + mul_1373); | |||
double mul_1374 = (add_1379 * mul_1359); | |||
double add_1378 = (mul_1374 + mul_1375); | |||
double mul_1381 = (add_1378 * mul_1390); | |||
double out1 = (mul_1381 + in1); | |||
double y0_next_1391 = mix_1363; | |||
m_delay_3.write((clamp_1356 + in1)); | |||
m_delay_2.write(add_1379); | |||
m_y_1 = y0_next_1391; | |||
m_delay_2.step(); | |||
m_delay_3.step(); | |||
double mix_12584 = (mstosamps_12544 + (0.999 * (m_smth_3 - mstosamps_12544))); | |||
double mix_12533 = mix_12584; | |||
double tap_12543 = m_delay_5.read_linear(mix_12533); | |||
double mix_12585 = (m_y_2 + (clamp_12540 * (tap_12543 - m_y_2))); | |||
double mix_12537 = mix_12585; | |||
double mul_12541 = (mix_12537 * mul_12536); | |||
double dcblock_12534 = m_dcblock_13(mul_12541); | |||
double clamp_12535 = ((dcblock_12534 <= -1) ? -1 : ((dcblock_12534 >= 1) ? 1 : dcblock_12534)); | |||
double mul_12566 = (mix_12537 * mul_12560); | |||
m_cycle_14.freq(m_rate_8); | |||
double cycle_12571 = m_cycle_14(__sinedata); | |||
double cycleindex_12572 = m_cycle_14.phase(); | |||
double add_12570 = (cycle_12571 + 1); | |||
double mul_12569 = (add_12570 * 0.5); | |||
double mul_12573 = (m_depth_7 * mul_12569); | |||
double add_12562 = (mul_12573 + add_12549); | |||
double mstosamps_12568 = (add_12562 * (samplerate * 0.001)); | |||
double mix_12586 = (mstosamps_12568 + (0.999 * (m_smth_1 - mstosamps_12568))); | |||
double mix_12567 = mix_12586; | |||
double tap_12575 = m_delay_4.read_linear(mix_12567); | |||
double mul_12563 = (tap_12575 * mul_12530); | |||
double mul_12531 = ((mul_12563 + mul_12566) * mul_12532); | |||
double out1 = (mul_12531 + in1); | |||
double mul_12564 = (tap_12575 * mul_12561); | |||
double add_12565 = (mix_12537 + mul_12564); | |||
double smth1_next_12577 = mix_12533; | |||
double y0_next_12578 = mix_12537; | |||
double smth2_next_12579 = mix_12567; | |||
m_delay_5.write((clamp_12535 + in1)); | |||
m_delay_4.write(add_12565); | |||
m_smth_3 = smth1_next_12577; | |||
m_y_2 = y0_next_12578; | |||
m_smth_1 = smth2_next_12579; | |||
m_delay_4.step(); | |||
m_delay_5.step(); | |||
// assign results to output buffer; | |||
(*(__out1++)) = out1; | |||
@@ -146,25 +158,25 @@ typedef struct State { | |||
}; | |||
inline void set_time(double _value) { | |||
m_time_4 = (_value < 20 ? 20 : (_value > 1000 ? 1000 : _value)); | |||
}; | |||
inline void set_repeats(double _value) { | |||
m_repeats_5 = (_value < 0 ? 0 : (_value > 100 ? 100 : _value)); | |||
}; | |||
inline void set_tone(double _value) { | |||
m_tone_6 = (_value < 500 ? 500 : (_value > 6000 ? 6000 : _value)); | |||
m_time_6 = (_value < 20 ? 20 : (_value > 1000 ? 1000 : _value)); | |||
}; | |||
inline void set_depth(double _value) { | |||
m_depth_7 = (_value < 0 ? 0 : (_value > 5 ? 5 : _value)); | |||
m_depth_7 = (_value < 0 ? 0 : (_value > 3 ? 3 : _value)); | |||
}; | |||
inline void set_rate(double _value) { | |||
m_rate_8 = (_value < 0.1 ? 0.1 : (_value > 10 ? 10 : _value)); | |||
}; | |||
inline void set_mix(double _value) { | |||
m_mix_9 = (_value < 0 ? 0 : (_value > 100 ? 100 : _value)); | |||
m_rate_8 = (_value < 0.1 ? 0.1 : (_value > 5 ? 5 : _value)); | |||
}; | |||
inline void set_morph(double _value) { | |||
m_morph_10 = (_value < 0 ? 0 : (_value > 100 ? 100 : _value)); | |||
m_morph_9 = (_value < 0 ? 0 : (_value > 100 ? 100 : _value)); | |||
}; | |||
inline void set_tone(double _value) { | |||
m_tone_10 = (_value < 500 ? 500 : (_value > 6000 ? 6000 : _value)); | |||
}; | |||
inline void set_repeats(double _value) { | |||
m_repeats_11 = (_value < 0 ? 0 : (_value > 110 ? 110 : _value)); | |||
}; | |||
inline void set_mix(double _value) { | |||
m_mix_12 = (_value < 0 ? 0 : (_value > 100 ? 100 : _value)); | |||
}; | |||
} State; | |||
@@ -208,12 +220,12 @@ void setparameter(CommonState *cself, long index, double value, void *ref) { | |||
State * self = (State *)cself; | |||
switch (index) { | |||
case 0: self->set_time(value); break; | |||
case 1: self->set_repeats(value); break; | |||
case 2: self->set_tone(value); break; | |||
case 3: self->set_depth(value); break; | |||
case 4: self->set_rate(value); break; | |||
case 5: self->set_mix(value); break; | |||
case 6: self->set_morph(value); break; | |||
case 1: self->set_depth(value); break; | |||
case 2: self->set_rate(value); break; | |||
case 3: self->set_morph(value); break; | |||
case 4: self->set_tone(value); break; | |||
case 5: self->set_repeats(value); break; | |||
case 6: self->set_mix(value); break; | |||
default: break; | |||
} | |||
@@ -224,13 +236,13 @@ void setparameter(CommonState *cself, long index, double value, void *ref) { | |||
void getparameter(CommonState *cself, long index, double *value) { | |||
State *self = (State *)cself; | |||
switch (index) { | |||
case 0: *value = self->m_time_4; break; | |||
case 1: *value = self->m_repeats_5; break; | |||
case 2: *value = self->m_tone_6; break; | |||
case 3: *value = self->m_depth_7; break; | |||
case 4: *value = self->m_rate_8; break; | |||
case 5: *value = self->m_mix_9; break; | |||
case 6: *value = self->m_morph_10; break; | |||
case 0: *value = self->m_time_6; break; | |||
case 1: *value = self->m_depth_7; break; | |||
case 2: *value = self->m_rate_8; break; | |||
case 3: *value = self->m_morph_9; break; | |||
case 4: *value = self->m_tone_10; break; | |||
case 5: *value = self->m_repeats_11; break; | |||
case 6: *value = self->m_mix_12; break; | |||
default: break; | |||
} | |||
@@ -250,11 +262,11 @@ void * create(double sr, long vs) { | |||
self->__commonstate.vs = vs; | |||
self->__commonstate.params = (ParamInfo *)genlib_sysmem_newptr(7 * sizeof(ParamInfo)); | |||
self->__commonstate.numparams = 7; | |||
// initialize parameter 0 ("m_time_4") | |||
// initialize parameter 0 ("m_time_6") | |||
pi = self->__commonstate.params + 0; | |||
pi->name = "time"; | |||
pi->paramtype = GENLIB_PARAMTYPE_FLOAT; | |||
pi->defaultvalue = self->m_time_4; | |||
pi->defaultvalue = self->m_time_6; | |||
pi->defaultref = 0; | |||
pi->hasinputminmax = false; | |||
pi->inputmin = 0; | |||
@@ -264,81 +276,81 @@ void * create(double sr, long vs) { | |||
pi->outputmax = 1000; | |||
pi->exp = 0; | |||
pi->units = ""; // no units defined | |||
// initialize parameter 1 ("m_repeats_5") | |||
// initialize parameter 1 ("m_depth_7") | |||
pi = self->__commonstate.params + 1; | |||
pi->name = "repeats"; | |||
pi->name = "depth"; | |||
pi->paramtype = GENLIB_PARAMTYPE_FLOAT; | |||
pi->defaultvalue = self->m_repeats_5; | |||
pi->defaultvalue = self->m_depth_7; | |||
pi->defaultref = 0; | |||
pi->hasinputminmax = false; | |||
pi->inputmin = 0; | |||
pi->inputmax = 1; | |||
pi->hasminmax = true; | |||
pi->outputmin = 0; | |||
pi->outputmax = 100; | |||
pi->outputmax = 3; | |||
pi->exp = 0; | |||
pi->units = ""; // no units defined | |||
// initialize parameter 2 ("m_tone_6") | |||
// initialize parameter 2 ("m_rate_8") | |||
pi = self->__commonstate.params + 2; | |||
pi->name = "tone"; | |||
pi->name = "rate"; | |||
pi->paramtype = GENLIB_PARAMTYPE_FLOAT; | |||
pi->defaultvalue = self->m_tone_6; | |||
pi->defaultvalue = self->m_rate_8; | |||
pi->defaultref = 0; | |||
pi->hasinputminmax = false; | |||
pi->inputmin = 0; | |||
pi->inputmax = 1; | |||
pi->hasminmax = true; | |||
pi->outputmin = 500; | |||
pi->outputmax = 6000; | |||
pi->outputmin = 0.1; | |||
pi->outputmax = 5; | |||
pi->exp = 0; | |||
pi->units = ""; // no units defined | |||
// initialize parameter 3 ("m_depth_7") | |||
// initialize parameter 3 ("m_morph_9") | |||
pi = self->__commonstate.params + 3; | |||
pi->name = "depth"; | |||
pi->name = "morph"; | |||
pi->paramtype = GENLIB_PARAMTYPE_FLOAT; | |||
pi->defaultvalue = self->m_depth_7; | |||
pi->defaultvalue = self->m_morph_9; | |||
pi->defaultref = 0; | |||
pi->hasinputminmax = false; | |||
pi->inputmin = 0; | |||
pi->inputmax = 1; | |||
pi->hasminmax = true; | |||
pi->outputmin = 0; | |||
pi->outputmax = 5; | |||
pi->outputmax = 100; | |||
pi->exp = 0; | |||
pi->units = ""; // no units defined | |||
// initialize parameter 4 ("m_rate_8") | |||
// initialize parameter 4 ("m_tone_10") | |||
pi = self->__commonstate.params + 4; | |||
pi->name = "rate"; | |||
pi->name = "tone"; | |||
pi->paramtype = GENLIB_PARAMTYPE_FLOAT; | |||
pi->defaultvalue = self->m_rate_8; | |||
pi->defaultvalue = self->m_tone_10; | |||
pi->defaultref = 0; | |||
pi->hasinputminmax = false; | |||
pi->inputmin = 0; | |||
pi->inputmax = 1; | |||
pi->hasminmax = true; | |||
pi->outputmin = 0.1; | |||
pi->outputmax = 10; | |||
pi->outputmin = 500; | |||
pi->outputmax = 6000; | |||
pi->exp = 0; | |||
pi->units = ""; // no units defined | |||
// initialize parameter 5 ("m_mix_9") | |||
// initialize parameter 5 ("m_repeats_11") | |||
pi = self->__commonstate.params + 5; | |||
pi->name = "mix"; | |||
pi->name = "repeats"; | |||
pi->paramtype = GENLIB_PARAMTYPE_FLOAT; | |||
pi->defaultvalue = self->m_mix_9; | |||
pi->defaultvalue = self->m_repeats_11; | |||
pi->defaultref = 0; | |||
pi->hasinputminmax = false; | |||
pi->inputmin = 0; | |||
pi->inputmax = 1; | |||
pi->hasminmax = true; | |||
pi->outputmin = 0; | |||
pi->outputmax = 100; | |||
pi->outputmax = 110; | |||
pi->exp = 0; | |||
pi->units = ""; // no units defined | |||
// initialize parameter 6 ("m_morph_10") | |||
// initialize parameter 6 ("m_mix_12") | |||
pi = self->__commonstate.params + 6; | |||
pi->name = "morph"; | |||
pi->name = "mix"; | |||
pi->paramtype = GENLIB_PARAMTYPE_FLOAT; | |||
pi->defaultvalue = self->m_morph_10; | |||
pi->defaultvalue = self->m_mix_12; | |||
pi->defaultref = 0; | |||
pi->hasinputminmax = false; | |||
pi->inputmin = 0; | |||
@@ -69,15 +69,15 @@ typedef struct State { | |||
double m_history_1; | |||
double m_history_9; | |||
double m_history_8; | |||
double m_ratio_32; | |||
double m_tone_32; | |||
double samples_to_seconds; | |||
double m_mix_26; | |||
double m_bandwidth_25; | |||
double m_shimmer_26; | |||
double m_roomsize_25; | |||
double m_damping_28; | |||
double m_decay_27; | |||
double m_tone_30; | |||
double m_shimmer_31; | |||
double m_roomsize_29; | |||
double m_bandwidth_30; | |||
double m_mix_31; | |||
double m_ratio_29; | |||
int vectorsize; | |||
int __exception; | |||
// re-initialize all member variables; | |||
@@ -96,27 +96,27 @@ typedef struct State { | |||
m_history_9 = 0; | |||
m_history_10 = 0; | |||
m_smth_11 = 0; | |||
m_delay_12.reset("m_delay_12", 7000); | |||
m_delay_13.reset("m_delay_13", 5000); | |||
m_delay_12.reset("m_delay_12", 5000); | |||
m_delay_13.reset("m_delay_13", 7000); | |||
m_delay_14.reset("m_delay_14", 6000); | |||
m_delay_15.reset("m_delay_15", 48000); | |||
m_delay_16.reset("m_delay_16", 16000); | |||
m_delay_17.reset("m_delay_17", 96000); | |||
m_delay_18.reset("m_delay_18", 15000); | |||
m_delay_19.reset("m_delay_19", 12000); | |||
m_delay_20.reset("m_delay_20", 10000); | |||
m_delay_16.reset("m_delay_16", 15000); | |||
m_delay_17.reset("m_delay_17", 16000); | |||
m_delay_18.reset("m_delay_18", 96000); | |||
m_delay_19.reset("m_delay_19", 10000); | |||
m_delay_20.reset("m_delay_20", 12000); | |||
m_delay_21.reset("m_delay_21", 48000); | |||
m_delay_22.reset("m_delay_22", 48000); | |||
m_delay_23.reset("m_delay_23", 48000); | |||
m_delay_24.reset("m_delay_24", 48000); | |||
m_bandwidth_25 = 75; | |||
m_mix_26 = 50; | |||
m_roomsize_25 = 150; | |||
m_shimmer_26 = 50; | |||
m_decay_27 = 50; | |||
m_damping_28 = 50; | |||
m_roomsize_29 = 150; | |||
m_tone_30 = 1500; | |||
m_shimmer_31 = 50; | |||
m_ratio_32 = 2; | |||
m_ratio_29 = 2; | |||
m_bandwidth_30 = 75; | |||
m_mix_31 = 50; | |||
m_tone_32 = 1500; | |||
samples_to_seconds = (1 / samplerate); | |||
m_phasor_33.reset(0); | |||
m_delta_34.reset(0); | |||
@@ -148,260 +148,260 @@ typedef struct State { | |||
return __exception; | |||
}; | |||
double mul_5308 = (m_mix_26 * 0.01); | |||
double mul_5307 = (m_damping_28 * 0.01); | |||
double expr_5535 = safediv((m_roomsize_29 * 48000), 340); | |||
double mul_5306 = (m_bandwidth_25 * 0.01); | |||
double rsub_5305 = (1 - mul_5306); | |||
double mul_5309 = (m_shimmer_31 * 0.01); | |||
double expr_5525 = safediv(((m_tone_30 * 2) * 3.1415926535898), 48000); | |||
double sin_5313 = sin(expr_5525); | |||
double clamp_5314 = ((sin_5313 <= 1e-05) ? 1e-05 : ((sin_5313 >= 0.99999) ? 0.99999 : sin_5313)); | |||
double expr_5524 = safepow(1.0418, m_decay_27); | |||
double expr_5534 = safepow(0.001, safediv(1, (expr_5524 * 48000))); | |||
double rsub_5364 = (1 - m_ratio_32); | |||
double mul_5363 = (rsub_5364 * 10); | |||
double mul_11 = (m_damping_28 * 0.01); | |||
double expr_239 = safediv((m_roomsize_25 * 48000), 340); | |||
double mul_12 = (m_mix_31 * 0.01); | |||
double mul_10 = (m_bandwidth_30 * 0.01); | |||
double rsub_9 = (1 - mul_10); | |||
double expr_229 = safediv(((m_tone_32 * 2) * 3.1415926535898), 48000); | |||
double sin_17 = sin(expr_229); | |||
double clamp_18 = ((sin_17 <= 1e-05) ? 1e-05 : ((sin_17 >= 0.99999) ? 0.99999 : sin_17)); | |||
double mul_13 = (m_shimmer_26 * 0.01); | |||
double expr_228 = safepow(1.0418, m_decay_27); | |||
double expr_238 = safepow(0.001, safediv(1, (expr_228 * 48000))); | |||
double rsub_68 = (1 - m_ratio_29); | |||
double mul_67 = (rsub_68 * 10); | |||
samples_to_seconds = (1 / samplerate); | |||
double mul_5303 = (m_decay_27 * 2); | |||
double clamp_5298 = ((mul_5303 <= 0) ? 0 : ((mul_5303 >= 100) ? 100 : mul_5303)); | |||
double mul_5302 = (clamp_5298 * 0.01); | |||
double atodb_5301 = atodb(mul_5302); | |||
double sub_5300 = (atodb_5301 - 9); | |||
double dbtoa_5299 = dbtoa(sub_5300); | |||
double mul_7 = (m_decay_27 * 2); | |||
double clamp_2 = ((mul_7 <= 0) ? 0 : ((mul_7 >= 100) ? 100 : mul_7)); | |||
double mul_6 = (clamp_2 * 0.01); | |||
double atodb_5 = atodb(mul_6); | |||
double sub_4 = (atodb_5 - 9); | |||
double dbtoa_3 = dbtoa(sub_4); | |||
// the main sample loop; | |||
while ((__n--)) { | |||
const double in1 = (*(__in1++)); | |||
double mix_5568 = (expr_5535 + (0.999 * (m_smth_11 - expr_5535))); | |||
double mix_5297 = mix_5568; | |||
double noise_5315 = noise(); | |||
double abs_5332 = fabs(noise_5315); | |||
double mul_5336 = (abs_5332 * 0.25); | |||
double noise_5316 = noise(); | |||
double abs_5333 = fabs(noise_5316); | |||
double mul_5339 = (abs_5333 * 0.25); | |||
double noise_5317 = noise(); | |||
double abs_5334 = fabs(noise_5317); | |||
double mul_5342 = (abs_5334 * 0.25); | |||
double mul_5514 = (mix_5297 * 0.81649); | |||
double tap_5438 = m_delay_24.read_linear(mul_5514); | |||
double noise_5318 = noise(); | |||
double abs_5335 = fabs(noise_5318); | |||
double mul_5345 = (abs_5335 * 0.25); | |||
double mul_5513 = (mix_5297 * 0.7071); | |||
double tap_5432 = m_delay_23.read_linear(mul_5513); | |||
double mul_5512 = (mix_5297 * 0.63245); | |||
double tap_5426 = m_delay_22.read_linear(mul_5512); | |||
double mul_5515 = (mix_5297 * 1); | |||
double tap_5520 = m_delay_21.read_linear(mul_5515); | |||
double expr_5528 = (-safepow(expr_5534, mul_5514)); | |||
double mul_5434 = (tap_5438 * expr_5528); | |||
double mix_5569 = (mul_5434 + (mul_5307 * (m_history_10 - mul_5434))); | |||
double mix_5436 = mix_5569; | |||
double expr_5527 = (-safepow(expr_5534, mul_5513)); | |||
double mul_5428 = (tap_5432 * expr_5527); | |||
double mix_5570 = (mul_5428 + (mul_5307 * (m_history_9 - mul_5428))); | |||
double mix_5430 = mix_5570; | |||
double expr_5526 = (-safepow(expr_5534, mul_5512)); | |||
double mul_5422 = (tap_5426 * expr_5526); | |||
double mix_5571 = (mul_5422 + (mul_5307 * (m_history_8 - mul_5422))); | |||
double mix_5424 = mix_5571; | |||
double expr_5533 = (-safepow(expr_5534, mul_5515)); | |||
double mul_5511 = (tap_5520 * expr_5533); | |||
double mix_5572 = (mul_5511 + (mul_5307 * (m_history_7 - mul_5511))); | |||
double mix_5518 = mix_5572; | |||
double mul_5509 = (mix_5297 * 0.000527); | |||
int int_5508 = int(mul_5509); | |||
double mul_5486 = (int_5508 * 400.600006); | |||
double tap_5485 = m_delay_20.read_linear(mul_5486); | |||
double mul_5483 = (tap_5485 * 0.625); | |||
double mul_5465 = (int_5508 * 419.5); | |||
double tap_5464 = m_delay_19.read_linear(mul_5465); | |||
double mul_5462 = (tap_5464 * 0.625); | |||
double mul_5493 = (int_5508 * 568.299988); | |||
double tap_5492 = m_delay_18.read_linear(mul_5493); | |||
double phasor_5382 = m_phasor_33(mul_5363, samples_to_seconds); | |||
double add_5356 = ((m_history_6 + phasor_5382) + 0.75); | |||
double mod_5355 = safemod(add_5356, 1); | |||
double delta_5338 = m_delta_34(mod_5355); | |||
double sah_5319 = m_sah_35(mul_5336, delta_5338, 0); | |||
int sah_5337 = m_sah_36(4800, delta_5338, 0); | |||
double mul_5328 = (sah_5337 * mod_5355); | |||
double sub_5354 = (mod_5355 - 0.5); | |||
double mul_5353 = (sub_5354 * 3.1415926535898); | |||
double cos_5352 = cos(mul_5353); | |||
double mul_5347 = (cos_5352 * cos_5352); | |||
double add_5362 = ((m_history_5 + phasor_5382) + 0.5); | |||
double mod_5361 = safemod(add_5362, 1); | |||
double delta_5341 = m_delta_37(mod_5361); | |||
double sah_5321 = m_sah_38(mul_5339, delta_5341, 0); | |||
int sah_5340 = m_sah_39(4800, delta_5341, 0); | |||
double mul_5329 = (sah_5340 * mod_5361); | |||
double sub_5360 = (mod_5361 - 0.5); | |||
double mul_5359 = (sub_5360 * 3.1415926535898); | |||
double cos_5358 = cos(mul_5359); | |||
double mul_5348 = (cos_5358 * cos_5358); | |||
double add_5376 = ((m_history_4 + phasor_5382) + 0.25); | |||
double mod_5375 = safemod(add_5376, 1); | |||
double delta_5344 = m_delta_40(mod_5375); | |||
double sah_5323 = m_sah_41(mul_5342, delta_5344, 0); | |||
int sah_5343 = m_sah_42(4800, delta_5344, 0); | |||
double mul_5330 = (sah_5343 * mod_5375); | |||
double sub_5374 = (mod_5375 - 0.5); | |||
double mul_5373 = (sub_5374 * 3.1415926535898); | |||
double cos_5372 = cos(mul_5373); | |||
double mul_5349 = (cos_5372 * cos_5372); | |||
double add_5381 = ((m_history_3 + phasor_5382) + 0); | |||
double mod_5380 = safemod(add_5381, 1); | |||
double delta_5326 = m_delta_43(mod_5380); | |||
double sah_5325 = m_sah_44(mul_5345, delta_5326, 0); | |||
int sah_5346 = m_sah_45(4800, delta_5326, 0); | |||
double mul_5331 = (sah_5346 * mod_5380); | |||
double tap_5368 = m_delay_17.read_linear(mul_5331); | |||
double tap_5369 = m_delay_17.read_linear(mul_5330); | |||
double tap_5370 = m_delay_17.read_linear(mul_5329); | |||
double tap_5371 = m_delay_17.read_linear(mul_5328); | |||
double mul_5351 = (tap_5371 * mul_5347); | |||
double mul_5357 = (tap_5370 * mul_5348); | |||
double mul_5365 = (tap_5369 * mul_5349); | |||
double sub_5379 = (mod_5380 - 0.5); | |||
double mul_5378 = (sub_5379 * 3.1415926535898); | |||
double cos_5377 = cos(mul_5378); | |||
double mul_5350 = (cos_5377 * cos_5377); | |||
double mul_5366 = (tap_5368 * mul_5350); | |||
double add_5574 = (((mul_5366 + mul_5365) + mul_5357) + mul_5351); | |||
double mix_5573 = (m_y_2 + (clamp_5314 * (add_5574 - m_y_2))); | |||
double mix_5311 = mix_5573; | |||
double mix_5575 = (in1 + (mul_5309 * (mix_5311 - in1))); | |||
double mix_5383 = mix_5575; | |||
double mul_5386 = (mix_5383 * 0.707); | |||
double mix_5576 = (mul_5386 + (rsub_5305 * (m_history_1 - mul_5386))); | |||
double mix_5522 = mix_5576; | |||
double sub_5415 = (mix_5518 - mix_5436); | |||
double sub_5412 = (mix_5430 - mix_5424); | |||
double sub_5411 = (sub_5415 - sub_5412); | |||
double mul_5394 = (sub_5411 * 0.5); | |||
double add_5452 = (mix_5297 + 5); | |||
double expr_5529 = safepow(expr_5534, add_5452); | |||
double add_5410 = (sub_5415 + sub_5412); | |||
double rsub_5408 = (0 - add_5410); | |||
double mul_5393 = (rsub_5408 * 0.5); | |||
double mul_5472 = (int_5508 * 566.700012); | |||
double tap_5471 = m_delay_16.read_linear(mul_5472); | |||
double add_5416 = (mix_5518 + mix_5436); | |||
double add_5414 = (mix_5430 + mix_5424); | |||
double add_5409 = (add_5416 + add_5414); | |||
double mul_5392 = (add_5409 * 0.5); | |||
double sub_5413 = (add_5416 - add_5414); | |||
double mul_5395 = (sub_5413 * 0.5); | |||
double mul_5490 = (tap_5492 * 0.625); | |||
double mul_5458 = (mix_5297 * 0.41); | |||
double add_5455 = (mul_5458 + 5); | |||
double expr_5532 = safepow(expr_5534, add_5455); | |||
double mul_5457 = (mix_5297 * 0.3); | |||
double add_5454 = (mul_5457 + 5); | |||
double expr_5531 = safepow(expr_5534, add_5454); | |||
double mul_5456 = (mix_5297 * 0.155); | |||
double add_5453 = (mul_5456 + 5); | |||
double tap_5440 = m_delay_15.read_linear(add_5455); | |||
double tap_5441 = m_delay_15.read_linear(add_5454); | |||
double tap_5442 = m_delay_15.read_linear(add_5453); | |||
double tap_5443 = m_delay_15.read_linear(add_5452); | |||
double mul_5448 = (tap_5441 * expr_5531); | |||
double add_5419 = (mul_5394 + mul_5448); | |||
double mul_5444 = (tap_5443 * expr_5529); | |||
double add_5417 = (mul_5392 + mul_5444); | |||
double mul_5450 = (tap_5440 * expr_5532); | |||
double add_5420 = (mul_5395 + mul_5450); | |||
double expr_5530 = safepow(expr_5534, add_5453); | |||
double mul_5446 = (tap_5442 * expr_5530); | |||
double add_5418 = (mul_5393 + mul_5446); | |||
double mul_5469 = (tap_5471 * 0.625); | |||
double mul_5507 = (mix_5297 * 0.110732); | |||
double tap_5506 = m_delay_14.read_cubic(mul_5507); | |||
double mul_5500 = (int_5508 * 162.100006); | |||
double tap_5499 = m_delay_13.read_linear(mul_5500); | |||
double mul_5504 = (tap_5506 * 0.75); | |||
double sub_5503 = (mix_5522 - mul_5504); | |||
double mul_5502 = (sub_5503 * 0.75); | |||
double add_5501 = (mul_5502 + tap_5506); | |||
double mul_5479 = (int_5508 * 144.800003); | |||
double tap_5478 = m_delay_12.read_linear(mul_5479); | |||
double mul_5497 = (tap_5499 * 0.75); | |||
double mul_5476 = (tap_5478 * 0.75); | |||
double mul_5403 = (mul_5450 * mul_5302); | |||
double mul_5401 = (mul_5446 * mul_5302); | |||
double add_5389 = (mul_5403 + mul_5401); | |||
double mul_5402 = (mul_5448 * mul_5302); | |||
double mul_5400 = (mul_5444 * mul_5302); | |||
double add_5388 = (mul_5402 + mul_5400); | |||
double sub_5398 = (add_5389 - add_5388); | |||
double mul_5407 = (mul_5395 * dbtoa_5299); | |||
double mul_5405 = (mul_5393 * dbtoa_5299); | |||
double add_5391 = (mul_5407 + mul_5405); | |||
double mul_5406 = (mul_5394 * dbtoa_5299); | |||
double mul_5404 = (mul_5392 * dbtoa_5299); | |||
double add_5390 = (mul_5406 + mul_5404); | |||
double sub_5399 = (add_5391 - add_5390); | |||
double add_5385 = (sub_5399 + sub_5398); | |||
double add_5397 = (add_5385 + mix_5383); | |||
double sub_5496 = (add_5397 - mul_5497); | |||
double mul_5495 = (sub_5496 * 0.75); | |||
double add_5494 = (mul_5495 + tap_5499); | |||
double sub_5489 = (add_5494 - mul_5490); | |||
double mul_5488 = (sub_5489 * 0.625); | |||
double add_5487 = (mul_5488 + tap_5492); | |||
double sub_5482 = (add_5487 - mul_5483); | |||
double mul_5481 = (sub_5482 * 0.625); | |||
double add_5480 = (mul_5481 + tap_5485); | |||
double mul_5396 = (add_5480 * mul_5308); | |||
double out1 = (in1 + mul_5396); | |||
double add_5387 = (add_5385 + mix_5383); | |||
double sub_5475 = (add_5387 - mul_5476); | |||
double mul_5474 = (sub_5475 * 0.75); | |||
double add_5473 = (mul_5474 + tap_5478); | |||
double sub_5468 = (add_5473 - mul_5469); | |||
double mul_5467 = (sub_5468 * 0.625); | |||
double add_5466 = (mul_5467 + tap_5471); | |||
double sub_5461 = (add_5466 - mul_5462); | |||
double mul_5460 = (sub_5461 * 0.625); | |||
double add_5459 = (mul_5460 + tap_5464); | |||
double mul_5384 = (add_5459 * mul_5308); | |||
double out2 = (in1 + mul_5384); | |||
double smth_next_5536 = mix_5297; | |||
double history_5435_next_5537 = mix_5436; | |||
double history_5429_next_5538 = mix_5430; | |||
double history_5423_next_5539 = mix_5424; | |||
double history_5517_next_5540 = mix_5518; | |||
double history_5320_next_5541 = sah_5319; | |||
double history_5322_next_5542 = sah_5321; | |||
double history_5324_next_5543 = sah_5323; | |||
double history_5327_next_5544 = sah_5325; | |||
double y0_next_5545 = mix_5311; | |||
double history_5521_next_5546 = mix_5522; | |||
m_delay_24.write(add_5419); | |||
m_delay_23.write(add_5418); | |||
m_delay_22.write(add_5417); | |||
m_delay_21.write(add_5420); | |||
m_delay_20.write(sub_5482); | |||
m_delay_19.write(sub_5461); | |||
m_delay_18.write(sub_5489); | |||
m_delay_17.write(in1); | |||
m_delay_16.write(sub_5468); | |||
m_delay_15.write(add_5501); | |||
m_delay_14.write(sub_5503); | |||
m_delay_13.write(sub_5496); | |||
m_delay_12.write(sub_5475); | |||
m_smth_11 = smth_next_5536; | |||
m_history_10 = history_5435_next_5537; | |||
m_history_9 = history_5429_next_5538; | |||
m_history_8 = history_5423_next_5539; | |||
m_history_7 = history_5517_next_5540; | |||
m_history_6 = history_5320_next_5541; | |||
m_history_5 = history_5322_next_5542; | |||
m_history_4 = history_5324_next_5543; | |||
m_history_3 = history_5327_next_5544; | |||
m_y_2 = y0_next_5545; | |||
m_history_1 = history_5521_next_5546; | |||
double mix_251 = (expr_239 + (0.999 * (m_smth_11 - expr_239))); | |||
double mix_1 = mix_251; | |||
double mul_216 = (mix_1 * 0.63245); | |||
double tap_130 = m_delay_24.read_linear(mul_216); | |||
double noise_20 = noise(); | |||
double abs_37 = fabs(noise_20); | |||
double mul_43 = (abs_37 * 0.25); | |||
double noise_21 = noise(); | |||
double abs_38 = fabs(noise_21); | |||
double mul_46 = (abs_38 * 0.25); | |||
double mul_219 = (mix_1 * 1); | |||
double tap_224 = m_delay_23.read_linear(mul_219); | |||
double noise_22 = noise(); | |||
double abs_39 = fabs(noise_22); | |||
double mul_49 = (abs_39 * 0.25); | |||
double mul_217 = (mix_1 * 0.7071); | |||
double tap_136 = m_delay_22.read_linear(mul_217); | |||
double noise_19 = noise(); | |||
double abs_36 = fabs(noise_19); | |||
double mul_40 = (abs_36 * 0.25); | |||
double mul_218 = (mix_1 * 0.81649); | |||
double tap_142 = m_delay_21.read_linear(mul_218); | |||
double expr_230 = (-safepow(expr_238, mul_216)); | |||
double mul_126 = (tap_130 * expr_230); | |||
double mix_252 = (mul_126 + (mul_11 * (m_history_10 - mul_126))); | |||
double mix_128 = mix_252; | |||
double expr_237 = (-safepow(expr_238, mul_219)); | |||
double mul_215 = (tap_224 * expr_237); | |||
double mix_253 = (mul_215 + (mul_11 * (m_history_9 - mul_215))); | |||
double mix_222 = mix_253; | |||
double expr_231 = (-safepow(expr_238, mul_217)); | |||
double mul_132 = (tap_136 * expr_231); | |||
double mix_254 = (mul_132 + (mul_11 * (m_history_8 - mul_132))); | |||
double mix_134 = mix_254; | |||
double expr_232 = (-safepow(expr_238, mul_218)); | |||
double mul_138 = (tap_142 * expr_232); | |||
double mix_255 = (mul_138 + (mul_11 * (m_history_7 - mul_138))); | |||
double mix_140 = mix_255; | |||
double mul_213 = (mix_1 * 0.000527); | |||
int int_212 = int(mul_213); | |||
double mul_169 = (int_212 * 419.5); | |||
double tap_168 = m_delay_20.read_linear(mul_169); | |||
double mul_166 = (tap_168 * 0.625); | |||
double mul_190 = (int_212 * 400.600006); | |||
double tap_189 = m_delay_19.read_linear(mul_190); | |||
double mul_187 = (tap_189 * 0.625); | |||
double add_120 = (mix_222 + mix_140); | |||
double add_118 = (mix_134 + mix_128); | |||
double add_113 = (add_120 + add_118); | |||
double mul_96 = (add_113 * 0.5); | |||
double sub_117 = (add_120 - add_118); | |||
double mul_99 = (sub_117 * 0.5); | |||
double add_156 = (mix_1 + 5); | |||
double expr_233 = safepow(expr_238, add_156); | |||
double phasor_86 = m_phasor_33(mul_67, samples_to_seconds); | |||
double add_66 = ((m_history_6 + phasor_86) + 0.5); | |||
double mod_65 = safemod(add_66, 1); | |||
double delta_45 = m_delta_34(mod_65); | |||
double sah_25 = m_sah_35(mul_43, delta_45, 0); | |||
int sah_44 = m_sah_36(4800, delta_45, 0); | |||
double mul_33 = (sah_44 * mod_65); | |||
double sub_64 = (mod_65 - 0.5); | |||
double mul_63 = (sub_64 * 3.1415926535898); | |||
double cos_62 = cos(mul_63); | |||
double mul_52 = (cos_62 * cos_62); | |||
double add_80 = ((m_history_5 + phasor_86) + 0.25); | |||
double mod_79 = safemod(add_80, 1); | |||
double delta_48 = m_delta_37(mod_79); | |||
double sah_27 = m_sah_38(mul_46, delta_48, 0); | |||
int sah_47 = m_sah_39(4800, delta_48, 0); | |||
double mul_34 = (sah_47 * mod_79); | |||
double sub_78 = (mod_79 - 0.5); | |||
double mul_77 = (sub_78 * 3.1415926535898); | |||
double cos_76 = cos(mul_77); | |||
double mul_53 = (cos_76 * cos_76); | |||
double add_85 = ((m_history_4 + phasor_86) + 0); | |||
double mod_84 = safemod(add_85, 1); | |||
double delta_30 = m_delta_40(mod_84); | |||
double sah_29 = m_sah_41(mul_49, delta_30, 0); | |||
int sah_50 = m_sah_42(4800, delta_30, 0); | |||
double mul_35 = (sah_50 * mod_84); | |||
double sub_83 = (mod_84 - 0.5); | |||
double mul_82 = (sub_83 * 3.1415926535898); | |||
double cos_81 = cos(mul_82); | |||
double mul_54 = (cos_81 * cos_81); | |||
double add_60 = ((m_history_3 + phasor_86) + 0.75); | |||
double mod_59 = safemod(add_60, 1); | |||
double delta_42 = m_delta_43(mod_59); | |||
double sah_23 = m_sah_44(mul_40, delta_42, 0); | |||
int sah_41 = m_sah_45(4800, delta_42, 0); | |||
double mul_32 = (sah_41 * mod_59); | |||
double tap_72 = m_delay_18.read_linear(mul_35); | |||
double tap_73 = m_delay_18.read_linear(mul_34); | |||
double tap_74 = m_delay_18.read_linear(mul_33); | |||
double tap_75 = m_delay_18.read_linear(mul_32); | |||
double mul_61 = (tap_74 * mul_52); | |||
double mul_69 = (tap_73 * mul_53); | |||
double mul_70 = (tap_72 * mul_54); | |||
double sub_58 = (mod_59 - 0.5); | |||
double mul_57 = (sub_58 * 3.1415926535898); | |||
double cos_56 = cos(mul_57); | |||
double mul_51 = (cos_56 * cos_56); | |||
double mul_55 = (tap_75 * mul_51); | |||
double add_257 = (((mul_70 + mul_69) + mul_61) + mul_55); | |||
double mix_256 = (m_y_2 + (clamp_18 * (add_257 - m_y_2))); | |||
double mix_15 = mix_256; | |||
double mix_258 = (in1 + (mul_13 * (mix_15 - in1))); | |||
double mix_87 = mix_258; | |||
double mul_90 = (mix_87 * 0.707); | |||
double mix_259 = (mul_90 + (rsub_9 * (m_history_1 - mul_90))); | |||
double mix_226 = mix_259; | |||
double mul_176 = (int_212 * 566.700012); | |||
double tap_175 = m_delay_17.read_linear(mul_176); | |||
double mul_197 = (int_212 * 568.299988); | |||
double tap_196 = m_delay_16.read_linear(mul_197); | |||
double sub_119 = (mix_222 - mix_140); | |||
double sub_116 = (mix_134 - mix_128); | |||
double sub_115 = (sub_119 - sub_116); | |||
double mul_98 = (sub_115 * 0.5); | |||
double add_114 = (sub_119 + sub_116); | |||
double rsub_112 = (0 - add_114); | |||
double mul_97 = (rsub_112 * 0.5); | |||
double mul_162 = (mix_1 * 0.41); | |||
double add_159 = (mul_162 + 5); | |||
double expr_236 = safepow(expr_238, add_159); | |||
double mul_161 = (mix_1 * 0.3); | |||
double add_158 = (mul_161 + 5); | |||
double expr_235 = safepow(expr_238, add_158); | |||
double mul_160 = (mix_1 * 0.155); | |||
double add_157 = (mul_160 + 5); | |||
double tap_144 = m_delay_15.read_linear(add_159); | |||
double tap_145 = m_delay_15.read_linear(add_158); | |||
double tap_146 = m_delay_15.read_linear(add_157); | |||
double tap_147 = m_delay_15.read_linear(add_156); | |||
double mul_148 = (tap_147 * expr_233); | |||
double add_121 = (mul_96 + mul_148); | |||
double mul_154 = (tap_144 * expr_236); | |||
double add_124 = (mul_99 + mul_154); | |||
double mul_152 = (tap_145 * expr_235); | |||
double add_123 = (mul_98 + mul_152); | |||
double expr_234 = safepow(expr_238, add_157); | |||
double mul_150 = (tap_146 * expr_234); | |||
double add_122 = (mul_97 + mul_150); | |||
double mul_173 = (tap_175 * 0.625); | |||
double mul_194 = (tap_196 * 0.625); | |||
double mul_211 = (mix_1 * 0.110732); | |||
double tap_210 = m_delay_14.read_cubic(mul_211); | |||
double mul_208 = (tap_210 * 0.75); | |||
double sub_207 = (mix_226 - mul_208); | |||
double mul_206 = (sub_207 * 0.75); | |||
double add_205 = (mul_206 + tap_210); | |||
double mul_183 = (int_212 * 144.800003); | |||
double tap_182 = m_delay_13.read_linear(mul_183); | |||
double mul_204 = (int_212 * 162.100006); | |||
double tap_203 = m_delay_12.read_linear(mul_204); | |||
double mul_180 = (tap_182 * 0.75); | |||
double mul_201 = (tap_203 * 0.75); | |||
double mul_107 = (mul_154 * mul_6); | |||
double mul_105 = (mul_150 * mul_6); | |||
double add_93 = (mul_107 + mul_105); | |||
double mul_106 = (mul_152 * mul_6); | |||
double mul_104 = (mul_148 * mul_6); | |||
double add_92 = (mul_106 + mul_104); | |||
double sub_102 = (add_93 - add_92); | |||
double mul_111 = (mul_99 * dbtoa_3); | |||
double mul_109 = (mul_97 * dbtoa_3); | |||
double add_95 = (mul_111 + mul_109); | |||
double mul_110 = (mul_98 * dbtoa_3); | |||
double mul_108 = (mul_96 * dbtoa_3); | |||
double add_94 = (mul_110 + mul_108); | |||
double sub_103 = (add_95 - add_94); | |||
double add_89 = (sub_103 + sub_102); | |||
double add_91 = (add_89 + mix_87); | |||
double sub_179 = (add_91 - mul_180); | |||
double mul_178 = (sub_179 * 0.75); | |||
double add_177 = (mul_178 + tap_182); | |||
double sub_172 = (add_177 - mul_173); | |||
double mul_171 = (sub_172 * 0.625); | |||
double add_170 = (mul_171 + tap_175); | |||
double sub_165 = (add_170 - mul_166); | |||
double mul_164 = (sub_165 * 0.625); | |||
double add_163 = (mul_164 + tap_168); | |||
double mul_88 = (add_163 * mul_12); | |||
double out2 = (in1 + mul_88); | |||
double add_101 = (add_89 + mix_87); | |||
double sub_200 = (add_101 - mul_201); | |||
double mul_199 = (sub_200 * 0.75); | |||
double add_198 = (mul_199 + tap_203); | |||
double sub_193 = (add_198 - mul_194); | |||
double mul_192 = (sub_193 * 0.625); | |||
double add_191 = (mul_192 + tap_196); | |||
double sub_186 = (add_191 - mul_187); | |||
double mul_185 = (sub_186 * 0.625); | |||
double add_184 = (mul_185 + tap_189); | |||
double mul_100 = (add_184 * mul_12); | |||
double out1 = (in1 + mul_100); | |||
double smth_next_240 = mix_1; | |||
double history_127_next_241 = mix_128; | |||
double history_221_next_242 = mix_222; | |||
double history_133_next_243 = mix_134; | |||
double history_139_next_244 = mix_140; | |||
double history_26_next_245 = sah_25; | |||
double history_28_next_246 = sah_27; | |||
double history_31_next_247 = sah_29; | |||
double history_24_next_248 = sah_23; | |||
double y0_next_249 = mix_15; | |||
double history_225_next_250 = mix_226; | |||
m_delay_24.write(add_121); | |||
m_delay_23.write(add_124); | |||
m_delay_22.write(add_122); | |||
m_delay_21.write(add_123); | |||
m_delay_20.write(sub_165); | |||
m_delay_19.write(sub_186); | |||
m_delay_18.write(in1); | |||
m_delay_17.write(sub_172); | |||
m_delay_16.write(sub_193); | |||
m_delay_15.write(add_205); | |||
m_delay_14.write(sub_207); | |||
m_delay_13.write(sub_179); | |||
m_delay_12.write(sub_200); | |||
m_smth_11 = smth_next_240; | |||
m_history_10 = history_127_next_241; | |||
m_history_9 = history_221_next_242; | |||
m_history_8 = history_133_next_243; | |||
m_history_7 = history_139_next_244; | |||
m_history_6 = history_26_next_245; | |||
m_history_5 = history_28_next_246; | |||
m_history_4 = history_31_next_247; | |||
m_history_3 = history_24_next_248; | |||
m_y_2 = y0_next_249; | |||
m_history_1 = history_225_next_250; | |||
m_delay_12.step(); | |||
m_delay_13.step(); | |||
m_delay_14.step(); | |||
@@ -423,11 +423,11 @@ typedef struct State { | |||
return __exception; | |||
}; | |||
inline void set_bandwidth(double _value) { | |||
m_bandwidth_25 = (_value < 0 ? 0 : (_value > 100 ? 100 : _value)); | |||
inline void set_roomsize(double _value) { | |||
m_roomsize_25 = (_value < 1 ? 1 : (_value > 300 ? 300 : _value)); | |||
}; | |||
inline void set_mix(double _value) { | |||
m_mix_26 = (_value < 0 ? 0 : (_value > 100 ? 100 : _value)); | |||
inline void set_shimmer(double _value) { | |||
m_shimmer_26 = (_value < 0 ? 0 : (_value > 100 ? 100 : _value)); | |||
}; | |||
inline void set_decay(double _value) { | |||
m_decay_27 = (_value < 1 ? 1 : (_value > 100 ? 100 : _value)); | |||
@@ -435,17 +435,17 @@ typedef struct State { | |||
inline void set_damping(double _value) { | |||
m_damping_28 = (_value < 0 ? 0 : (_value > 100 ? 100 : _value)); | |||
}; | |||
inline void set_roomsize(double _value) { | |||
m_roomsize_29 = (_value < 1 ? 1 : (_value > 300 ? 300 : _value)); | |||
inline void set_ratio(double _value) { | |||
m_ratio_29 = (_value < 0.5 ? 0.5 : (_value > 2 ? 2 : _value)); | |||
}; | |||
inline void set_tone(double _value) { | |||
m_tone_30 = (_value < 500 ? 500 : (_value > 6000 ? 6000 : _value)); | |||
inline void set_bandwidth(double _value) { | |||
m_bandwidth_30 = (_value < 0 ? 0 : (_value > 100 ? 100 : _value)); | |||
}; | |||
inline void set_shimmer(double _value) { | |||
m_shimmer_31 = (_value < 0 ? 0 : (_value > 100 ? 100 : _value)); | |||
inline void set_mix(double _value) { | |||
m_mix_31 = (_value < 0 ? 0 : (_value > 100 ? 100 : _value)); | |||
}; | |||
inline void set_ratio(double _value) { | |||
m_ratio_32 = (_value < 0.5 ? 0.5 : (_value > 2 ? 2 : _value)); | |||
inline void set_tone(double _value) { | |||
m_tone_32 = (_value < 500 ? 500 : (_value > 6000 ? 6000 : _value)); | |||
}; | |||
} State; | |||
@@ -488,14 +488,14 @@ void reset(CommonState *cself) { | |||
void setparameter(CommonState *cself, long index, double value, void *ref) { | |||
State * self = (State *)cself; | |||
switch (index) { | |||
case 0: self->set_bandwidth(value); break; | |||
case 1: self->set_mix(value); break; | |||
case 0: self->set_roomsize(value); break; | |||
case 1: self->set_shimmer(value); break; | |||
case 2: self->set_decay(value); break; | |||
case 3: self->set_damping(value); break; | |||
case 4: self->set_roomsize(value); break; | |||
case 5: self->set_tone(value); break; | |||
case 6: self->set_shimmer(value); break; | |||
case 7: self->set_ratio(value); break; | |||
case 4: self->set_ratio(value); break; | |||
case 5: self->set_bandwidth(value); break; | |||
case 6: self->set_mix(value); break; | |||
case 7: self->set_tone(value); break; | |||
default: break; | |||
} | |||
@@ -506,14 +506,14 @@ void setparameter(CommonState *cself, long index, double value, void *ref) { | |||
void getparameter(CommonState *cself, long index, double *value) { | |||
State *self = (State *)cself; | |||
switch (index) { | |||
case 0: *value = self->m_bandwidth_25; break; | |||
case 1: *value = self->m_mix_26; break; | |||
case 0: *value = self->m_roomsize_25; break; | |||
case 1: *value = self->m_shimmer_26; break; | |||
case 2: *value = self->m_decay_27; break; | |||
case 3: *value = self->m_damping_28; break; | |||
case 4: *value = self->m_roomsize_29; break; | |||
case 5: *value = self->m_tone_30; break; | |||
case 6: *value = self->m_shimmer_31; break; | |||
case 7: *value = self->m_ratio_32; break; | |||
case 4: *value = self->m_ratio_29; break; | |||
case 5: *value = self->m_bandwidth_30; break; | |||
case 6: *value = self->m_mix_31; break; | |||
case 7: *value = self->m_tone_32; break; | |||
default: break; | |||
} | |||
@@ -533,25 +533,25 @@ void * create(double sr, long vs) { | |||
self->__commonstate.vs = vs; | |||
self->__commonstate.params = (ParamInfo *)genlib_sysmem_newptr(8 * sizeof(ParamInfo)); | |||
self->__commonstate.numparams = 8; | |||
// initialize parameter 0 ("m_bandwidth_25") | |||
// initialize parameter 0 ("m_roomsize_25") | |||
pi = self->__commonstate.params + 0; | |||
pi->name = "bandwidth"; | |||
pi->name = "roomsize"; | |||
pi->paramtype = GENLIB_PARAMTYPE_FLOAT; | |||
pi->defaultvalue = self->m_bandwidth_25; | |||
pi->defaultvalue = self->m_roomsize_25; | |||
pi->defaultref = 0; | |||
pi->hasinputminmax = false; | |||
pi->inputmin = 0; | |||
pi->inputmax = 1; | |||
pi->hasminmax = true; | |||
pi->outputmin = 0; | |||
pi->outputmax = 100; | |||
pi->outputmin = 1; | |||
pi->outputmax = 300; | |||
pi->exp = 0; | |||
pi->units = ""; // no units defined | |||
// initialize parameter 1 ("m_mix_26") | |||
// initialize parameter 1 ("m_shimmer_26") | |||
pi = self->__commonstate.params + 1; | |||
pi->name = "mix"; | |||
pi->name = "shimmer"; | |||
pi->paramtype = GENLIB_PARAMTYPE_FLOAT; | |||
pi->defaultvalue = self->m_mix_26; | |||
pi->defaultvalue = self->m_shimmer_26; | |||
pi->defaultref = 0; | |||
pi->hasinputminmax = false; | |||
pi->inputmin = 0; | |||
@@ -589,39 +589,39 @@ void * create(double sr, long vs) { | |||
pi->outputmax = 100; | |||
pi->exp = 0; | |||
pi->units = ""; // no units defined | |||
// initialize parameter 4 ("m_roomsize_29") | |||
// initialize parameter 4 ("m_ratio_29") | |||
pi = self->__commonstate.params + 4; | |||
pi->name = "roomsize"; | |||
pi->name = "ratio"; | |||
pi->paramtype = GENLIB_PARAMTYPE_FLOAT; | |||
pi->defaultvalue = self->m_roomsize_29; | |||
pi->defaultvalue = self->m_ratio_29; | |||
pi->defaultref = 0; | |||
pi->hasinputminmax = false; | |||
pi->inputmin = 0; | |||
pi->inputmax = 1; | |||
pi->hasminmax = true; | |||
pi->outputmin = 1; | |||
pi->outputmax = 300; | |||
pi->outputmin = 0.5; | |||
pi->outputmax = 2; | |||
pi->exp = 0; | |||
pi->units = ""; // no units defined | |||
// initialize parameter 5 ("m_tone_30") | |||
// initialize parameter 5 ("m_bandwidth_30") | |||
pi = self->__commonstate.params + 5; | |||
pi->name = "tone"; | |||
pi->name = "bandwidth"; | |||
pi->paramtype = GENLIB_PARAMTYPE_FLOAT; | |||
pi->defaultvalue = self->m_tone_30; | |||
pi->defaultvalue = self->m_bandwidth_30; | |||
pi->defaultref = 0; | |||
pi->hasinputminmax = false; | |||
pi->inputmin = 0; | |||
pi->inputmax = 1; | |||
pi->hasminmax = true; | |||
pi->outputmin = 500; | |||
pi->outputmax = 6000; | |||
pi->outputmin = 0; | |||
pi->outputmax = 100; | |||
pi->exp = 0; | |||
pi->units = ""; // no units defined | |||
// initialize parameter 6 ("m_shimmer_31") | |||
// initialize parameter 6 ("m_mix_31") | |||
pi = self->__commonstate.params + 6; | |||
pi->name = "shimmer"; | |||
pi->name = "mix"; | |||
pi->paramtype = GENLIB_PARAMTYPE_FLOAT; | |||
pi->defaultvalue = self->m_shimmer_31; | |||
pi->defaultvalue = self->m_mix_31; | |||
pi->defaultref = 0; | |||
pi->hasinputminmax = false; | |||
pi->inputmin = 0; | |||
@@ -631,18 +631,18 @@ void * create(double sr, long vs) { | |||
pi->outputmax = 100; | |||
pi->exp = 0; | |||
pi->units = ""; // no units defined | |||
// initialize parameter 7 ("m_ratio_32") | |||
// initialize parameter 7 ("m_tone_32") | |||
pi = self->__commonstate.params + 7; | |||
pi->name = "ratio"; | |||
pi->name = "tone"; | |||
pi->paramtype = GENLIB_PARAMTYPE_FLOAT; | |||
pi->defaultvalue = self->m_ratio_32; | |||
pi->defaultvalue = self->m_tone_32; | |||
pi->defaultref = 0; | |||
pi->hasinputminmax = false; | |||
pi->inputmin = 0; | |||
pi->inputmax = 1; | |||
pi->hasminmax = true; | |||
pi->outputmin = 0.5; | |||
pi->outputmax = 2; | |||
pi->outputmin = 500; | |||
pi->outputmax = 6000; | |||
pi->exp = 0; | |||
pi->units = ""; // no units defined | |||