aboutsummaryrefslogtreecommitdiff
path: root/externals/grill/fftease/src/thresher~.cpp
blob: f8d16ab08f6649974e96c24301e95e56e02381ad (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
/*

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"
#include <stdlib.h>

class thresher:
	public fftease
{
	FLEXT_HEADER_S(thresher,fftease,setup)
	
public:
	thresher();

protected:
	virtual V Set();
	virtual V Clear();
	virtual V Delete();

	virtual V Transform(I n,S *const *in);

	F *_compositeFrame;
	I *_framesLeft;
	BL _firstFrame;

	F _moveThreshold;
	I _maxHoldFrames;

private:
	static V setup(t_classid c);
};

FLEXT_LIB_DSP("fftease, thresher~ nacho~",thresher)


V thresher::setup(t_classid )
{
}

void thresher::Set()
{
	fftease::Set();

	const F rate = Samplerate();
	const I n = Blocksize(),_N = get_N(),_N2 = _N/2; 

	_compositeFrame = new F[_N+2];
	_framesLeft = new I[_N2+1];

	_firstFrame = true;
	_moveThreshold = .00001 ;
	F _maxHoldTime = 5.0 ;
	_maxHoldFrames = (I)(_maxHoldTime *rate/n);
}

void thresher::Clear()
{
	fftease::Clear();
	_compositeFrame = NULL;
	_framesLeft = NULL;
}

void thresher::Delete()
{
	fftease::Delete();
	if(_compositeFrame) delete[] _compositeFrame;
	if(_framesLeft) delete[] _framesLeft;
}


thresher::thresher():
	fftease(4,F_BALANCED|F_BITSHUFFLE|F_PHCONV)
{
	AddInSignal("Messages and input signal");
	AddOutSignal("Transformed signal");
}


V thresher::Transform(I _N,S *const *)
{
	I *fr = _framesLeft;
	if( _firstFrame ) {
		for (I i = 0; i <= _N; i += 2,++fr ){
			_compositeFrame[i] = _channel1[i];
			_compositeFrame[i+1] = _channel1[i+1];
			*fr = _maxHoldFrames;
		}
		_firstFrame = false;
	}
	else {
		for(I i = 0; i <= _N; i += 2,++fr ){
			if( (fabs( _compositeFrame[i] - _channel1[i] ) > _moveThreshold) || (*fr <= 0) ) {
				_compositeFrame[i] = _channel1[i];
				_compositeFrame[i+1] = _channel1[i+1];
				*fr = _maxHoldFrames;
			}
			else {
				_channel1[i] = _compositeFrame[i];
				_channel1[i+1] = _compositeFrame[i+1];
				--*fr;
			}
		}
	}
}