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
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
|
//-------------------------------------------------------------------------------------------------------
// VST Plug-Ins SDK
// Version 2.4 $Date: 2006/11/13 09:08:27 $
//
// Category : VST 2.x SDK Samples
// Filename : adelay.cpp
// Created by : Steinberg Media Technologies
// Description : Simple Delay plugin (Mono->Stereo)
//
// � 2006, Steinberg Media Technologies, All Rights Reserved
//-------------------------------------------------------------------------------------------------------
#include <stdio.h>
#include <string.h>
#ifndef __adelay__
#include "adelay.h"
#endif
//-----------------------------------------------------------------------------
ADelayProgram::ADelayProgram ()
{
// default Program Values
fDelay = 0.5;
fFeedBack = 0.5;
fOut = 0.75;
strcpy (name, "Init");
}
//-----------------------------------------------------------------------------
ADelay::ADelay (audioMasterCallback audioMaster)
: AudioEffectX (audioMaster, kNumPrograms, kNumParams)
{
// init
size = 44100;
cursor = 0;
delay = 0;
buffer = new float[size];
programs = new ADelayProgram[numPrograms];
fDelay = fFeedBack = fOut = 0;
if (programs)
setProgram (0);
setNumInputs (1); // mono input
setNumOutputs (2); // stereo output
setUniqueID ('ADly'); // this should be unique, use the Steinberg web page for plugin Id registration
resume (); // flush buffer
}
//------------------------------------------------------------------------
ADelay::~ADelay ()
{
if (buffer)
delete[] buffer;
if (programs)
delete[] programs;
}
//------------------------------------------------------------------------
void ADelay::setProgram (VstInt32 program)
{
ADelayProgram* ap = &programs[program];
curProgram = program;
setParameter (kDelay, ap->fDelay);
setParameter (kFeedBack, ap->fFeedBack);
setParameter (kOut, ap->fOut);
}
//------------------------------------------------------------------------
void ADelay::setDelay (float fdelay)
{
fDelay = fdelay;
programs[curProgram].fDelay = fdelay;
cursor = 0;
delay = (long)(fdelay * (float)(size - 1));
}
//------------------------------------------------------------------------
void ADelay::setProgramName (char *name)
{
strcpy (programs[curProgram].name, name);
}
//------------------------------------------------------------------------
void ADelay::getProgramName (char *name)
{
if (!strcmp (programs[curProgram].name, "Init"))
sprintf (name, "%s %d", programs[curProgram].name, curProgram + 1);
else
strcpy (name, programs[curProgram].name);
}
//-----------------------------------------------------------------------------------------
bool ADelay::getProgramNameIndexed (VstInt32 category, VstInt32 index, char* text)
{
if (index < kNumPrograms)
{
strcpy (text, programs[index].name);
return true;
}
return false;
}
//------------------------------------------------------------------------
void ADelay::resume ()
{
memset (buffer, 0, size * sizeof (float));
AudioEffectX::resume ();
}
//------------------------------------------------------------------------
void ADelay::setParameter (VstInt32 index, float value)
{
ADelayProgram* ap = &programs[curProgram];
switch (index)
{
case kDelay : setDelay (value); break;
case kFeedBack : fFeedBack = ap->fFeedBack = value; break;
case kOut : fOut = ap->fOut = value; break;
}
}
//------------------------------------------------------------------------
float ADelay::getParameter (VstInt32 index)
{
float v = 0;
switch (index)
{
case kDelay : v = fDelay; break;
case kFeedBack : v = fFeedBack; break;
case kOut : v = fOut; break;
}
return v;
}
//------------------------------------------------------------------------
void ADelay::getParameterName (VstInt32 index, char *label)
{
switch (index)
{
case kDelay : strcpy (label, "Delay"); break;
case kFeedBack : strcpy (label, "FeedBack"); break;
case kOut : strcpy (label, "Volume"); break;
}
}
//------------------------------------------------------------------------
void ADelay::getParameterDisplay (VstInt32 index, char *text)
{
switch (index)
{
case kDelay : int2string (delay, text, kVstMaxParamStrLen); break;
case kFeedBack : float2string (fFeedBack, text, kVstMaxParamStrLen); break;
case kOut : dB2string (fOut, text, kVstMaxParamStrLen); break;
}
}
//------------------------------------------------------------------------
void ADelay::getParameterLabel (VstInt32 index, char *label)
{
switch (index)
{
case kDelay : strcpy (label, "samples"); break;
case kFeedBack : strcpy (label, "amount"); break;
case kOut : strcpy (label, "dB"); break;
}
}
//------------------------------------------------------------------------
bool ADelay::getEffectName (char* name)
{
strcpy (name, "Delay");
return true;
}
//------------------------------------------------------------------------
bool ADelay::getProductString (char* text)
{
strcpy (text, "Delay");
return true;
}
//------------------------------------------------------------------------
bool ADelay::getVendorString (char* text)
{
strcpy (text, "Steinberg Media Technologies");
return true;
}
//---------------------------------------------------------------------------
void ADelay::processReplacing (float** inputs, float** outputs, VstInt32 sampleFrames)
{
float* in = inputs[0];
float* out1 = outputs[0];
float* out2 = outputs[1];
while (--sampleFrames >= 0)
{
float x = *in++;
float y = buffer[cursor];
buffer[cursor++] = x + y * fFeedBack;
if (cursor >= delay)
cursor = 0;
*out1++ = y;
if (out2)
*out2++ = y;
}
}
|
