From 69cf1cafcd403331d9fbfb76977efb6101eef284 Mon Sep 17 00:00:00 2001 From: Hans-Christoph Steiner Date: Sat, 3 Apr 2010 20:24:12 +0000 Subject: converted to template Makefile svn path=/trunk/externals/pmpd/; revision=13366 --- src/tCircle3D.c | 195 -------------------------------------------------------- 1 file changed, 195 deletions(-) delete mode 100644 src/tCircle3D.c (limited to 'src/tCircle3D.c') diff --git a/src/tCircle3D.c b/src/tCircle3D.c deleted file mode 100644 index 6664d39..0000000 --- a/src/tCircle3D.c +++ /dev/null @@ -1,195 +0,0 @@ -#include "m_pd.h" -#include "math.h" - -static t_class *tCircle3D_class; - -typedef struct _tCircle3D { - t_object x_obj; - t_float X, Y, Z, VX, VY, VZ, P, Rmin, Rmax, distance_old; - t_outlet *force_new, *distance, *vitesse;// outlet -} t_tCircle3D; - -void tCircle3D_position3D(t_tCircle3D *x, t_float X, t_float Y, t_float Z) -{ -t_float d, tmp, profondeur, vitesse; - - - - tmp = sqrt (x->VX*x->VX + x->VY*x->VY + x->VZ*x->VZ); - if (tmp != 0) - { - x->VX /= tmp; - x->VY /= tmp; - x->VZ /= tmp; - } - else - { - x->VX=1; - x->VY=0; - x->VZ=0; - } - - d = x->VX * x->X + x->VY * x->Y + x->VZ * x->Z; - - profondeur = x->VX * X + x->VY * Y + x->VZ * Z - d; - - vitesse = profondeur - x->distance_old; - x->distance_old = profondeur; - - outlet_float(x->vitesse, vitesse); - - outlet_float(x->distance, profondeur); - - if ( (profondeur < 0) & (profondeur > - x->P) ) - { - outlet_float(x->force_new, 1); - } - else - { - outlet_float(x->force_new, 0); - } - -} - -void tCircle3D_setXYZ(t_tCircle3D *x, t_float X, t_float Y, t_float Z) -{ - x->X= X; - x->Y= Y; - x->Z= Z; -} -void tCircle3D_setVXYZ(t_tCircle3D *x, t_float X, t_float Y, t_float Z) -{ - x->VX= X; - x->VY= Y; - x->VZ= Z; -} - -void tCircle3D_setVX(t_tCircle3D *x, t_float X) -{ - x->VX= X; -} - -void tCircle3D_setVY(t_tCircle3D *x, t_float Y) -{ - x->VY= Y; -} - -void tCircle3D_setVZ(t_tCircle3D *x, t_float Z) -{ - x->VZ= Z; -} -void tCircle3D_setX(t_tCircle3D *x, t_float X) -{ - x->X= X; -} - -void tCircle3D_setY(t_tCircle3D *x, t_float Y) -{ - x->Y= Y; -} - -void tCircle3D_setZ(t_tCircle3D *x, t_float Z) -{ - x->Z= Z; -} - -void tCircle3D_setP(t_tCircle3D *x, t_float X) -{ - x->P= X; -} - -void tCircle3D_setRmin(t_tCircle3D *x, t_float R) -{ - x->Rmin = R; -} - -void tCircle3D_setRmax(t_tCircle3D *x, t_float R) -{ - x->Rmax = R; -} - - -void *tCircle3D_new(t_symbol *s, int argc, t_atom *argv) -{ - t_tCircle3D *x = (t_tCircle3D *)pd_new(tCircle3D_class); - - x->force_new=outlet_new(&x->x_obj, 0); - x->distance=outlet_new(&x->x_obj, 0); - x->vitesse=outlet_new(&x->x_obj, 0); - - x->distance_old = 0; - - if (argc>=9) - x->P= atom_getfloatarg(8, argc, argv); - else - x->P= 10000; - - if (argc>=8) - x->Z= atom_getfloatarg(7, argc, argv); - else - x->Rmax= 1; - - if (argc>=7) - x->P= atom_getfloatarg(6, argc, argv); - else - x->Rmin= 0; - - if (argc>=6) - x->Z= atom_getfloatarg(5, argc, argv); - else - x->Z= 0; - - if (argc>=5) - x->Y= atom_getfloatarg(4, argc, argv); - else - x->Y= 0; - - if (argc>=4) - x->X= atom_getfloatarg(3, argc, argv); - else - x->X= 0; - - if (argc>=3) - x->VZ= atom_getfloatarg(2, argc, argv); - else - x->VZ= 0; - - if (argc>=2) - x->VY= atom_getfloatarg(1, argc, argv); - else - x->VY= 0; - - if (argc>=1) - x->VX= atom_getfloatarg(0, argc, argv); - else - x->VX= 1; - - return (x); -} - -void tCircle3D_setup(void) -{ - - tCircle3D_class = class_new(gensym("tCircle3D"), - (t_newmethod)tCircle3D_new, - 0, sizeof(t_tCircle3D), - CLASS_DEFAULT, A_GIMME, 0); - - class_addcreator((t_newmethod)tCircle3D_new, gensym("pmpd.tCircle3D"), A_GIMME, 0); - - class_addmethod(tCircle3D_class, (t_method)tCircle3D_position3D, gensym("position3D"), A_DEFFLOAT, A_DEFFLOAT, A_DEFFLOAT, 0); - - class_addmethod(tCircle3D_class, (t_method)tCircle3D_setVX, gensym("setVX"), A_DEFFLOAT, 0); - class_addmethod(tCircle3D_class, (t_method)tCircle3D_setVY, gensym("setVY"), A_DEFFLOAT, 0); - class_addmethod(tCircle3D_class, (t_method)tCircle3D_setVZ, gensym("setVZ"), A_DEFFLOAT, 0); - class_addmethod(tCircle3D_class, (t_method)tCircle3D_setX, gensym("setX"), A_DEFFLOAT, 0); - class_addmethod(tCircle3D_class, (t_method)tCircle3D_setY, gensym("setY"), A_DEFFLOAT, 0); - class_addmethod(tCircle3D_class, (t_method)tCircle3D_setZ, gensym("setZ"), A_DEFFLOAT, 0); - class_addmethod(tCircle3D_class, (t_method)tCircle3D_setRmin, gensym("setRmin"), A_DEFFLOAT, 0); - class_addmethod(tCircle3D_class, (t_method)tCircle3D_setRmax, gensym("setRmax"), A_DEFFLOAT, 0); - class_addmethod(tCircle3D_class, (t_method)tCircle3D_setXYZ, gensym("setXYZ"), A_DEFFLOAT, A_DEFFLOAT, A_DEFFLOAT, 0); - class_addmethod(tCircle3D_class, (t_method)tCircle3D_setVXYZ, gensym("setVXYZ"), A_DEFFLOAT, A_DEFFLOAT, A_DEFFLOAT, 0); - class_addmethod(tCircle3D_class, (t_method)tCircle3D_setP, gensym("setPmax"), A_DEFFLOAT, 0); - - -} -- cgit v1.2.1