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
|
#N canvas 371 23 450 300 10;
#X declare -lib pdlua;
#X obj 102 201 ltabdump \$0-tab-A;
#X obj 102 241 print ltabdump;
#X floatatom 218 242 5 0 0 0 - - - 0;
#X obj 11 34 table \$0-tab-B 8;
#X obj 11 14 table \$0-tab-A 4;
#N canvas 18 116 450 300 \$0-fill-tables 0;
#X obj 27 37 inlet;
#X obj 27 61 t b b;
#X obj 220 134 until;
#X obj 220 177 random 16;
#X obj 220 155 t b b;
#X obj 219 205 tabwrite \$0-tab-B;
#X obj 311 166 f 0;
#X obj 350 151 + 1;
#X obj 350 174 mod 8;
#X msg 223 112 8;
#X obj 30 134 until;
#X obj 30 177 random 16;
#X obj 30 155 t b b;
#X obj 121 166 f 0;
#X obj 160 151 + 1;
#X msg 33 112 4;
#X obj 160 174 mod 4;
#X obj 29 205 tabwrite \$0-tab-A;
#X connect 0 0 1 0;
#X connect 1 0 15 0;
#X connect 1 1 9 0;
#X connect 2 0 4 0;
#X connect 3 0 5 0;
#X connect 4 0 3 0;
#X connect 4 1 6 0;
#X connect 6 0 7 0;
#X connect 6 0 5 1;
#X connect 7 0 8 0;
#X connect 8 0 6 1;
#X connect 9 0 2 0;
#X connect 10 0 12 0;
#X connect 11 0 17 0;
#X connect 12 0 11 0;
#X connect 12 1 13 0;
#X connect 13 0 14 0;
#X connect 13 0 17 1;
#X connect 14 0 16 0;
#X connect 15 0 10 0;
#X connect 16 0 13 1;
#X restore 171 39 pd \$0-fill-tables;
#X obj 171 12 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000;
#X obj 193 14 loadbang;
#X obj 102 82 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000;
#X obj 132 99 symbol \$0-tab-A;
#X obj 132 179 symbol \$0-tab-C;
#X obj 132 161 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000;
#X obj 132 121 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000;
#X obj 132 81 bng 15 250 50 0 empty empty empty 17 7 0 10 #fcfcfc #000000 #000000;
#X obj 132 139 symbol \$0-tab-B;
#X obj 294 81 declare -lib pdlua;
#X connect 0 0 1 0;
#X connect 0 1 2 0;
#X connect 6 0 5 0;
#X connect 7 0 5 0;
#X connect 8 0 0 0;
#X connect 9 0 0 0;
#X connect 10 0 0 0;
#X connect 11 0 10 0;
#X connect 12 0 14 0;
#X connect 13 0 9 0;
#X connect 14 0 0 0;
|
