aboutsummaryrefslogtreecommitdiff
path: root/desegment24.pd
blob: 50b46a02ac6d8cbf1041e4eecaefffb8ce5d7c48 (plain)
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
217
218
219
220
221
222
223
224
225
226
227
228
229
#N canvas 328 208 885 585 10;
#X obj 8 28 inlet;
#X obj 6 4 namecanvas \$0-segment;
#X obj 360 290 pack float float;
#X obj 467 270 *;
#X msg 459 223 1;
#X obj 360 311 trigger list list;
#X obj 274 185 +;
#X msg 274 165 1;
#X msg 305 165 0;
#X obj 274 145 until;
#X obj 167 4 inlet;
#X obj 360 262 * 125;
#X obj 360 240 - 1;
#N canvas 407 40 498 348 clear 0;
#X obj 21 28 inlet;
#X text 72 28 do it bang;
#X obj 21 71 trigger bang bang bang bang;
#X obj 26 260 outlet;
#X text 80 259 to namecanvas [send];
#X msg 306 203 vis 1 \, editmode 1;
#X msg 153 167 cut;
#X msg 216 157 mouse 5 480 0 0 \, mouseup 2000 435 0;
#X msg 30 165 editmode 0;
#X connect 0 0 2 0;
#X connect 2 0 8 0;
#X connect 2 1 6 0;
#X connect 2 2 7 0;
#X connect 2 3 5 0;
#X connect 5 0 3 0;
#X connect 6 0 3 0;
#X connect 7 0 3 0;
#X connect 8 0 3 0;
#X restore 287 65 pd clear dynamic objects;
#X obj 320 401 send \$0-segment;
#X obj 287 84 send \$0-segment;
#X obj 167 46 trigger float bang;
#X obj 167 25 route float;
#X text -3 416 -----------------------------------------------------------
;
#X text -3 481 -----------------------------------------------------------
keep the above area clear for automatic editing;
#X text 411 416 -----------------------------------------------------------
;
#X text 412 481 -----------------------------------------------------------
;
#X obj 304 185 float;
#X msg 333 334 obj \$1 460 outlet;
#X msg 473 333 obj \$1 440 disjoin \$2;
#N canvas 0 22 567 496 connect 0;
#X obj 290 16 inlet;
#X obj 234 398 outlet;
#X obj 339 238 pack float float;
#X msg 338 262 connect \$1 0 \$2 0;
#X obj 446 218 + 1;
#X obj 289 181 trigger float float;
#X obj 289 134 * 2;
#X obj 199 239 pack float float;
#X msg 199 263 connect \$2 1 \$1 0;
#X obj 306 218 - 2;
#X text 117 119 object count;
#X obj 289 161 +;
#X obj 141 218 select 0;
#X msg 60 263 connect 0 0 \$1 0;
#X msg 60 243 32;
#X msg 61 199 set \$1;
#X obj 193 158 + 2;
#X obj 208 95 loadbang;
#X msg 208 118 30;
#X connect 0 0 6 0;
#X connect 2 0 3 0;
#X connect 3 0 1 0;
#X connect 4 0 2 1;
#X connect 5 0 2 0;
#X connect 5 0 12 0;
#X connect 5 1 4 0;
#X connect 5 1 9 0;
#X connect 6 0 11 0;
#X connect 7 0 8 0;
#X connect 8 0 1 0;
#X connect 9 0 7 1;
#X connect 11 0 5 0;
#X connect 12 0 14 0;
#X connect 12 1 7 0;
#X connect 13 0 1 0;
#X connect 14 0 13 0;
#X connect 15 0 14 0;
#X connect 16 0 12 1;
#X connect 16 0 15 0;
#X connect 17 0 18 0;
#X connect 18 0 11 1;
#X connect 18 0 16 0;
#X restore 185 290 pd connect messages;
#X obj 484 250 /;
#X obj 521 223 expr $f2 - $f1 + 1;
#X obj 274 204 trigger float float float bang float;
#X msg 299 45 bang;
#X obj 274 124 trigger float bang float;
#X obj 0 440 disjoin 0.0416667;
#X obj 0 460 outlet;
#X obj 125 440 disjoin 0.0869565;
#X obj 125 460 outlet;
#X obj 250 440 disjoin 0.136364;
#X obj 250 460 outlet;
#X obj 375 440 disjoin 0.190476;
#X obj 375 460 outlet;
#X obj 500 440 disjoin 0.25;
#X obj 500 460 outlet;
#X obj 625 440 disjoin 0.315789;
#X obj 625 460 outlet;
#X obj 750 440 disjoin 0.388889;
#X obj 750 460 outlet;
#X obj 875 440 disjoin 0.470588;
#X obj 875 460 outlet;
#X obj 1000 440 disjoin 0.5625;
#X obj 1000 460 outlet;
#X obj 1125 440 disjoin 0.666667;
#X obj 1125 460 outlet;
#X obj 1250 440 disjoin 0.785714;
#X obj 1250 460 outlet;
#X obj 1375 440 disjoin 0.923077;
#X obj 1375 460 outlet;
#X obj 1500 440 disjoin 1.08333;
#X obj 1500 460 outlet;
#X obj 1625 440 disjoin 1.27273;
#X obj 1625 460 outlet;
#X obj 1750 440 disjoin 1.5;
#X obj 1750 460 outlet;
#X obj 1875 440 disjoin 1.77778;
#X obj 1875 460 outlet;
#X obj 2000 440 disjoin 2.125;
#X obj 2000 460 outlet;
#X obj 2125 440 disjoin 2.57143;
#X obj 2125 460 outlet;
#X obj 2250 440 disjoin 3.16667;
#X obj 2250 460 outlet;
#X obj 2375 440 disjoin 4;
#X obj 2375 460 outlet;
#X obj 2500 440 disjoin 5.25;
#X obj 2500 460 outlet;
#X obj 2625 440 disjoin 7.33333;
#X obj 2625 460 outlet;
#X obj 2750 440 disjoin 11.5;
#X obj 2750 460 outlet;
#X obj 2875 440 disjoin 24;
#X obj 2875 460 outlet;
#X obj 84 82 purepd/float_argument \$1;
#X connect 0 0 31 0;
#X connect 2 0 5 0;
#X connect 3 0 2 1;
#X connect 4 0 26 0;
#X connect 5 0 23 0;
#X connect 5 1 24 0;
#X connect 6 0 22 0;
#X connect 6 0 28 0;
#X connect 7 0 6 0;
#X connect 8 0 22 0;
#X connect 9 0 7 0;
#X connect 10 0 17 0;
#X connect 11 0 2 0;
#X connect 12 0 11 0;
#X connect 13 0 15 0;
#X connect 16 0 30 0;
#X connect 16 1 13 0;
#X connect 17 0 16 0;
#X connect 22 0 6 1;
#X connect 23 0 14 0;
#X connect 24 0 14 0;
#X connect 25 0 14 0;
#X connect 26 0 3 1;
#X connect 27 0 26 1;
#X connect 28 0 25 0;
#X connect 28 1 12 0;
#X connect 28 2 3 0;
#X connect 28 3 4 0;
#X connect 28 4 27 0;
#X connect 29 0 13 0;
#X connect 29 0 8 0;
#X connect 30 0 9 0;
#X connect 30 1 8 0;
#X connect 30 2 27 1;
#X connect 31 0 32 0;
#X connect 31 1 33 0;
#X connect 33 0 34 0;
#X connect 33 1 35 0;
#X connect 35 0 36 0;
#X connect 35 1 37 0;
#X connect 37 0 38 0;
#X connect 37 1 39 0;
#X connect 39 0 40 0;
#X connect 39 1 41 0;
#X connect 41 0 42 0;
#X connect 41 1 43 0;
#X connect 43 0 44 0;
#X connect 43 1 45 0;
#X connect 45 0 46 0;
#X connect 45 1 47 0;
#X connect 47 0 48 0;
#X connect 47 1 49 0;
#X connect 49 0 50 0;
#X connect 49 1 51 0;
#X connect 51 0 52 0;
#X connect 51 1 53 0;
#X connect 53 0 54 0;
#X connect 53 1 55 0;
#X connect 55 0 56 0;
#X connect 55 1 57 0;
#X connect 57 0 58 0;
#X connect 57 1 59 0;
#X connect 59 0 60 0;
#X connect 59 1 61 0;
#X connect 61 0 62 0;
#X connect 61 1 63 0;
#X connect 63 0 64 0;
#X connect 63 1 65 0;
#X connect 65 0 66 0;
#X connect 65 1 67 0;
#X connect 67 0 68 0;
#X connect 67 1 69 0;
#X connect 69 0 70 0;
#X connect 69 1 71 0;
#X connect 71 0 72 0;
#X connect 71 1 73 0;
#X connect 73 0 74 0;
#X connect 73 1 75 0;
#X connect 75 0 76 0;
#X connect 75 1 77 0;
#X connect 77 0 78 0;
#X connect 79 0 30 0;