// Main function
void main(void)
{
post("gaussdraw object version " VERSION " by Tristan Jehan");
post("copyright © 2001 Massachusetts Institute of Technology");
post("");
setup( // Setup Object
(Messlist**) &gaussdraw_class, // Pointer to class
(method) gaussdraw_new, // Constructor
(method) gaussdraw_free, // Destructor
(short) sizeof(t_gaussdraw), // Class Size
0L, A_GIMME, 0);
/* bind your methods to symbols */
addbang((method)gaussdraw_bang);
addfloat((method)gaussdraw_float);
addint((method)gaussdraw_int);
addinx((method)gaussdraw_int_1,1);
addinx((method)gaussdraw_int_2,2);
addftx((method)gaussdraw_float_1,1);
addftx((method)gaussdraw_float_2,2);
addmess((method)gaussdraw_assist,"assist",A_CANT,0);
addmess((method)gaussdraw_min,"min",A_GIMME,0);
addmess((method)gaussdraw_max,"max",A_GIMME,0);
addmess((method)gaussdraw_numpts,"numbars",A_GIMME,0);
addmess((method)gaussdraw_default,"default",A_GIMME,0);
addmess((method)gaussdraw_print,"print",A_GIMME,0);
/* list object in the new object list */
finder_addclass("Statistics", "gaussdraw");
rescopy('STR#', RES_ID);
}
int main(void)
{
setup((t_messlist **)&rvbap_class, (method)rvbap_new, 0L, (short)sizeof(t_rvbap), 0L, A_GIMME, 0);
/* rvbap_new = creation function, A_DEFLONG = its (optional) arguement is a long (32-bit) int */
addmess((method)rvbap_assist, "assist", A_CANT, 0);
addbang((method)rvbap_bang); /* the procedure it uses when it gets a bang in the left inlet */
addinx((method)rvbap_in1, 1); /* the rocedure for an int in the right inlet (inlet 1) */
addinx((method)rvbap_in2, 2); /* the rocedure for an int in the right inlet (inlet 2) */
addinx((method)rvbap_in3, 3);
addinx((method)rvbap_in4, 4);
addftx((method)rvbap_ft1, 1); /* the rocedure for an int in the right inlet (inlet 1) */
addftx((method)rvbap_ft2, 2); /* the rocedure for an int in the right inlet (inlet 2) */
addftx((method)rvbap_ft3, 3);
addftx((method)rvbap_ft4, 4);
addmess((method)rvbap_matrix, "loudspeaker-matrices", A_GIMME, 0);
post("rvbap v1.1, © 2003-2007 by Olaf Matthes, based on vbap by Ville Pulkki");
return 0;
}
void main(void)
{
setup((t_messlist **)&channel_class, (method)channel_new, (method)dsp_free,
(short)sizeof(t_channel), 0, A_GIMME, 0);
addmess((method)channel_dsp, "dsp", A_CANT, 0);
addmess((method)channel_assist,"assist",A_CANT,0);
addmess((method)channel_channel,"channel",A_FLOAT,0);
addinx((method)channel_int, 1);
dsp_initclass();
post("%s %s",OBJECT_NAME, LYONPOTPOURRI_MSG);
}
int main(void)
{
setup((t_messlist **)&index_class, (method)index_new, (method)dsp_free, (short)sizeof(t_index), 0L,
A_SYM, A_DEFLONG, 0);
addmess((method)index_dsp, "dsp", A_CANT, 0);
addmess((method)index_set, "set", A_SYM, 0);
addinx((method)index_in1,1);
addmess((method)index_assist, "assist", A_CANT, 0);
addmess((method)index_dblclick, "dblclick", A_CANT, 0);
dsp_initclass();
ps_buffer = gensym("buffer~");
return 0;
}
int main()
{
setup((t_messlist **)&thresh_class, (method)thresh_new, (method)thresh_free, (short)sizeof(t_thresh), 0L, A_DEFLONG, 0);
addint((method)thresh_int);
addmess((method)thresh_list,"list", A_GIMME, 0);
addinx((method)thresh_in1,1);
addfloat((method)thresh_float);
addmess((method)thresh_assist,"assist",A_CANT,0);
addmess((method)thresh_inletinfo, "inletinfo", A_CANT, 0);
ps_list = gensym("list");
finder_addclass("Lists","thresh");
return 0;
}
void main(void)
{
long int tick = gettime();
setup((t_messlist **)&afiddle_class, (method)afiddle_new,\
(method)afiddle_free, (short)sizeof(afiddle), 0L, A_DEFLONG, 0); //initial arg default len
addmess((method)afiddle_list,"list",A_GIMME,0);
addinx((method)afiddle_in1, 1);
addbang((method)afiddle_bang);
addmess((method)afiddle_offset,"offset", A_FLOAT, 0);
addmess((method)afiddle_in1,"size", A_LONG, 0);
addmess((method)afiddle_fire,"fire", A_LONG, 0);
addmess((method)afiddle_clearm,"clearmode", A_LONG, 0);
addmess((method)afiddle_clear,"clear", 0);
addmess((method)afiddle_assist,"assist",A_CANT,0);
post(__DATE__" \t \a \t "__TIME__"\t %07xd",tick, 0);
}
