Exemple #1
0
// 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);
}
Exemple #2
0
void main(void)
{	
	setup(&gspline_class, gspline_new, (method)gspline_free, (short)sizeof(t_gspline), gspline_menufun, A_GIMME, 0);
	addmess((method)gspline_dsp, "dsp", A_CANT, 0);
	addbang((method)gspline_bang);
	addfloat((method)gspline_float);
	addint((method)gspline_int);
    addmess((method)gspline_list, "list", A_GIMME, 0);
    addmess((method)gspline_deriv, "deriv", A_GIMME, 0);
    
	addmess((method)gspline_restore, "done", 	0);
	addmess((method)gspline_color, "color", 	A_DEFLONG, 0);
	addmess((method)gspline_brgb, "brgb", 	A_DEFLONG, A_DEFLONG, A_DEFLONG, 0);
	addmess((method)gspline_frgb, "frgb", 	A_DEFLONG, A_DEFLONG, A_DEFLONG, 0);
	addmess((method)gspline_domain, "domain", 	A_DEFLONG, A_DEFLONG, 0);
	addmess((method)gspline_range, "range", 	A_DEFFLOAT, 0);
	addmess((method)gspline_update, "update", 	A_CANT, 0);
	addmess((method)gspline_assist, "assist",	A_CANT, 0);
	
	addmess((method)gspline_setautoderiv, "autoderiv", 0);
	addmess((method)gspline_logamp, "logamp", 0);
	addmess((method)gspline_linamp, "linamp", 0);
	addmess((method)gspline_save, "psave", 	A_CANT, 0);

	bindMeBaby = gensym("#X");			// symbol that we will use for restore
	
	rescopy('STR#',RES_ID);

	dsp_initboxclass();
	
}
Exemple #3
0
void main(void)
{
  setup((t_messlist **)&resent_class, (method)resent_new, 
  (method)resent_free, (short)sizeof(t_resent), 0L,A_GIMME,0);
  addmess((method)resent_dsp, "dsp", A_CANT, 0);
  addmess((method)resent_assist,"assist",A_CANT,0);
  addbang((method)resent_acquire_sample);
  addmess((method)resent_mute, "mute", A_FLOAT, 0);
  addmess((method)resent_linespeed, "linespeed", A_GIMME, 0);
  addmess((method)resent_linephase, "linephase", A_GIMME, 0);
  addmess((method)resent_randspeed, "randspeed", A_GIMME, 0);
  addmess((method)resent_randphase, "randphase", A_GIMME, 0);
  addmess((method)resent_bin, "bin", A_DEFFLOAT, A_DEFFLOAT, 0);
  addmess((method)resent_setphase, "setphase",  A_DEFFLOAT, 0);
  addmess((method)resent_addphase, "addphase",  A_DEFFLOAT, 0);
  addmess((method)resent_setspeed, "setspeed",  A_DEFFLOAT, 0);
  addmess((method)resent_addspeed, "addspeed",  A_DEFFLOAT, 0);
  addmess((method)resent_playthrough, "playthrough",  A_DEFFLOAT, 0);
  addmess((method)resent_store_incr, "store_incr",0);
  addmess((method)resent_fftinfo, "fftinfo",0);
  addmess((method)resent_overlap, "overlap",A_FLOAT,0);
  addmess((method)resent_winfac, "winfac",A_FLOAT,0);
  addmess((method)resent_setspeed_and_phase, "setspeed_and_phase",  A_DEFFLOAT, A_DEFFLOAT, 0);
  addmess((method)resent_size, "size", A_FLOAT,0);
//  addmess((method)resent_verbose, "verbose", A_FLOAT,0);
  addmess((method)resent_overlap,"overlap",A_DEFFLOAT,0);
  addmess((method)resent_winfac,"winfac",A_DEFFLOAT,0);
  addmess((method)resent_fftinfo,"fftinfo",0);
  dsp_initclass();
  post("%s %s",OBJECT_NAME,FFTEASE_ANNOUNCEMENT);
}
int main(void)
{	
	//long attrflags;
	void *p, *q;
	
	jit_tml_fluid2_init();	
	setup((void*)&max_jit_tml_fluid2_class,
			(method)max_jit_tml_fluid2_new,
			(method)max_jit_tml_fluid2_free, (short)sizeof(t_max_jit_tml_fluid2), 
		0L, A_GIMME, 0);

	p = max_jit_classex_setup(calcoffset(t_max_jit_tml_fluid2,obex));
	q = jit_class_findbyname(gensym("jit_tml_fluid2"));    
    	max_jit_classex_mop_wrap(p,q,MAX_JIT_MOP_FLAGS_OWN_BANG|MAX_JIT_MOP_FLAGS_OWN_OUTPUTMATRIX);
    	max_jit_classex_mop_mproc(p, q, max_jit_tml_fluid2_mproc); // custom mproc
	max_jit_classex_standard_wrap(p,q,0); 	

		addmess((method)max_jit_tml_fluid2_assist, "assist", A_CANT,0);
    	
    	// bang method (accept bang)
    	addbang((method)max_jit_tml_fluid2_bang);
    
    	ps_getmap = gensym("getmap");
	
	return 0;
}
void main(void)
{	
	void *classex, *jitclass;
	
	/*
	// Debug console window so printf works
	FILE* pCout; // should really be freed on exit 
	AllocConsole();
	freopen_s(&pCout, "CONOUT$", "w", stdout); 
	printf("jit_gl_spout_receiverSDK\n");
	*/
	post("jit_gl_spout_receiver - SDK Vers 2.001");

	// initialize our Jitter class
	jit_gl_spout_receiver_init();	
	
	// create our Max class
	setup((t_messlist **)&max_jit_gl_spout_receiver_class, 
		  (method)max_jit_gl_spout_receiver_new, 
		  (method)max_jit_gl_spout_receiver_free, 
		  (short)sizeof(t_max_jit_gl_spout_receiver), 
		  0L, A_GIMME, 0);
	
	// specify a byte offset to keep additional information about our object
	classex = max_jit_classex_setup(calcoffset(t_max_jit_gl_spout_receiver, obex));
	
	// look up our Jitter class in the class registry
	jitclass = jit_class_findbyname(gensym("jit_gl_spout_receiver"));	
	
	// wrap our Jitter class with the standard methods for Jitter objects
    max_jit_classex_standard_wrap(classex, jitclass, 0); 	
	
	// custom draw handler so we can output our texture.
	// override default ob3d bang/draw methods
	addbang((method)max_jit_gl_spout_receiver_bang);
	max_addmethod_defer_low((method)max_jit_gl_spout_receiver_draw, "draw");  
	
    #ifdef UseServers
	max_addmethod_defer_low((method)max_jit_gl_spout_receiver_getavailableservers, "getavailableservers");
	#else
	max_addmethod_defer_low((method)max_jit_gl_spout_receiver_getavailablesenders, "getavailablesenders");
	#endif
    
   	// use standard ob3d assist method
    addmess((method)max_jit_ob3d_assist, "assist", A_CANT,0);  
	
	// add methods for 3d drawing
    max_ob3d_setup();

	ps_jit_gl_texture = gensym("jit_gl_texture");
	ps_maxdraw = gensym("maxdraw");
	ps_out_name = gensym("out_name");
	ps_spoutsendername = gensym("SpoutSender");
    ps_clear = gensym("clear");

}
//primary MSP funcs
void main(void)
{
    setup((struct messlist **)&cabasa_class, (method)cabasa_new, (method)dsp_free, (short)sizeof(t_cabasa), 0L, A_DEFFLOAT, 0);
    addmess((method)cabasa_dsp, "dsp", A_CANT, 0);
    addmess((method)cabasa_assist,"assist",A_CANT,0);
    addfloat((method)cabasa_float);
    addint((method)cabasa_int);
    addbang((method)cabasa_bang);
    dsp_initclass();
    rescopy('STR#',9332);
}
Exemple #7
0
void main(void)
{
	setup(&fir_class, fir_new, (method)dsp_free, (short)sizeof(t_fir), 0L, A_LONG, 0);
	addmess((method)fir_dsp, "dsp", A_CANT, 0);
	addbang((method)fir_bang);
	addmess((method)fir_set, "set", A_GIMME, 0);
	addmess((method)fir_clear, "clear", 0);
	addmess((method)fir_assist, "assist", A_CANT, 0);
	dsp_initclass();
	rescopy('STR#',RES_ID);
}
Exemple #8
0
//primary MSP funcs
void main(void)
{
    setup((struct messlist **)&guiro_class, (method)guiro_new, (method)dsp_free, (short)sizeof(t_guiro), 0L, A_DEFFLOAT, 0);
    addmess((method)guiro_dsp, "dsp", A_CANT, 0);
    addmess((method)guiro_assist,"assist",A_CANT,0);
    addfloat((method)guiro_float);
    addint((method)guiro_int);
    addbang((method)guiro_bang);
    dsp_initclass();
    rescopy('STR#',9333);
}
Exemple #9
0
void main(void)
{
	setup(&stft_class, stft_new, (method)stft_free, (short)sizeof(t_stft), 
		0L, A_GIMME, 0);
	addmess((method)stft_dsp, "dsp", A_CANT, 0);
	addmess((method)stft_assist, "assist", A_CANT, 0);
	addbang((method)stft_bang);

	ps_sdifstftbuffconnect = gensym("sdifstftbuffconnect");
	rescopy('STR#',RES_ID);
	dsp_initclass();
}
	/* def_ls_new = creation function, A_DEFLONG = its (optional) arguement is a long (32-bit) int */
	
	class_addbang(def_ls_class, (t_method)def_ls_bang);			/* the procedure it uses when it gets a bang in the left inlet */
	class_addmethod(def_ls_class, (t_method)def_ls_read_directions, gensym("ls-directions"), A_GIMME, 0);	
	class_addmethod(def_ls_class, (t_method)def_ls_read_triplets, gensym("ls-triplets"), A_GIMME, 0);

	post(DFLS_VERSION);
}
# else /* Max */
void main(void)
{
	setup((t_messlist **)&def_ls_class, (method)def_ls_new, 0L, (short)sizeof(t_def_ls), 0L, A_GIMME, 0); 
	/* def_ls_new = creation function, A_DEFLONG = its (optional) arguement is a long (32-bit) int */
	
	addbang((method)def_ls_bang);			/* the procedure it uses when it gets a bang in the left inlet */
	addmess((method)def_ls_read_directions, "ls-directions", A_GIMME, 0);	
	addmess((method)def_ls_read_triplets, "ls-triplets", A_GIMME, 0);
	addmess((method)traces, "enabletrace", A_LONG, 0);

	post(DFLS_VERSION);
}
int main(void)
{	
	t_class *c;
	
	c = class_new("featureMean", (method)featureMean_new, (method)featureMean_free, (long)sizeof(t_featureMean),0L /* leave NULL!! */,  A_GIMME, 0);

	
	class_register(CLASS_BOX, c); /* CLASS_NOBOX */
	featureMean_class = c;
    
    addbang((method)featureMean_bang);
    
    class_addmethod(featureMean_class, (method)featureMean_accum, "list", A_GIMME, 0);
    
    
    
    class_addmethod(featureMean_class, 
                    (method)featureMean_clear,
                    "clear",
                    0
                    );
    
    class_addmethod(featureMean_class, 
                    (method)featureMean_numFrames,
                    "num_frames",
                    A_LONG,
                    0
                    );
    
    
    class_addmethod(featureMean_class, 
                    (method)featureMean_length,
                    "length",
                    A_LONG,
                    0
                    );
        
    class_addmethod(featureMean_class, 
                    (method)featureMean_bang,
                    "bang",
                    0
                    );  
    
    class_addmethod(featureMean_class, 
                    (method)featureMean_print,
                    "print",
                    0
                    );
    

	post("featureMean version 0.1.0");
	return 0;
}
Exemple #12
0
void main(void)
{
	setup(&fft_class, fft_new, (method)fft_free, (short)sizeof(t_fft), 
		0L, A_GIMME, 0);
	addmess((method)fft_dsp, "dsp", A_CANT, 0);
	addmess((method)fft_assist, "assist", A_CANT, 0);
	addbang((method)fft_bang);
	ps_rfft = gensym("fftÅ");
	ps_rifft = gensym("ifftÅ");
	ps_fftbuffconnect = gensym("fftbuffconnect");
	rescopy('STR#',3210);
	dsp_initclass();
}
void main()
{
	setup((t_messlist **)&akabookmotion_class, 
			(method)akabookmotion_new, 
			(method)akabookmotion_free, 
			(short)sizeof(t_akabookmotion), 
			0L, 
			A_GIMME, 0);
	
	addbang((method)akabookmotion_bang);
	addmess((method)akabookmotion_assist,"assist",A_CANT,0);
	
	post("aka.bookmotion 1.0-UB by Masayuki Akamatsu");
}
void main()
{
	#ifdef MDebug
		graphmodelutiltests();
	#endif
	
	setup((t_messlist **)&EermMaxClass, (method)EermMaxNew, (method)EermMaxFree, 
		(short)sizeof(EermMax), 0L, A_GIMME, 0);

	addbang((method)EermMaxBang);
	addint((method)EermMaxInt);

	addmess((method)EermMaxSimplexSetEntry, "SimplexSetEntry", A_GIMME, 0);
	addmess((method)EermMaxSetDt, "SetDt", A_GIMME, 0);
	addmess((method)EermMaxSetForce, "SetForce", A_GIMME, 0);
	addmess((method)EermMaxSetWeights, "SetWeights", A_GIMME, 0);
	addmess((method)EermMaxSetSlew, "SetSlew", A_GIMME, 0);
	
	addmess((method)EermMaxForceMeter, "ForceMeter", A_GIMME, 0);
	
	addmess((method)EermMaxPostSimplices, "PostSimplices", A_GIMME, 0);
	addmess((method)EermMaxPostTokens, "PostTokens", A_GIMME, 0);
	
	addmess((method)EermMaxSimplexNew, "SimplexNew", A_GIMME, 0);
	addmess((method)EermMaxSimplexDelete, "SimplexDelete", A_GIMME, 0);
	addmess((method)EermMaxSimplexSetTp, "SimplexSetTp", A_GIMME, 0);
	
	addmess((method)EermMaxNodeNew, "NodeNew", A_GIMME, 0);
	addmess((method)EermMaxNodeSetMean, "NodeSetMean", A_GIMME, 0);
	addmess((method)EermMaxNodeSetVar, "NodeSetVar", A_GIMME, 0);
	addmess((method)EermMaxNodeSetLabelMsg, "NodeSetLabel", A_GIMME, 0);

	addmess((method)EermMaxStulleTokenNew, "StulleTokenNew", A_GIMME, 0);		
	addmess((method)EermMaxTokenNew, "TokenNew", A_GIMME, 0);		
	addmess((method)EermMaxTokenDelete, "TokenDelete", A_GIMME, 0);		
	addmess((method)EermMaxTokenSetCoord, "TokenSetCoord", A_GIMME, 0);		
	addmess((method)EermMaxTokenSetMass, "TokenSetMass", A_GIMME, 0);		
	addmess((method)EermMaxTokenSetDamping, "TokenSetDamping", A_GIMME, 0);		
	addmess((method)EermMaxTokenSetExpScale, "TokenSetExpScale", A_GIMME, 0);		
	addmess((method)EermMaxTokenSetTokenCoupling, "TokenSetTokenCoupling", A_GIMME, 0);		
	addmess((method)EermMaxTokenSetWeights, "TokenSetWeights", A_GIMME, 0);
	addmess((method)EermMaxTokenSetSimplex, "TokenSetSimplex", A_GIMME, 0);

	addmess((method)EermMaxClockEvolution, "ClockEvolution", A_LONG, 0);
	addmess((method)EermMaxClockOnce, "ClockOnce", A_GIMME, 0);

	addmess((method)EermMaxTokenFeatureUpdate, "anything", A_GIMME, 0); // Feature In		

	finder_addclass("Data","Eerm");
}
void main(void)
{
    setup((t_messlist **)&markov_class,(method) markov_new, (method)markov_free, (short)sizeof(t_markov), 0L, A_DEFFLOAT, 0);
    addmess((method)markov_dsp, "dsp", A_CANT, 0);
    addmess((method)markov_assist,"assist",A_CANT,0);
    addmess((method)markov_subdiv,"subdiv",A_FLOAT,0);
    addmess((method)markov_tempo,"tempo",A_FLOAT,0);
    addmess((method)markov_values,"values",A_GIMME,0);
    addmess((method)markov_event_odds,"event_odds",A_GIMME,0);
    addmess((method)markov_set_length,"set_length",A_FLOAT,0);
    addmess((method)markov_manual_override,"manual_override",A_FLOAT,0);
    addbang((method)markov_bang);
    dsp_initclass();
	post("%s %s",OBJECT_NAME, LYONPOTPOURRI_MSG);}
