aboutsummaryrefslogtreecommitdiff
path: root/pd/segment.pd
blob: fdf5ccf471b21403c9632950acdb6159db5fe8ec (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
#N canvas 328 208 857 557 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 475 224 1;
#X obj 360 311 trigger list list;
#X obj 274 178 +;
#X msg 273 157 1;
#X msg 304 157 0;
#X obj 273 135 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 178 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 273 114 trigger float bang;
#X obj 484 250 /;
#X obj 508 224 expr $f2 - $f1 + 1;
#X obj 274 198 trigger float float float bang float;
#X obj 575 75 float_argument \$1;
#X msg 299 45 bang;
#X connect 2 0 5 0;
#X connect 3 0 2 1;
#X connect 4 0 27 0;
#X connect 5 0 23 0;
#X connect 5 1 24 0;
#X connect 6 0 22 0;
#X connect 6 0 29 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 26 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 9 0;
#X connect 26 1 8 0;
#X connect 27 0 3 1;
#X connect 28 0 27 1;
#X connect 29 0 25 0;
#X connect 29 1 12 0;
#X connect 29 2 3 0;
#X connect 29 3 4 0;
#X connect 29 4 28 0;
#X connect 30 0 26 0;
#X connect 30 0 28 1;
#X connect 31 0 13 0;