-
Notifications
You must be signed in to change notification settings - Fork 0
/
vibrato~.pd
executable file
·123 lines (123 loc) · 3.54 KB
/
vibrato~.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
#N canvas 139 48 597 571 10;
#X obj 180 27 loadbang;
#X msg 180 74 0.5;
#X obj 113 113 cnv 15 118 118 empty empty Vibrato(FM) 20 12 0 14 -126377
-204800 0;
#X obj 125 200 hsl 40 20 0 128 0 0 \$0-vibrato_OSC_Depth_r \$0-vibrato_OSC_Depth_s
Modulador -6 -8 0 10 -262144 -1 -1 3900 1;
#X obj 131 138 tgl 20 0 \$0-vibrato_ON/OFF_r \$0-vibrato_ON/OFF_s ON/OFF
-7 28 0 10 -262144 -1 -1 0 1.29032;
#X obj 20 22 inlet~;
#X msg 142 82 10;
#X obj 124 412 *~;
#X obj 154 412 *~;
#X obj 169 360 expr ($f1-1)*-1;
#X obj 91 454 outlet~;
#X obj 165 453 outlet~;
#X obj 180 53 delay 100;
#X obj 91 325 *~;
#X obj 106 281 \$1 20;
#X obj 106 303 line~;
#X obj 105 243 osc~ 10;
#X obj 20 45 delwrite~ \$0-FM 100;
#X obj 91 349 vd~ \$0-FM;
#N canvas 760 227 294 219 spigot~ 0;
#X obj 96 15 inlet;
#X obj 45 15 inlet~;
#X obj 86 156 outlet~;
#X obj 36 156 outlet~;
#X obj 96 84 == 0;
#X obj 45 105 *~ 0;
#X obj 81 105 *~ 0;
#X obj 105 36 loadbang;
#X msg 105 56 0;
#X text 135 56 estado inicial;
#X connect 0 0 4 0;
#X connect 0 0 5 1;
#X connect 1 0 5 0;
#X connect 1 0 6 0;
#X connect 4 0 6 1;
#X connect 5 0 2 0;
#X connect 6 0 3 0;
#X connect 7 0 8 0;
#X connect 8 0 4 0;
#X connect 8 0 5 1;
#X restore 91 375 pd spigot~;
#X obj 175 154 nbx 3 14 0.01 1 1 1 \$0-vibrato_PAN_r \$0-vibrato_PAN_s
PAN 0 -8 0 12 -191407 -204800 -204800 0.5 256;
#X obj 175 201 nbx 4 17 0.02 20 1 1 \$0-vibrato_rate_r \$0-vibrato_rate_s
Rate 10 -8 0 12 -204786 -1 -1 10 256;
#X msg 112 82 128;
#X text 89 496 Edu Meneses (2015);
#X text 78 524 Released under GNU GPL;
#X text 89 510 www.edumeneses.com;
#X text 204 218 v1.0;
#X obj 276 163 cnv 15 270 100 empty empty patch_mapping_Vibrato(FM)
20 12 0 14 -232576 -66577 0;
#N canvas 704 337 450 300 instructions 0;
#X text 156 231 Edu Meneses (2015);
#X text 145 259 Released under GNU GPL;
#X text 156 245 www.edumeneses.com;
#X text 27 23 To use this subpatch with external controllers send the
command messages to mapping_commands:;
#X text 18 82 vibrato:;
#X text 38 102 on / off: Turn the subpatch on and off (0 or 1).;
#X text 38 122 modulador: change vibrato presence (0 to 1).;
#X text 38 142 rate: change tremolo frequency (0 to 20).;
#X text 38 162 pan: control PAN (0 to 1 - L to R).;
#X restore 442 227 pd instructions;
#X obj 289 206 r mapping_commands;
#N canvas 220 122 547 297 patch_mapping_vibrato 0;
#X obj 46 64 inlet;
#X msg 46 156 1;
#X msg 89 157 0;
#X obj 46 92 route vibrato;
#X obj 121 64 inlet;
#X obj 46 130 route on off modulador pan rate;
#X msg 293 71 set vibrato;
#X obj 293 47 loadbang;
#X obj 293 98 s \$0-vibrato_patch_mapping_default;
#X obj 39 185 s \$0-vibrato_ON/OFF_s;
#X obj 155 205 s \$0-vibrato_PAN_s;
#X obj 192 233 s \$0-vibrato_rate_s;
#X obj 119 157 s \$0-vibrato_OSC_Depth_s;
#X connect 0 0 3 0;
#X connect 1 0 9 0;
#X connect 2 0 9 0;
#X connect 3 0 5 0;
#X connect 4 0 3 1;
#X connect 5 0 1 0;
#X connect 5 1 2 0;
#X connect 5 2 12 0;
#X connect 5 3 10 0;
#X connect 5 4 11 0;
#X connect 6 0 8 0;
#X connect 7 0 6 0;
#X restore 289 227 pd patch_mapping_vibrato;
#X symbolatom 430 206 15 0 0 0 - #0-vibrato_patch_mapping_default -
;
#X connect 0 0 6 0;
#X connect 0 0 22 0;
#X connect 0 0 12 0;
#X connect 1 0 20 0;
#X connect 3 0 14 0;
#X connect 4 0 19 1;
#X connect 5 0 17 0;
#X connect 6 0 21 0;
#X connect 7 0 10 0;
#X connect 8 0 11 0;
#X connect 9 0 8 1;
#X connect 12 0 1 0;
#X connect 13 0 18 0;
#X connect 14 0 15 0;
#X connect 15 0 13 1;
#X connect 16 0 13 0;
#X connect 18 0 19 0;
#X connect 19 1 8 0;
#X connect 19 1 7 0;
#X connect 20 0 9 0;
#X connect 20 0 7 1;
#X connect 21 0 16 0;
#X connect 22 0 3 0;
#X connect 29 0 30 0;
#X connect 31 0 30 1;