-
Notifications
You must be signed in to change notification settings - Fork 4
/
zupfr.pd
134 lines (134 loc) · 3.5 KB
/
zupfr.pd
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
#N canvas 585 170 384 538 10;
#N canvas 624 75 373 157 NETPD 0;
#N canvas 954 301 298 107 abslist 0;
#X msg 8 -8 zupf;
#X msg 8 15 unstep;
#X msg 8 40 i2mx;
#X restore 12 33 pd abslist;
#X msg 12 8 version 0 1 1;
#X restore 10 14 pd NETPD 2 0;
#X obj 10 40 netpd_head \$1 zupfr;
#N canvas 69 513 244 177 \$1-zupfr 0;
#X obj 42 103 hsl 128 15 0 1 0 0 \$1-pluckpos \$1-pluckpos pluckpos 2 8 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 41 68 hsl 128 15 0 1 0 0 \$1-damp \$1-damp damp 2 8 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 42 33 hsl 128 15 0 1 0 0 \$1-magnitude \$1-magnitude magnitude 2 8 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 40 131 tgl 15 0 \$1-phase \$1-phase phase 17 7 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 116 130 bng 15 250 50 0 \$0.unstep \$0.bli unstep 17 7 0 10 #fcfcfc #000000 #000000;
#X restore 10 66 pd \$1-zupfr;
#X obj 10 147 unstep \$1 zupfr magnitude damp pluckpos;
#X obj 10 101 r \$0.unstep;
#X msg 10 123 vis 1;
#N canvas 144 121 440 470 dsp 0;
#X obj 25 36 route note;
#X obj 25 77 t a b;
#X obj 52 100 f;
#X obj 52 122 mod 6;
#X obj 52 144 t a a;
#X obj 99 120 + 1;
#X obj 25 173 list prepend;
#X obj 25 201 route 0 1 2 3 4 5;
#X obj 25 14 inlet;
#X obj 25 417 outlet~;
#X obj 166 419 outlet~;
#X obj 274 419 outlet;
#X obj 25 284 zupf;
#X msg 25 243 note \$1;
#X obj 82 61 s \$0.params;
#X obj 37 263 r \$0.params;
#X obj 145 284 zupf;
#X msg 145 243 note \$1;
#X obj 157 263 r \$0.params;
#X obj 265 284 zupf;
#X msg 265 243 note \$1;
#X obj 277 263 r \$0.params;
#X obj 65 354 zupf;
#X msg 65 313 note \$1;
#X obj 77 333 r \$0.params;
#X obj 185 355 zupf;
#X msg 185 313 note \$1;
#X obj 197 333 r \$0.params;
#X obj 305 354 zupf;
#X msg 305 313 note \$1;
#X obj 317 333 r \$0.params;
#X connect 0 0 1 0;
#X connect 0 1 14 0;
#X connect 1 0 6 0;
#X connect 1 1 2 0;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 4 0 6 1;
#X connect 4 1 5 0;
#X connect 5 0 2 1;
#X connect 6 0 7 0;
#X connect 7 0 13 0;
#X connect 7 1 23 0;
#X connect 7 2 17 0;
#X connect 7 3 26 0;
#X connect 7 4 20 0;
#X connect 7 5 29 0;
#X connect 8 0 0 0;
#X connect 12 0 9 0;
#X connect 12 1 10 0;
#X connect 13 0 12 0;
#X connect 15 0 12 0;
#X connect 16 0 9 0;
#X connect 16 1 10 0;
#X connect 17 0 16 0;
#X connect 18 0 16 0;
#X connect 19 0 9 0;
#X connect 19 1 10 0;
#X connect 20 0 19 0;
#X connect 21 0 19 0;
#X connect 22 0 9 0;
#X connect 22 1 10 0;
#X connect 23 0 22 0;
#X connect 24 0 22 0;
#X connect 25 0 9 0;
#X connect 25 1 10 0;
#X connect 26 0 25 0;
#X connect 27 0 25 0;
#X connect 28 0 9 0;
#X connect 28 1 10 0;
#X connect 29 0 28 0;
#X connect 30 0 28 0;
#X restore 10 407 pd dsp;
#X obj 11 480 i2mx \$1 zupfr;
#X obj 10 169 route note magnitude damp pluckpos;
#X obj 89 291 netpd_f \$1 magnitude 1;
#X obj 142 241 netpd_f \$1 damp 0.2;
#X obj 192 192 netpd_f \$1 pluckpos 1;
#X obj 60 292 +;
#X obj 110 241 +;
#X msg 60 314 magnitude \$1;
#X msg 110 263 damp \$1;
#X obj 160 192 +;
#X msg 160 214 pluckpos \$1;
#X msg 10 220 note \$1;
#X obj 78 345 netpd_f \$1 phase 0;
#X msg 78 367 phase \$1;
#X obj 11 441 hip~ 20;
#X obj 63 441 hip~ 20;
#X connect 3 0 8 0;
#X connect 4 0 5 0;
#X connect 5 0 3 0;
#X connect 6 0 21 0;
#X connect 6 1 22 0;
#X connect 6 2 7 2;
#X connect 8 0 18 0;
#X connect 8 1 12 0;
#X connect 8 2 13 0;
#X connect 8 3 16 0;
#X connect 9 0 12 1;
#X connect 10 0 13 1;
#X connect 11 0 16 1;
#X connect 12 0 14 0;
#X connect 13 0 15 0;
#X connect 14 0 6 0;
#X connect 15 0 6 0;
#X connect 16 0 17 0;
#X connect 17 0 6 0;
#X connect 18 0 6 0;
#X connect 19 0 20 0;
#X connect 20 0 6 0;
#X connect 21 0 7 0;
#X connect 22 0 7 1;