summaryrefslogtreecommitdiff
path: root/apps/plugins/pdbox/PDa/intern/vd~.c
diff options
context:
space:
mode:
Diffstat (limited to 'apps/plugins/pdbox/PDa/intern/vd~.c')
-rw-r--r--apps/plugins/pdbox/PDa/intern/vd~.c10
1 files changed, 8 insertions, 2 deletions
diff --git a/apps/plugins/pdbox/PDa/intern/vd~.c b/apps/plugins/pdbox/PDa/intern/vd~.c
index 471df56753..81f9d48938 100644
--- a/apps/plugins/pdbox/PDa/intern/vd~.c
+++ b/apps/plugins/pdbox/PDa/intern/vd~.c
@@ -1,12 +1,14 @@
1#include <m_pd.h> 1#include <m_pd.h>
2#include <m_fixed.h> 2#include <m_fixed.h>
3 3
4#include "delay.h"
5
6extern int ugen_getsortno(void); 4extern int ugen_getsortno(void);
7 5
6#include "delay.h"
7
8#define DEFDELVS 64 /* LATER get this from canvas at DSP time */ 8#define DEFDELVS 64 /* LATER get this from canvas at DSP time */
9#ifndef ROCKBOX
9static int delread_zero = 0; /* four bytes of zero for delread~, vd~ */ 10static int delread_zero = 0; /* four bytes of zero for delread~, vd~ */
11#endif
10 12
11static t_class *sigvd_class; 13static t_class *sigvd_class;
12 14
@@ -37,14 +39,18 @@ static t_int *sigvd_perform(t_int *w)
37 t_sample *in = (t_sample *)(w[1]); 39 t_sample *in = (t_sample *)(w[1]);
38 t_sample *out = (t_sample *)(w[2]); 40 t_sample *out = (t_sample *)(w[2]);
39 t_delwritectl *ctl = (t_delwritectl *)(w[3]); 41 t_delwritectl *ctl = (t_delwritectl *)(w[3]);
42#ifndef ROCKBOX
40 t_sigvd *x = (t_sigvd *)(w[4]); 43 t_sigvd *x = (t_sigvd *)(w[4]);
44#endif
41 int n = (int)(w[5]); 45 int n = (int)(w[5]);
42 46
43 int nsamps = ctl->c_n; 47 int nsamps = ctl->c_n;
44 int fn = n; 48 int fn = n;
45 t_sample limit = nsamps - n - 1; 49 t_sample limit = nsamps - n - 1;
46 t_sample *vp = ctl->c_vec, *bp, *wp = vp + ctl->c_phase; 50 t_sample *vp = ctl->c_vec, *bp, *wp = vp + ctl->c_phase;
51#ifndef ROCKBOX
47 t_sample zerodel = x->x_zerodel; 52 t_sample zerodel = x->x_zerodel;
53#endif
48 while (n--) 54 while (n--)
49 { 55 {
50 t_time delsamps = ((long long) mult((*in++),ftofix(44.1)));//- itofix(zerodel); 56 t_time delsamps = ((long long) mult((*in++),ftofix(44.1)));//- itofix(zerodel);