Exemple #16
0
int main()
{
	setup((t_messlist **)&iter_class, (method)iter_new, (method)iter_free, (short)sizeof(t_iter), 0L, A_DEFLONG, 0);
	addint((method)iter_int);
	addbang((method)iter_bang);
	addmess((method)iter_list,"list", A_GIMME, 0);
	addmess((method)iter_anything,"anything",A_GIMME,0);
	addmess((method)iter_assist,"assist",A_CANT,0);
	addfloat((method)iter_float);
	ps_bang = gensym("bang");
	finder_addclass("Lists","iter");

	return 0;
}
Exemple #17
0
int main()
{
	setup((t_messlist **)&buddy_class, (method)buddy_new, (method)buddy_free, (short)sizeof(t_buddy), 0L, A_DEFLONG, 0);
	addint((method)buddy_int);
	addbang((method)buddy_bang);
	addfloat((method)buddy_float);
	addmess((method)buddy_list, "list", A_GIMME, 0);
	addmess((method)buddy_clear, "clear", 0);
	addmess((method)buddy_anything, "anything", A_GIMME, 0);
	addmess((method)buddy_assist,"assist",A_CANT,0);
	addmess((method)buddy_inletinfo,"inletinfo",A_CANT,0);
	finder_addclass("Right-to-Left","buddy");
	ps_list = gensym("list");			

	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);
}
Exemple #19
0
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;
}
Exemple #20
0
void flext_base::SetProxies(t_class *c,bool dsp)
{
#if FLEXT_SYS == FLEXT_SYS_PD
    // for leftmost inlet
    class_addbang(c,cb_bang);
    if(!dsp) class_addfloat(c,cb_float);
    class_addsymbol(c,cb_symbol);
//    class_addpointer(c,cb_pointer);
    class_addlist(c,cb_anything);
    class_addanything(c,cb_anything);

    // proxy for extra inlets
    if(UNLIKELY(!px_class)) {
        // only once
        px_class = class_new(gensym(const_cast<char *>(" flext_base proxy ")),NULL,NULL,sizeof(px_object),CLASS_PD|CLASS_NOINLET, A_NULL);
        class_addbang(px_class,px_object::px_bang); // for other inlets
        class_addfloat(px_class,px_object::px_float); // for other inlets
        class_addsymbol(px_class,px_object::px_symbol); // for other inlets
//        class_addpointer(px_class,px_object::px_pointer); // for other inlets
        class_addlist(px_class,px_object::px_anything); // for other inlets
        class_addanything(px_class,px_object::px_anything); // for other inlets
    }
#elif FLEXT_SYS == FLEXT_SYS_MAX
    addbang((method)cb_bang);
    addint((method)cb_int);  
    addfloat((method)cb_float);  
    addmess((method)cb_anything,"list",A_GIMME,A_NOTHING); // must be explicitly given, otherwise list elements are distributed over inlets
    addmess((method)cb_anything,"anything",A_GIMME,A_NOTHING);
#else
#error Not implemented!
#endif  

    // setup non-leftmost ints and floats
    ADD_PROXYMSG(c,1);
    ADD_PROXYMSG(c,2);
    ADD_PROXYMSG(c,3);
    ADD_PROXYMSG(c,4);
    ADD_PROXYMSG(c,5);
    ADD_PROXYMSG(c,6);
    ADD_PROXYMSG(c,7);
    ADD_PROXYMSG(c,8);
    ADD_PROXYMSG(c,9);
}
Exemple #21
0
void main(fptr *f)

