blob: d6bbe2622d6293e9b6e9700c3d0e1fc6deb068e3 (
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
|
#N canvas 238 57 825 641 10;
#X obj 70 203 dac~;
#X obj 71 141 osc~;
#X obj 71 103 mtof;
#X obj 71 122 t f b;
#X obj 105 142 line~;
#X obj 70 160 *~;
#X obj 74 86 hsl 128 15 0 127 0 0 empty empty empty -2 -6 0 8 -262144
-1 -1 6700 1;
#X obj 70 179 *~ 0.1;
#X obj 33 6 key;
#X obj 409 139 messageprepend set;
#X obj 497 110 t l;
#X msg 409 89 list \$1;
#X obj 409 109 listprepend;
#X msg 481 84 list;
#X obj 97 7 loadbang;
#X obj 34 29 listfind;
#X obj 34 48 sel -1;
#X obj 71 67 + 60;
#X msg 114 28 list 113 50 119 51 101 114 53 116 54 121 55 117 105 57
111 48 112 91 61 93 127;
#X obj 409 69 key;
#X msg 111 123 0.7 \, 0 400;
#X floatatom 105 68 5 0 0 0 - - -;
#X msg 200 180 list \$1;
#X obj 275 199 listsublist 0 2;
#X obj 200 199 listappend;
#X obj 483 388 display;
#X msg 270 264 1;
#X msg 305 240 put_at ( \$2 \$1 );
#X obj 166 319 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 75 309 f;
#X obj 39 410 #store;
#X obj 97 393 #fold +;
#X obj 96 417 display;
#X obj 275 219 t l l l;
#X msg 184 279 bang;
#X obj 8 387 #finished;
#X floatatom 99 311 5 0 0 0 - - -;
#X obj 90 288 t f;
#X obj 17 262 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
;
#X msg 192 299 list \$1;
#X obj 46 366 t a a;
#X obj 39 502 #scan +;
#X obj 200 157 spigot;
#X obj 82 440 # rand;
#X obj 80 472 display;
#X obj 38 546 # <;
#X obj 50 595 #fold +;
#X obj 280 512 display;
#X obj 132 596 #export;
#X obj 248 157 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
1;
#X obj 104 329 + 60;
#X obj 148 368 spigot;
#X obj 199 367 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
1;
#X obj 17 286 metro 100;
#X obj 50 617 display;
#X obj 67 568 display;
#X obj 90 537 display;
#X obj 191 322 #store (17 17 #) \, op +;
#X text 536 12 This will be an example of Markov Chains;
#X text 536 27 But it's not too clean yet;
#X connect 1 0 5 0;
#X connect 2 0 3 0;
#X connect 3 0 1 0;
#X connect 3 1 20 0;
#X connect 4 0 5 1;
#X connect 5 0 7 0;
#X connect 6 0 2 0;
#X connect 7 0 0 0;
#X connect 7 0 0 1;
#X connect 8 0 15 0;
#X connect 10 0 12 1;
#X connect 11 0 12 0;
#X connect 12 0 10 0;
#X connect 12 0 9 0;
#X connect 13 0 12 1;
#X connect 14 0 18 0;
#X connect 15 0 16 0;
#X connect 16 1 17 0;
#X connect 16 1 42 0;
#X connect 17 0 6 0;
#X connect 17 0 21 0;
#X connect 18 0 15 1;
#X connect 19 0 11 0;
#X connect 20 0 4 0;
#X connect 22 0 24 0;
#X connect 23 0 24 1;
#X connect 23 0 33 0;
#X connect 24 0 23 0;
#X connect 26 0 57 1;
#X connect 27 0 57 1;
#X connect 28 0 57 0;
#X connect 29 0 39 0;
#X connect 30 0 41 0;
#X connect 30 0 47 0;
#X connect 31 0 32 0;
#X connect 31 0 43 0;
#X connect 33 0 34 0;
#X connect 33 1 26 0;
#X connect 33 2 27 0;
#X connect 34 0 57 0;
#X connect 35 0 30 0;
#X connect 36 0 50 0;
#X connect 37 0 29 1;
#X connect 37 0 36 0;
#X connect 38 0 53 0;
#X connect 39 0 57 0;
#X connect 40 0 35 0;
#X connect 40 1 30 1;
#X connect 40 1 31 0;
#X connect 41 0 45 0;
#X connect 41 0 56 0;
#X connect 42 0 22 0;
#X connect 43 0 44 0;
#X connect 43 0 45 1;
#X connect 45 0 46 0;
#X connect 45 0 55 0;
#X connect 46 0 48 0;
#X connect 46 0 54 0;
#X connect 48 0 37 0;
#X connect 49 0 42 1;
#X connect 50 0 6 0;
#X connect 51 0 40 0;
#X connect 52 0 51 1;
#X connect 53 0 29 0;
#X connect 57 0 25 0;
#X connect 57 0 51 0;
|
