blob: ff8df82e27bf6a9dfad7efb57121a2cd641fdf17 (
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
|
#N canvas 80 56 700 405 12;
#X obj 17 17 widget popup p #items [.- config] -width 20;
#X obj 20 130 tow . popup p;
#X floatatom 20 71 5 0 0 0 - - -;
#X obj 437 287 tow . popup q;
#X obj 271 17 widget popup q -width 40;
#X obj 20 208 t 0 0;
#X obj 150 130 r rdefault;
#X msg 55 249 list rdefault \$1 3;
#X msg 20 287 list rcurrent \$1 4;
#X msg 89 71 tot pd [concat \$1 set [lindex [.- config [lindex [lindex
[.- config] \$2] 0]] \$3] .`.:];
#X obj 20 170 - 1;
#X obj 331 130 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
1;
#X obj 405 130 r rcurrent;
#X msg 150 170;
#X msg 405 170;
#X obj 225 213 route set;
#X obj 331 249 random 20;
#X msg 437 249 tot .-.pop add separator;
#X msg 225 330 tot .-.pop add command -label \$1 .: set [.- cget -textvariable]
\$1;
#X obj 490 208 sel 1;
#X obj 331 170 t 0 0;
#X obj 331 208 metro 500;
#X obj 225 249 route float;
#X obj 308 287 symbol;
#X connect 1 0 10 0;
#X connect 2 0 1 0;
#X connect 5 0 8 0;
#X connect 5 1 7 0;
#X connect 6 0 13 0;
#X connect 7 0 9 0;
#X connect 8 0 9 0;
#X connect 9 0 1 0;
#X connect 10 0 5 0;
#X connect 11 0 20 0;
#X connect 12 0 14 0;
#X connect 12 0 15 0;
#X connect 15 0 22 0;
#X connect 16 0 8 0;
#X connect 17 0 3 0;
#X connect 18 0 3 0;
#X connect 19 0 17 0;
#X connect 20 0 21 0;
#X connect 20 1 19 0;
#X connect 21 0 16 0;
#X connect 22 0 18 0;
#X connect 22 1 23 0;
#X connect 23 0 18 0;
|
