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
|
//
//
// direct port of sndobj's StringFlt
// Copyright (C) 2005 Tim Blechmann
//
// This program is free software; you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation; either version 2 of the License, or
// (at your option) any later version.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with this program; see the file COPYING. If not, write to
// the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
// Boston, MA 02111-1307, USA.
#define FLEXT_ATTRIBUTES 1
#include <flsndobj.h>
#if !defined(FLEXT_VERSION) || (FLEXT_VERSION < 500)
#error You need at least flext version 0.5
#endif
class FlextStringFlt:
public flext_sndobj
{
FLEXT_HEADER(FlextStringFlt,flext_sndobj);
public:
FlextStringFlt(int argc, t_atom* argv);
virtual bool NewObjs();
virtual void FreeObjs();
virtual void ProcessObjs();
StringFlt* string;
float fdbgain;
float freq;
private:
FLEXT_ATTRVAR_F(fdbgain);
FLEXT_ATTRVAR_F(freq);
};
FLEXT_LIB_DSP_V("StringFlt~",FlextStringFlt)
FlextStringFlt::FlextStringFlt(int argc, t_atom* argv)
{
AtomList l(argc, argv);
FLEXT_ADDATTR_VAR1("fdbgain", fdbgain);
FLEXT_ADDATTR_VAR1("frequency", freq);
AddInSignal(1);
AddOutSignal(1);
}
bool FlextStringFlt::NewObjs()
{
string = new StringFlt(freq, fdbgain, &InObj(0),
0, Blocksize(), Samplerate());
return true;
}
void FlextStringFlt::FreeObjs()
{
delete string;
}
void FlextStringFlt::ProcessObjs()
{
string->SetFreq(freq);
string->SetFdbgain(fdbgain);
string->DoProcess();
*string >> OutObj(0);
}
static void setup()
{
FLEXT_DSP_SETUP(FlextStringFlt);
}
FLEXT_LIB_SETUP(StringFlt_tilde,setup)
|
