aboutsummaryrefslogtreecommitdiff
path: root/src/avg_tilde.c
diff options
context:
space:
mode:
authorIOhannes m zmölnig <zmoelnig@users.sourceforge.net>2005-05-17 16:50:28 +0000
committerIOhannes m zmölnig <zmoelnig@users.sourceforge.net>2005-05-17 16:50:28 +0000
commit6b378329aa20ec2caa3f06968c2ac71d41dca7f9 (patch)
tree849bbfb62e3b5842252a3920e3a0b0bdf3617ac8 /src/avg_tilde.c
parentc3a32b31057a7f805382154403ddb6d68424a6dd (diff)
renamed *_tilde.c-files to *~.c
svn path=/trunk/externals/zexy/; revision=2998
Diffstat (limited to 'src/avg_tilde.c')
-rw-r--r--src/avg_tilde.c85
1 files changed, 0 insertions, 85 deletions
diff --git a/src/avg_tilde.c b/src/avg_tilde.c
deleted file mode 100644
index 5011cee..0000000
--- a/src/avg_tilde.c
+++ /dev/null
@@ -1,85 +0,0 @@
-/******************************************************
- *
- * zexy - implementation file
- *
- * copyleft (c) IOhannes m zmölnig
- *
- * 1999:forum::für::umläute:2004
- *
- * institute of electronic music and acoustics (iem)
- *
- ******************************************************
- *
- * license: GNU General Public License v.2
- *
- ******************************************************/
-
-#include "zexy.h"
-#include <math.h>
-
-/* ------------------------ average~ ----------------------------- */
-
-/* tilde object to take absolute value. */
-
-static t_class *avg_class;
-
-typedef struct _avg
-{
- t_object x_obj;
-
- t_float n_inv;
- t_float buf;
- int blocks;
-} t_avg;
-
-
-/* average :: arithmetic mean of one signal-vector */
-
-static t_int *avg_perform(t_int *w)
-{
- t_float *in = (t_float *)(w[1]);
-
- t_avg *x = (t_avg *)w[2];
- int n = (int)(w[3]);
-
- t_float buf = 0.;
-
- while (n--)
- {
- buf += *in++;
- }
- outlet_float(x->x_obj.ob_outlet, buf*x->n_inv);
-
- return (w+4);
-}
-
-static void avg_dsp(t_avg *x, t_signal **sp)
-{
- x->n_inv=1./sp[0]->s_n;
- dsp_add(avg_perform, 3, sp[0]->s_vec, x, sp[0]->s_n);
-}
-
-static void *avg_new(void)
-{
- t_avg *x = (t_avg *)pd_new(avg_class);
- outlet_new(&x->x_obj, gensym("float"));
- return (x);
-}
-
-static void avg_help(void)
-{
- post("avg~\t:: outputs the arithmetic mean of each signal-vector");
-}
-
-
-void avg_tilde_setup(void)
-{
- avg_class = class_new(gensym("avg~"), (t_newmethod)avg_new, 0,
- sizeof(t_avg), 0, A_DEFFLOAT, 0);
- class_addmethod(avg_class, nullfn, gensym("signal"), 0);
- class_addmethod(avg_class, (t_method)avg_dsp, gensym("dsp"), 0);
-
- class_addmethod(avg_class, (t_method)avg_help, gensym("help"), 0);
- class_sethelpsymbol(avg_class, gensym("zexy/avg~"));
- zexy_register("avg~");
-}