aboutsummaryrefslogtreecommitdiff
path: root/ds-bng.pd
blob: 5a82d04302ba5f70f0dd7cc2aec8b4bf14daa48d (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
#N struct 1010-ds-bng float button float bg;
#N canvas 13 177 967 416 12;
#N canvas 0 85 1004 682 \$0-ds-bng 1;
#X obj 107 64 outlet;
#X obj 169 106 filledpolygon bg bg 1 0 0 13 0 13 13 0 13;
#X obj 107 39 struct \$0-ds-bng float button float bg;
#X obj 169 136 filledcurve button 0 1 0 0 13 0 13 13 0 13;
#X connect 2 0 0 0;
#X restore 296 97 pd \$0-ds-bng;
#X obj 609 273 pointer;
#X obj 296 122 route click;
#X obj 122 225 b;
#X obj 122 269 del 250;
#X obj 296 248 outlet;
#X obj 122 97 inlet;
#X obj 296 152 b;
#X obj 404 331 s \$0-p;
#X msg 404 248 999;
#X msg 506 248 999;
#N canvas 0 0 450 300 color 1;
#X obj 16 7 inlet;
#X obj 213 145 r \$0-p;
#X obj 53 62 unpack f f f;
#X obj 16 32 t b a;
#X obj 5 62 t b b;
#X obj 32 175 set \$0-ds-bng bg button;
#X obj 99 137 v \$0-f;
#X obj 146 111 v \$0-b;
#X obj 32 147 f;
#X connect 0 0 3 0;
#X connect 1 0 5 2;
#X connect 2 0 8 1;
#X connect 2 1 6 0;
#X connect 2 2 7 0;
#X connect 3 0 4 0;
#X connect 3 1 2 0;
#X connect 4 0 8 0;
#X connect 4 1 6 0;
#X connect 4 1 7 0;
#X connect 7 0 5 1;
#X connect 8 0 5 0;
#X restore 214 152 pd color;
#X obj 404 306 append \$0-ds-bng bg button;
#X obj 188 326 set \$0-ds-bng button;
#N canvas 0 86 1004 682 \$0-gop 0;
#X scalar 1010-ds-bng 999 999 \;;
#X coords 0 0 13 13 13 13 1;
#X restore 1 1 pd \$0-gop;
#N canvas 0 0 1004 682 gop-init 0;
#X obj 60 546 list prepend pd- \$0 -gop;
#X obj 60 8 inlet;
#X obj 60 111 symbol \$1-f;
#X obj 168 111 makefilename $%d-f;
#X obj 60 150 sel char;
#X obj 438 111 makefilename $%d-f;
#X obj 330 150 sel char;
#X obj 60 255 +;
#X obj 60 175 0;
#X obj 121 200 1;
#X obj 330 175 0;
#X obj 391 201 1;
#X obj 60 280 sel 0 1;
#X obj 438 83 2;
#X obj 168 85 1;
#X obj 60 38 t b b b b;
#X obj 172 400 \$1;
#X obj 209 400 \$2;
#X obj 172 370 t b b;
#X obj 227 425 max 8;
#X obj 172 427 max 8;
#X obj 86 344 \$1;
#X obj 172 509 pack f f f f;
#X obj 265 456 + 2;
#X obj 172 452 t a a;
#X obj 234 479 + 2;
#X obj 86 373 t a a a;
#X obj 391 175 b;
#X obj 121 174 b;
#X obj 330 111 symbol \$2-f;
#X obj 139 401 + 2;
#X msg 60 582 \; \$1\$2\$3 clear \; \$1\$2\$3 donecanvasdialog 1 -1
2 0 0 13 13 \$4 \$5 0 0 \; \$2-ds-bng-abs donecanvasdialog 1 -1 2 0
0 14 14 \$6 \$7;
#X msg 60 314 13 13 15 15;
#X text 591 111 check for creation arguments;
#X text 121 342 copy x-coord if there is only one creation argument
;
#X text 161 314 default size;
#X connect 0 0 31 0;
#X connect 1 0 15 0;
#X connect 2 0 4 0;
#X connect 3 0 4 1;
#X connect 4 0 8 0;
#X connect 4 1 28 0;
#X connect 5 0 6 1;
#X connect 6 0 10 0;
#X connect 6 1 27 0;
#X connect 7 0 12 0;
#X connect 8 0 7 0;
#X connect 9 0 7 0;
#X connect 10 0 7 1;
#X connect 11 0 7 1;
#X connect 12 0 32 0;
#X connect 12 1 21 0;
#X connect 12 2 18 0;
#X connect 13 0 5 0;
#X connect 14 0 3 0;
#X connect 15 0 2 0;
#X connect 15 1 14 0;
#X connect 15 2 29 0;
#X connect 15 3 13 0;
#X connect 16 0 20 0;
#X connect 17 0 19 0;
#X connect 18 0 16 0;
#X connect 18 1 17 0;
#X connect 19 0 23 0;
#X connect 19 0 22 1;
#X connect 20 0 24 0;
#X connect 21 0 26 0;
#X connect 22 0 0 0;
#X connect 23 0 22 3;
#X connect 24 0 22 0;
#X connect 24 1 25 0;
#X connect 25 0 22 2;
#X connect 26 0 22 0;
#X connect 26 1 22 1;
#X connect 26 2 30 0;
#X connect 27 0 11 0;
#X connect 28 0 9 0;
#X connect 29 0 6 0;
#X connect 30 0 22 3;
#X connect 30 0 22 2;
#X connect 32 0 0 0;
#X restore 609 193 pd gop-init;
#X obj 609 223 list prepend pd- \$0 -gop;
#X msg 609 248 traverse \$1\$2\$3 \, bang;
#X obj 404 70 namecanvas \$0-ds-bng-abs;
#X obj 404 121 t b b b b;
#X obj 404 97 loadbang;
#X obj 188 269 v \$0-f;
#X obj 122 294 v \$0-b;
#X obj 513 278 v \$0-b;
#X text 607 70 2009 Jonathan Wilkes;
#X obj 122 122 route set hold color;
#X connect 0 0 2 0;
#X connect 1 0 12 2;
#X connect 2 0 7 0;
#X connect 3 0 4 0;
#X connect 3 0 21 0;
#X connect 4 0 22 0;
#X connect 6 0 25 0;
#X connect 7 0 3 0;
#X connect 7 0 5 0;
#X connect 9 0 12 0;
#X connect 10 0 12 1;
#X connect 10 0 23 0;
#X connect 12 0 8 0;
#X connect 12 0 13 1;
#X connect 16 0 17 0;
#X connect 17 0 1 0;
#X connect 19 0 9 0;
#X connect 19 1 10 0;
#X connect 19 2 16 0;
#X connect 19 3 15 0;
#X connect 20 0 19 0;
#X connect 21 0 13 0;
#X connect 22 0 13 0;
#X connect 25 0 3 0;
#X connect 25 1 4 1;
#X connect 25 2 11 0;
#X connect 25 3 7 0;
#X coords 0 0 14 14 15 15 2 0 0;