{

	long oldA4;

	

	// this code is a 68K-only macro

	oldA4 = SetCurrentA4();			// get correct value of A4

	RememberA4();					// store inside code resource

	// this is not necessary (but harmless) on PowerPC

	FNS = f;	

	

	/* tell Max about your class. The cast to short is important for 68K */

	setup(&myobject_class, myobject_new,0L, (short)sizeof(MyObject), 0L, A_DEFLONG, 0);

	/* bind your methods to symbols */

	addbang((method)myobject_bang);

	addint((method)myobject_int);

	addmess((method)myobject_FullPacket, "FullPacket", A_LONG, A_LONG, 0);

	addmess((method)myobject_set, "set", A_LONG, 0);

	/* list object in the new object list */

	finder_addclass("Data","dereffer");

	// restore old value of A4 (68K only)

	RestoreA4(oldA4);

}
Exemple #22
0
int main(void){
	setup((t_messlist **)&rdist_class, (method)rdist_new, (method)rdist_free, (short)sizeof(t_rdist), 0L, A_GIMME, 0); 
	
	addmess((method)version, "version", 0);
	addmess((method)rdist_assist, "assist", A_CANT, 0);
	addbang((method)rdist_bang);
	addmess((method)rdist_distlist, "distlist", A_DEFLONG, 0);
        addint((method)rdist_int);
        addfloat((method)rdist_float);
        addmess((method)rdist_list, "list", A_GIMME, 0);
	addmess((method)rdist_anything, "anything", A_GIMME, 0);
        addmess((method)rdist_nonparametric, "nonparametric", A_GIMME, 0);
        addmess((method)rdist_seed, "seed", A_LONG, 0);
        addmess((method)rdist_tellmeeverything, "tellmeeverything", 0);

	version(0);

	return 0;
}
void main(void)
{
 long int tick = gettime();
 setup((t_messlist**)&logistic_class,(method)logistic_new,0L,(short)sizeof(logistic),0L,
 A_GIMME,0);

 addbang((method)logistic_bang);
 
 addmess((method)logistic_reset,"reset", A_GIMME, 0);
 addmess((method)logistic_set,"set", A_GIMME, 0);
 addint((method)logistic_int);
 addfloat((method)logistic_float);
 addmess((method)logistic_lambda,"lambda", A_DEFFLOAT, 0);
 addmess((method)logistic_seed,"seed", A_DEFFLOAT, 0);
 addmess((method)logistic_om,"om", A_DEFLONG, 0);
 
 addmess((method)logistic_assist,"assist", A_CANT, 0);
 post("A-Chaos Lib :: a-logistic  " __DATE__" "__TIME__"                                   ©   a n d r Ž s i e r   2 0 0 4   all rights reserved",tick, 0);
}
Exemple #24
0
void C74_EXPORT main(void)
{	
	void *p,*q;
	
	jit_3m_init();	
	setup((t_messlist **)&max_jit_3m_class, (method)max_jit_3m_new, (method)max_jit_3m_free, (short)sizeof(t_max_jit_3m), 
		0L, A_GIMME, 0);

	p = max_jit_classex_setup(calcoffset(t_max_jit_3m,obex));
	q = jit_class_findbyname(gensym("jit_3m"));    
    max_jit_classex_mop_wrap(p,q,MAX_JIT_MOP_FLAGS_OWN_BANG|MAX_JIT_MOP_FLAGS_OWN_OUTPUTMATRIX); //custom bang/outputmatrix 		
    max_jit_classex_mop_mproc(p,q,max_jit_3m_mproc); 	//custom mproc
    max_jit_classex_standard_wrap(p,q,0); 	
 	addmess((method)max_jit_3m_assist,			"assist",			A_CANT,0);
 	addbang((method)max_jit_3m_bang);

	ps_getmin	= gensym("getmin");
	ps_getmean	= gensym("getmean");
	ps_getmax	= gensym("getmax");
}
void main(void)
{	
	long attrflags;
	void *p, *q;
	
	jit_ys_pixelweightmat_init();	
	setup(&max_jit_ys_pixelweightmat_class, max_jit_ys_pixelweightmat_new, (method)max_jit_ys_pixelweightmat_free, (short)sizeof(t_max_jit_ys_pixelweightmat), 
		0L, A_GIMME, 0);

	p = max_jit_classex_setup(calcoffset(t_max_jit_ys_pixelweightmat,obex));
	q = jit_class_findbyname(gensym("jit_ys_pixelweightmat"));    
    	max_jit_classex_mop_wrap(p,q,MAX_JIT_MOP_FLAGS_OWN_BANG|MAX_JIT_MOP_FLAGS_OWN_OUTPUTMATRIX);
    	max_jit_classex_mop_mproc(p, q, max_jit_ys_pixelweightmat_mproc); // custom mproc
	max_jit_classex_standard_wrap(p,q,0); 	

    	addmess((method)max_jit_mop_assist, "assist", A_CANT,0);
    	
    	// bang method (accept bang)
    	addbang((method)max_jit_ys_pixelweightmat_bang);
    
    	ps_getmap = gensym("getmap");
}
Exemple #26
0
void main(void)
{
  setup((t_messlist **)&presidency_class, (method)presidency_new, (method)presidency_free, 
	(short)sizeof(t_presidency), 0, A_GIMME,0);
  addmess((method)presidency_dsp, "dsp", A_CANT, 0);
  addmess((method)presidency_assist,"assist",A_CANT,0);
  addfloat((method)presidency_float);
  addint((method)presidency_int);
  addbang((method)presidency_bangname);
  addmess((method)presidency_mute, "mute", A_FLOAT, 0);
  addmess((method)presidency_fftinfo, "fftinfo",  0);
  addmess((method)presidency_playthrough, "playthrough", A_DEFFLOAT, 0);
  addmess((method)presidency_size, "size", A_DEFFLOAT, 0);
  addmess((method)presidency_overlap, "overlap", A_DEFFLOAT, 0);
  addmess((method)presidency_winfac, "winfac", A_DEFFLOAT, 0);
  addmess((method)presidency_verbose, "verbose", A_DEFFLOAT, 0);
  addmess((method)presidency_low_freq, "low_freq", A_DEFFLOAT, 0);
  addmess((method)presidency_high_freq, "high_freq", A_DEFFLOAT, 0);
  addmess((method)presidency_acquire_sample, "acquire_sample", 0);
  addmess((method)presidency_abs_thresh, "abs_thresh", A_FLOAT, 0);
  dsp_initclass();
  post("%s %s",OBJECT_NAME,FFTEASE_ANNOUNCEMENT);
}
int main(void)
{	
	// object initialization, note the use of dsp_free for the freemethod, which is required
	// unless you need to free allocated memory, in which case you should call dsp_free from
	// your custom free function.

	t_class *c = class_new("barkSpec~", (method)barkSpec_new, (method)dsp_free, (long)sizeof(t_barkSpec), 0L, A_GIMME, 0);
    
    class_dspinit(c);
	class_register(CLASS_BOX, c);
	barkSpec_class = c;
	
	class_addmethod(c, (method)barkSpec_dsp,		"dsp",		A_CANT, 0);		// Old 32-bit MSP dsp chain compilation for Max 5 and earlier
	class_addmethod(c, (method)barkSpec_dsp64,		"dsp64",	A_CANT, 0);		// New 64-bit MSP dsp chain compilation for Max 6
	//class_addmethod(c, (method)barkSpec_assist,	"assist",	A_CANT, 0);
    
    
	addbang((method)barkSpec_tilde_bang);
    
    class_addmethod(barkSpec_class, 
                    (method)barkSpec_tilde_bang,
                    "bang",
                    0
                    ); 
    
    class_addmethod(barkSpec_class, 
                    (method)barkSpec_tilde_filterFreqs,
                    "filter_freqs",
                    0
                    ); 
    
    class_addmethod(barkSpec_class, 
                    (method)barkSpec_tilde_print,
                    "print",
                    0
                    );     
    
	class_addmethod(
                    barkSpec_class,
                    (method)barkSpec_tilde_window,
                    "window",
                    A_LONG,
                    0
                    );
    
	class_addmethod(
                    barkSpec_class,
                    (method)barkSpec_tilde_overlap,
                    "overlap",
                    A_DEFLONG,
                    0
                    );
    
	class_addmethod(
                    barkSpec_class,
                    (method)barkSpec_tilde_windowFunction,
                    "window_function",
                    A_DEFLONG,
                    0
                    );
    
	class_addmethod(
                    barkSpec_class,
                    (method)barkSpec_tilde_powerSpectrum,
                    "power_spectrum",
                    A_DEFLONG,
                    0
                    );
    
    class_addmethod(
                    barkSpec_class,
                    (method)barkSpec_tilde_createFilterbank,
                    "filterbank",
                    A_DEFFLOAT,
                    0
                    );
    
	class_addmethod(
                    barkSpec_class,
                    (method)barkSpec_tilde_hat,
                    "hat",
                    A_DEFFLOAT,
                    0
                    );
    
    class_addmethod(
                    barkSpec_class,
                    (method)barkSpec_tilde_filterAvg,
                    "filter_avg",
                     A_DEFLONG,
                    0
                    );
    
    class_addmethod(
                    barkSpec_class,
                    (method)barkSpec_tilde_normalize,
                    "normalize",
                     A_DEFLONG,
                    0
                    );
	


	return 0;
}
int main(void)
{	
	// object initialization, note the use of dsp_free for the freemethod, which is required
	// unless you need to free allocated memory, in which case you should call dsp_free from
	// your custom free function.

	t_class *c = class_new("specFlatness~", (method)specFlatness_new, (method)dsp_free, (long)sizeof(t_specFlatness), 0L, A_GIMME, 0);
    
    class_dspinit(c);
	class_register(CLASS_BOX, c);
	specFlatness_class = c;
	
	class_addmethod(c, (method)specFlatness_dsp,		"dsp",		A_CANT, 0);		// Old 32-bit MSP dsp chain compilation for Max 5 and earlier
	class_addmethod(c, (method)specFlatness_dsp64,		"dsp64",	A_CANT, 0);		// New 64-bit MSP dsp chain compilation for Max 6
	//class_addmethod(c, (method)specFlatness_assist,	"assist",	A_CANT, 0);
    
    
	addbang((method)specFlatness_tilde_bang);
    
    class_addmethod(specFlatness_class, 
                    (method)specFlatness_tilde_bang,
                    "bang",
                    0
                    ); 
    
    
	class_addmethod(
                    specFlatness_class,
                    (method)specFlatness_tilde_window,
                    "window",
                    A_LONG,
                    0
                    );
    
	class_addmethod(
                    specFlatness_class,
                    (method)specFlatness_tilde_overlap,
                    "overlap",
                    A_DEFLONG,
                    0
                    );
    
	class_addmethod(
                    specFlatness_class,
                    (method)specFlatness_tilde_windowFunction,
                    "window_function",
                    A_DEFLONG,
                    0
                    );
    
	class_addmethod(
                    specFlatness_class,
                    (method)specFlatness_tilde_powerSpectrum,
                    "power_spectrum",
                    A_DEFLONG,
                    0
                    );
	


	return 0;
}