[sc-dev] [commit?] A2K ugen

[Julian Rohrhuber <rohrhuber@xxxxxxxxxxxxxx>]

here is an averaging A2K ugen. I think it would be handy to have. 
Should I commit it?


Index: LFUGens.cpp
===================================================================
RCS file: /cvsroot/supercollider/SuperCollider3/source/plugins/LFUGens.cpp,v
retrieving revision 1.31
diff -p -b -B -r1.31 LFUGens.cpp
*** LFUGens.cpp 12 Sep 2004 07:21:23 -0000      1.31
--- LFUGens.cpp 2 Nov 2004 14:22:53 -0000
*************** struct K2A : public Unit
*** 149,154 ****
--- 149,159 ----
        float mLevel;
  };

+ struct A2K : public Unit
+ {
+
+ };
+
  struct Silent : public Unit
  {
  };
*************** extern "C"
*** 230,235 ****
--- 235,243 ----
        void K2A_next(K2A *unit, int inNumSamples);
        void K2A_Ctor(K2A* unit);

+       void A2K_next(A2K *unit, int inNumSamples);
+       void A2K_Ctor(A2K* unit);
+
        void Silent_next(Silent *unit, int inNumSamples);
        void Silent_Ctor(Silent* unit);

*************** void K2A_Ctor(K2A* unit)
*** 1098,1103 ****
--- 1106,1133 ----
        ZOUT0(0) = unit->mLevel;

  }
+
+ 
//////////////////////////////////////////////////////////////////////////////////////////////////
+
+ void A2K_next(A2K *unit, int inNumSamples)
+ {
+
+       float *in = ZIN(0);
+       float sum = 0.f;
+
+       LOOP(inNumSamples,
+               sum += ZXP(in);
+       );
+       ZOUT0(0) = sum / (float)inNumSamples;
+ }
+
+ void A2K_Ctor(A2K* unit)
+ {
+       SETCALC(A2K_next);
+       A2K_next(unit, 1);
+
+ }
+

//////////////////////////////////////////////////////////////////////////////////////////////////

  void Silent_Ctor(Unit* unit)
*************** void load(InterfaceTable *inTable)
*** 3357,3362 ****
--- 3387,3393 ----
        DefineSimpleUnit(VarSaw);
        DefineSimpleUnit(SyncSaw);
        DefineSimpleUnit(K2A);
+       DefineSimpleUnit(A2K);
        DefineSimpleUnit(Silent);
        DefineSimpleUnit(Line);
        DefineSimpleUnit(XLine);
--








.