static void *clip_new(t_symbol *s, int ac, t_atom *av)
{
t_clip *x = (t_clip *)pd_new(clip_class);
sic_inlet((t_sic *)x, 1, CLIP_DEFLO, 0, ac, av);
sic_inlet((t_sic *)x, 2, CLIP_DEFHI, 1, ac, av);
outlet_new((t_object *)x, &s_signal);
return (x);
}
static void *train_new(t_symbol *s, int ac, t_atom *av)
{
t_train *x = (t_train *)pd_new(train_class);
x->x_on = 0;
x->x_phase = 0;
sic_inlet((t_sic *)x, 0, TRAIN_DEFPERIOD, 0, ac, av);
sic_inlet((t_sic *)x, 1, TRAIN_DEFWIDTH, 1, ac, av);
sic_inlet((t_sic *)x, 2, TRAIN_DEFOFFSET, 2, ac, av);
outlet_new((t_object *)x, &s_signal);
x->x_bangout = outlet_new((t_object *)x, &s_bang);
x->x_clock = clock_new(x, (t_method)train_tick);
return (x);
}
static void *sigrminus_new(t_symbol *s, int ac, t_atom *av)
{
t_sigrminus *x = (t_sigrminus *)pd_new(sigrminus_class);
sic_inlet((t_sic *)x, 1, 0, 0, ac, av);
outlet_new((t_object *)x, &s_signal);
return (x);
}
static void *modulo_new(t_symbol *s, int ac, t_atom *av)
{
t_modulo *x = (t_modulo *)pd_new(modulo_class);
sic_inlet((t_sic *)x, 1, MODULO_DEFRHS, 0, ac, av);
outlet_new((t_object *)x, &s_signal);
return (x);
}
static void *cycle_new(t_symbol *s, int ac, t_atom *av)
{
t_cycle *x = (t_cycle *)pd_new(cycle_class);
int i = (ac && av->a_type == A_FLOAT ? 1 : 0);
int tabsize = CYCLE_TABSIZE;
x->x_costable = sic_makecostable(&tabsize);
if (tabsize != CYCLE_TABSIZE)
{
loudbug_bug("cycle_new");
pd_free((t_pd *)x);
return (0);
}
if (ac && av->a_type == A_FLOAT)
{
sic_inlet((t_sic *)x, 0, 0, 0, ac, av);
ac--, av++;
}
sic_newinlet((t_sic *)x, 0);
outlet_new((t_object *)x, &s_signal);
x->x_offset = 0;
if (ac && av->a_type == A_SYMBOL)
{
x->x_name = av->a_w.w_symbol;
ac--, av++;
if (ac && av->a_type == A_FLOAT)
if ((x->x_offset = (int)av->a_w.w_float) < 0)
x->x_offset = 0;
}
else x->x_name = 0;
x->x_table = 0;
x->x_phase = 0.;
x->x_conv = 0.;
return (x);
}
static void *kink_new(t_symbol *s, int ac, t_atom *av)
{
t_kink *x = (t_kink *)pd_new(kink_class);
sic_inlet((t_sic *)x, 1, KINK_DEFSLOPE, 0, ac, av);
outlet_new((t_object *)x, &s_signal);
return (x);
}
static void *sigmod_new(t_symbol *s, int ac, t_atom *av)
{
t_sigmod *x = (t_sigmod *)pd_new(sigmod_class);
/* CHECKED default 0 (refman's error), LATER rethink */
sic_inlet((t_sic *)x, 1, 0, 0, ac, av);
outlet_new((t_object *)x, &s_signal);
return (x);
}
static void *triangle_new(t_symbol *s, int ac, t_atom *av)
{
t_triangle *x = (t_triangle *)pd_new(triangle_class);
sic_inlet((t_sic *)x, 1, TRIANGLE_DEFPHASE, 0, ac, av);
outlet_new((t_object *)x, &s_signal);
x->x_low = TRIANGLE_DEFLO;
x->x_range = (TRIANGLE_DEFHI - TRIANGLE_DEFLO);
return (x);
}
static void *sigeq_new(t_symbol *s, int ac, t_atom *av)
{
t_sigeq *x = (t_sigeq *)pd_new(sigeq_class);
if (s == gensym("_==1~"))
x->x_algo = 1;
else if (s == gensym("_==2~"))
x->x_algo = 2;
else
x->x_algo = 0;
sic_inlet((t_sic *)x, 1, 0, 0, ac, av);
outlet_new((t_object *)x, &s_signal);
return (x);
}
