-
Notifications
You must be signed in to change notification settings - Fork 0
/
bop.marimba.pd
150 lines (150 loc) · 3.86 KB
/
bop.marimba.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
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
#N canvas 0 23 1680 1005 10;
#X obj 100 120 cnv 15 210 20 empty empty empty 7 7 0 14 #94c4ec #fcfcfc
0;
#X obj 90 270 cnv 15 210 40 empty empty empty 7 7 0 14 #fcf4e0 #fcfcfc
0;
#X obj 700 100 inlet~ left;
#X obj 900 100 inlet~ right;
#X obj 1000 100 inlet note;
#X obj 1100 100 inlet ctl;
#X obj 700 250 outlet~ left;
#X obj 900 250 outlet~ right;
#X obj 1020 200 outlet note;
#X obj 1100 200 outlet ctl;
#X obj 1000 640 pack 0 0 0;
#X obj 1000 670 route 1 2 3 4, f 69;
#X obj 1000 810 *~ 0.5;
#X obj 1000 720 unpack;
#X obj 1000 750 mtof;
#X obj 1120 810 *~ 0.5;
#X obj 1120 720 unpack;
#X obj 1120 750 mtof;
#X obj 1240 810 *~ 0.5;
#X obj 1240 720 unpack;
#X obj 1240 750 mtof;
#X obj 1360 810 *~ 0.5;
#X obj 1360 720 unpack;
#X obj 1360 750 mtof;
#X obj 780 100 catch~ marimba-\$0;
#X obj 1000 850 throw~ marimba-\$0;
#X obj 1120 850 throw~ marimba-\$0;
#X obj 1240 850 throw~ marimba-\$0;
#X obj 1360 850 throw~ marimba-\$0;
#X obj 780 130 hip~ 5;
#X obj 780 160 clip~ -1 1;
#X obj 700 220 +~;
#X obj 900 210 +~;
#X obj 100 30 cnv 15 210 20 empty empty bop.marimba 7 7 0 14 #94c4ec
#fcfcfc 0;
#X obj 1000 600 poly 4 1;
#X obj 1040 530 sel 0;
#X obj 1000 570 cyclone/flush;
#X obj 110 130 tgl 15 1 from-pedal-\$0 to-pedal-\$0 pedal 20 5 0 10
#fcfcfc #000000 #000000 0 1;
#X obj 400 230 savestate, f 11;
#X text 490 230 👈 bangs when parent is saved;
#X obj 400 150 f;
#X obj 460 260 s save-state-\$0;
#X obj 400 190 pack f;
#X obj 400 260 unpack f;
#X obj 400 100 r save-state-\$0;
#N canvas 0 22 450 300 sustain 0;
#X obj 50 170 stripnote;
#X obj 50 190 pack;
#X obj 100 80 + 1;
#X obj 100 30 inlet;
#X obj 50 30 inlet;
#X obj 10 250 outlet;
#X obj 10 130 cyclone/gate 2;
#X connect 0 0 1 0;
#X connect 0 1 1 1;
#X connect 1 0 5 0;
#X connect 2 0 6 0;
#X connect 3 0 2 0;
#X connect 4 0 6 1;
#X connect 6 0 5 0;
#X connect 6 1 0 0;
#X restore 1000 340 pd sustain;
#X obj 410 120 r from-pedal-\$0;
#X obj 400 300 s to-pedal-\$0;
#X obj 1060 300 r from-pedal-\$0;
#X obj 1120 140 route pedal;
#X obj 1120 170 s to-pedal-\$0;
#X obj 1000 780 sub.bop.marimba~;
#X obj 1120 780 sub.bop.marimba~;
#X obj 1240 780 sub.bop.marimba~;
#X obj 1360 780 sub.bop.marimba~;
#X obj 395 388 loadbang;
#X obj 395 478 s \$0-scope-id;
#X obj 395 418 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc
#000000 #000000;
#X obj 395 448 iemguts/canvasdollarzero 1;
#X text 420 417 get \$0 of parent patch to localise messaging;
#X obj 393 502 r \$0-scope-id;
#X obj 395 538 print scope-id;
#X obj 1040 400 r bop-time;
#X obj 1040 465 route;
#X obj 1070 430 r \$0-scope-id;
#X obj 1040 490 route play;
#X connect 2 0 31 0;
#X connect 3 0 32 1;
#X connect 4 0 8 0;
#X connect 4 0 45 0;
#X connect 5 0 9 0;
#X connect 5 0 49 0;
#X connect 10 0 11 0;
#X connect 11 0 13 0;
#X connect 11 1 16 0;
#X connect 11 2 19 0;
#X connect 11 3 22 0;
#X connect 12 0 25 0;
#X connect 13 0 14 0;
#X connect 13 1 51 1;
#X connect 14 0 51 0;
#X connect 15 0 26 0;
#X connect 16 0 17 0;
#X connect 16 1 52 1;
#X connect 17 0 52 0;
#X connect 18 0 27 0;
#X connect 19 0 20 0;
#X connect 19 1 53 1;
#X connect 20 0 53 0;
#X connect 21 0 28 0;
#X connect 22 0 23 0;
#X connect 22 1 54 1;
#X connect 23 0 54 0;
#X connect 24 0 29 0;
#X connect 29 0 30 0;
#X connect 30 0 32 0;
#X connect 30 0 31 1;
#X connect 31 0 6 0;
#X connect 32 0 7 0;
#X connect 34 0 10 0;
#X connect 34 1 10 1;
#X connect 34 2 10 2;
#X connect 35 0 36 0;
#X connect 36 0 34 0;
#X connect 36 1 34 1;
#X connect 38 0 43 0;
#X connect 38 1 41 0;
#X connect 40 0 42 0;
#X connect 42 0 38 0;
#X connect 43 0 47 0;
#X connect 44 0 40 0;
#X connect 45 0 36 0;
#X connect 46 0 40 1;
#X connect 48 0 45 1;
#X connect 49 0 50 0;
#X connect 51 0 12 0;
#X connect 52 0 15 0;
#X connect 53 0 18 0;
#X connect 54 0 21 0;
#X connect 55 0 57 0;
#X connect 57 0 58 0;
#X connect 58 0 56 0;
#X connect 60 0 61 0;
#X connect 62 0 63 0;
#X connect 63 0 65 0;
#X connect 64 0 63 1;
#X connect 65 0 35 0;
#X coords 0 -1 1 1 210 60 1 100 100;