zexy-2.0:

- use of abstractions for objects that allow it
- some objects are build both as externals and abstractions (as slower fallbacks)
- code-layout is now 1:1 c-file<->object (this should allow for building of zexy as  a collection of externals instead as a big library)
- matrix-objects have moved to iemmatrix !!

svn path=/trunk/externals/zexy/; revision=2641

1 files changed, 0 insertions, 252 deletions

diff --git a/src/z_multiline.c b/src/z_multiline.c
deleted file mode 100644
index 9226ba1..0000000
--- a/src/z_multiline.c
+++ /dev/null
@@ -1,252 +0,0 @@
-/*
-  a multiline that MULTIplicates MULTIple signals with "ramped floats" (--> like "line~")
-
-  this is kind of multiplying some streams with the square diagonal matrix : diag*~
-  for smooth-results we do this line~ thing
-
-  1403:forum::für::umläute:2001
-*/
-
-
-/* i am not sure, whether there is a difference between loop-unrolling by hand or by compiler
- * i somehow have the feeling, that doing it by hand increases(!) performance for about 2%
- * anyhow, if you think that the compiler can do this job better, just disable the UNROLLED define below
- */
-#define UNROLLED
-
-#include "zexy.h"
-
-#ifdef NT
-#pragma warning( disable : 4244 )
-#pragma warning( disable : 4305 )
-#endif
-
-
-/* --------------------------- multiline~ ---------------------------------- */
-
-static t_class *mline_class;
-
-typedef struct _mline {
-  t_object x_obj;
-
-  t_float time;
-
-  int ticksleft;
-  int retarget;
-
-  t_float msec2tick;
-
-  t_float *value;
-  t_float *target;
-  t_float *increment; /* single precision is really a bad */
-
-  t_float **sigIN;
-  t_float **sigOUT;
-  t_float  *sigBUF;
-  int       sigNUM;
-
-} t_mline;
-
-/* the message thing */
-
-static void mline_list(t_mline *x, t_symbol *s, int argc, t_atom *argv)
-{
-  if (argc>x->sigNUM)x->time=atom_getfloat(argv+argc-1);
-
-  if (x->time <= 0) {
-    if (argc==1) {
-      t_float f = atom_getfloat(argv);
-      int i=x->sigNUM;
-      while(i--)x->target[i]=x->value[i]=f;
-    } else {
-      int offset = (argc<x->sigNUM)?x->sigNUM-argc:0;
-      int i=offset?argc:x->sigNUM;
-      while(i--)x->target[i+offset]=x->value[i+offset]=atom_getfloat(argv++);
-    }
-    x->ticksleft=x->retarget=x->time=0;
-  } else {
-    if (argc==1) {
-      int i = x->sigNUM;
-      t_float f = atom_getfloat(argv);
-      for(i=0;i<x->sigNUM;i++)x->target[i]=f;
-    } else {
-      int offset = (argc<x->sigNUM)?x->sigNUM-argc:0;
-      int i=offset?argc:x->sigNUM;
-      while(i--)x->target[i+offset]=atom_getfloat(argv++);
-    }
-    x->retarget = 1;
-  }
-}
-
-static void mline_stop(t_mline *x)
-{
-  int i = x->sigNUM;
-  while (i--) x->target[i] = x->value[i];
-  x->ticksleft = x->retarget = 0;
-}
-
-/* the dsp thing */
-
-static t_int *mline_perform(t_int *w)
-{
-  t_mline *x = (t_mline *)(w[1]);
-  int n = (int)(w[2]);
-
-  t_float **out = x->sigOUT;
-  t_float **in  = x->sigIN;
-  t_float  *buf = x->sigBUF, *sigBUF = buf;
-  t_float  *inc = x->increment, *increment = inc;
-  t_float  *val = x->value, *value = val;
-  t_float  *tgt = x->target, *target = tgt;
-
-  int sigNUM = x->sigNUM;
-
-  if (x->retarget) {
-    int nticks = x->time * x->msec2tick;
-
-    if (!nticks) nticks = 1;
-    x->ticksleft = nticks;
-
-    x->retarget = 0;
-  }
-
-  if (x->ticksleft) {
-    int N=n-1;
-    t_float oneovernos = 1./(x->ticksleft*n);
-
-    int i=sigNUM;
-    while(i--)*inc++=(*tgt++-*val++)*oneovernos;
-    
-    n=-1;
-    while (n++<N) {
-      buf = sigBUF;
-      val = value;
-      inc = increment;
-
-      i = sigNUM;
-      while (i--)*buf++=in[i][n]*(*val++ += *inc++);
-      i=sigNUM;
-      buf=sigBUF;
-      while (i--)out[i][n]=*buf++;
-    }
-
-    if (!--x->ticksleft) {
-      val = value;
-      tgt = target;
-      i = sigNUM;
-      while(i--)*val++=*tgt++;
-    }
-      
-  } else { /* no ticks left */
-    int i = sigNUM;
-    while (n--) {
-      i = sigNUM;
-      val = value;
-      buf = sigBUF;
-      while (i--)*buf++=in[i][n]**val++;
-      i = sigNUM;
-      buf = sigBUF;
-      while (i--)out[i][n]=*buf++;
-    }
-  }
-
-  return (w+3);
-}
-
-
-
-static void mline_dsp(t_mline *x, t_signal **sp)
-{
-  int i = x->sigNUM, n = 0;
-  t_float **dummy = x->sigIN;
-  while(i--)*dummy++=sp[n++]->s_vec;
-
-  i = x->sigNUM;
-  dummy =x->sigOUT;
-  while(i--)*dummy++=sp[n++]->s_vec;
-
-  x->msec2tick = sp[0]->s_sr / (1000.f * sp[0]->s_n);
-  dsp_add(mline_perform, 2, x, sp[0]->s_n);
-}
-
-
-/* setup/setdown things */
-
-static void mline_free(t_mline *x)
-{
-  freebytes(x->value,     sizeof(x->value));
-  freebytes(x->target,    sizeof(x->target));
-  freebytes(x->increment, sizeof(x->increment));
-
-  freebytes(x->sigIN,     sizeof(x->sigIN));
-  freebytes(x->sigOUT,    sizeof(x->sigOUT));
-  freebytes(x->sigBUF,    sizeof(x->sigBUF));
-}
-
-
-static void *mline_new(t_symbol *s, int argc, t_atom *argv)
-{
-    t_mline *x = (t_mline *)pd_new(mline_class);
-    int i;
-
-    if (!argc) {
-      argc = 1;
-      x->time = 0;
-    } else {
-      x->time = atom_getfloat(argv+argc-1);
-      if (x->time < 0) x->time = 0;
-
-      argc--;
-      if (!argc) argc = 1;
-    }
-
-    x->sigNUM = argc;
-
-    i = argc-1;
-
-    outlet_new(&x->x_obj, &s_signal);
-
-    while (i--) {
-      inlet_new(&x->x_obj, &x->x_obj.ob_pd, &s_signal, &s_signal);
-      outlet_new(&x->x_obj, &s_signal);
-    }
-
-    inlet_new(&x->x_obj, &x->x_obj.ob_pd, gensym("float"), gensym(""));
-    floatinlet_new(&x->x_obj, &x->time);
-    
-    x->sigIN  = (t_float **)getbytes(x->sigNUM * sizeof(t_float **));
-    x->sigOUT = (t_float **)getbytes(x->sigNUM * sizeof(t_float **));
-    x->sigBUF = (t_float  *)getbytes(x->sigNUM * sizeof(t_float  *));
-
-    x->value     = (t_float *)getbytes(x->sigNUM * sizeof(t_float *));
-    x->target    = (t_float *)getbytes(x->sigNUM * sizeof(t_float *));
-    x->increment = (t_float *)getbytes(x->sigNUM * sizeof(t_float *));
-
-    i = x->sigNUM;
-
-    while (i--) {
-      x->sigIN[i] = x->sigOUT[i] = 0;
-      x->increment[i] = 0;
-      x->value[x->sigNUM-i-1] = x->target[x->sigNUM-i-1] = atom_getfloat(argv+i);
-    }
-
-    x->msec2tick = x->ticksleft = x->retarget = 0;
-
-    return (x);
-}
-
-
-
-void z_multiline_setup(void)
-{
-  mline_class = class_new(gensym("multiline~"), (t_newmethod)mline_new, (t_method)mline_free,
-			  sizeof(t_mline), 0, A_GIMME, 0);
-
-  class_addmethod(mline_class, (t_method)mline_dsp, gensym("dsp"), 0);
-  class_addmethod(mline_class, nullfn, gensym("signal"), 0);
-
-  class_addmethod(mline_class, (t_method)mline_list, gensym(""), A_GIMME, 0);
-  class_addmethod(mline_class, (t_method)mline_stop, gensym("stop"), 0);
-
-  class_sethelpsymbol(mline_class, gensym("zexy/multiline~"));
-}