From 0ed7a8b68dd73e2b0473b8127aeca99f3bac9061 Mon Sep 17 00:00:00 2001
From: Thomas Grill <xovo@users.sourceforge.net>
Date: Wed, 1 Apr 2009 21:13:09 +0000
Subject: cleaned up grill externals - replaced with svn:externals to
 svn.grrrr.org/ext/trunk/

svn path=/trunk/; revision=10951
---
 externals/grill/fftease/src/pvoc~.cpp | 130 ----------------------------------
 1 file changed, 130 deletions(-)
 delete mode 100644 externals/grill/fftease/src/pvoc~.cpp

(limited to 'externals/grill/fftease/src/pvoc~.cpp')

diff --git a/externals/grill/fftease/src/pvoc~.cpp b/externals/grill/fftease/src/pvoc~.cpp
deleted file mode 100644
index 5f941e09..00000000
--- a/externals/grill/fftease/src/pvoc~.cpp
+++ /dev/null
@@ -1,130 +0,0 @@
-/*
-
-FFTease - A set of Live Spectral Processors
-Originally written by Eric Lyon and Christopher Penrose for the Max/MSP platform
-
-Copyright (c)Thomas Grill (xovo@gmx.net)
-For information on usage and redistribution, and for a DISCLAIMER OF ALL
-WARRANTIES, see the file, "license.txt," in this distribution.  
-
-*/
-
-#include "main.h"
-
-
-class pvoc:
-	public fftease
-{
-	FLEXT_HEADER_S(pvoc,fftease,setup)
-	
-public:
-	pvoc(I argc,const t_atom *argv);
-
-protected:
-
-	virtual V Transform(I _N2,S *const *in);
-
-    BL _invert;
-
-    F _threshold,_multiplier;
-    F _thresh_dB,_mult_dB;
-
-private:
-	V ms_thresh(F v) { _threshold = FromdB(_thresh_dB = v); }
-	V ms_mult(F v) { _multiplier = FromdB(_mult_dB = v); }
-
-
-	static V setup(t_classid c);
-
-	FLEXT_ATTRGET_F(_thresh_dB)
-	FLEXT_CALLSET_F(ms_thresh)
-	FLEXT_ATTRGET_F(_mult_dB)
-	FLEXT_CALLSET_F(ms_mult)
-	FLEXT_ATTRVAR_B(_invert)
-};
-
-FLEXT_LIB_DSP_V("pvoc~",pvoc)
-
-
-V pvoc::setup(t_classid c)
-{
-	FLEXT_CADDATTR_VAR(c,"thresh",_thresh_dB,ms_thresh);
-	FLEXT_CADDATTR_VAR(c,"mult",_mult_dB,ms_mult);
-	FLEXT_CADDATTR_VAR1(c,"invert",_invert);
-}
-
-
-pvoc::pvoc(I argc,const t_atom *argv):
-	fftease(4,F_STEREO|F_BALANCED|F_BITSHUFFLE|F_NOPH2),
-	_thresh_dB(-30),_mult_dB(-18),
-	_invert(false)
-{
-	/* parse and set object's options given */
-	if(argc >= 1) {
-		if(CanbeFloat(argv[0]))
-			_thresh_dB = GetAFloat(argv[0]);
-		else
-			post("%s - Threshold must be a float value - set to %0f",thisName(),_thresh_dB);
-	}
-	if(argc >= 2) {
-		if(CanbeFloat(argv[1]))
-			_mult_dB = GetAFloat(argv[1]);
-		else
-			post("%s - Multiplier must be a float value - set to %0f",thisName(),_mult_dB);
-	}
-	if(argc >= 3) {
-		if(CanbeBool(argv[2]))
-			_invert = GetABool(argv[2]);
-		else
-			post("%s - Invert flag must be a boolean value - set to %i",thisName(),_invert?1:0);
-	}
-
-	ms_thresh(_thresh_dB);
-	ms_mult(_mult_dB);
-
-	AddInSignal("Messages and input signal");
-	AddInSignal("Reference signal");
-	AddOutSignal("Transformed signal");
-}
-
-
-V pvoc::Transform(I _N,S *const *in)
-{
-    /*
-	int freq,amp;
-	int chan;
-
-    // start osc bank
-    for ( chan = lo_bin; chan < hi_bin; chan++ ) {
-      freq = ( amp = ( chan << 1 ) ) + 1;
-      if ( _channel1[amp] < synt ){
-        breaker = 1;
-      }
-      if( breaker ) {
-        breaker = 0 ;
-      }
-      else {
-        _channel1[freq] *= myPInc;
-        finc = ( _channel1[freq] - ( f = lastfreq[chan] ) )*Iinv;
-        ainc = ( _channel1[amp] - ( a = lastamp[chan] ) )*Iinv;
-        address = index[chan];
-        for ( n = 0; n < I; n++ ) {
-          output[n] += a*table[ (int) address ];
-          address += f;
-          while ( address >= L )
-            address -= L;
-          while ( address < 0 )
-            address += L;
-          a += ainc;
-          f += finc;
-        }
-        lastfreq[chan] = _channel1[freq];
-        lastamp[chan] = _channel1[amp];
-        index[chan] = address;
-      }
-    }
-    */
-}
-
-
-
-- 
cgit v1.2.1