blob: 7d29676237b86749d947f583573f88a5fc92dfda (
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
|
#N canvas 60 0 784 503 10;
#X obj 33 154 inlet;
#X obj 108 154 inlet;
#X obj 33 358 outlet;
#X text 345 160 part of iemmatrix.;
#X text 348 215 see also:;
#X obj 431 213 mtx;
#X text 105 56 mtx_tab behaves just like a "mtx" object that stores
its internal matrix in a table. So this matrix can be seen as a local/global
variable of the workspace.;
#X text 349 282 Franz Zotter 2006;
#X text 347 250 requires zexy's [tabdump];
#X text 105 6 [mtx_tab];
#N canvas 0 0 657 677 mtx_tab 1;
#X obj 33 34 inlet;
#X obj 287 86 inlet;
#X obj 287 624 s \$1;
#X obj 287 601 list prepend 0;
#X obj 287 506 t a a;
#X obj 412 561 *;
#X msg 412 600 resize \$1;
#X obj 33 438 outlet;
#X obj 156 343 mtx;
#X obj 156 75 t a b;
#X obj 191 156 tabdump \$1;
#X obj 191 176 list prepend matrix;
#X obj 191 196 list trim;
#X obj 156 306 spigot;
#X msg 218 305 0;
#X msg 218 285 1;
#X obj 412 581 + 2;
#X text 329 625 send to table;
#X text 298 159 get from table;
#X obj 156 363 t b a;
#X obj 191 411 spigot;
#X msg 234 364 0;
#X msg 263 364 1;
#X obj 191 384 t a a;
#N canvas 0 0 450 300 bang 0;
#X obj 103 28 inlet;
#X obj 103 59 route bang;
#X obj 103 119 outlet;
#X obj 103 92 b;
#X connect 0 0 1 0;
#X connect 1 0 3 0;
#X connect 1 1 2 0;
#X connect 3 0 2 0;
#X restore 197 255 pd bang;
#X obj 156 217 t b b a b b;
#X text 301 485 <r> <c> ...;
#X obj 287 467 route matrix;
#X msg 412 542 \$1 \$2;
#X obj 33 94 list prepend matrix;
#X obj 33 114 list trim;
#X obj 33 75 t a a;
#X msg 201 135 set \$1;
#X obj 33 56 route matrix set;
#X obj 201 115 symbol;
#X text 170 238 if no output: send to table anyway;
#X connect 0 0 33 0;
#X connect 1 0 27 0;
#X connect 3 0 2 0;
#X connect 4 0 3 0;
#X connect 4 1 28 0;
#X connect 5 0 16 0;
#X connect 6 0 2 0;
#X connect 8 0 19 0;
#X connect 9 0 25 0;
#X connect 9 1 10 0;
#X connect 10 0 11 0;
#X connect 11 0 12 0;
#X connect 12 0 8 1;
#X connect 13 0 8 0;
#X connect 14 0 13 1;
#X connect 15 0 13 1;
#X connect 16 0 6 0;
#X connect 19 0 14 0;
#X connect 19 1 23 0;
#X connect 20 0 7 0;
#X connect 21 0 20 1;
#X connect 22 0 20 1;
#X connect 23 0 20 0;
#X connect 23 1 27 0;
#X connect 24 0 8 0;
#X connect 25 0 13 0;
#X connect 25 1 21 0;
#X connect 25 2 24 0;
#X connect 25 3 15 0;
#X connect 25 4 22 0;
#X connect 27 0 4 0;
#X connect 28 0 5 0;
#X connect 29 0 30 0;
#X connect 30 0 7 0;
#X connect 31 0 29 0;
#X connect 31 1 4 0;
#X connect 32 0 10 0;
#X connect 33 0 31 0;
#X connect 33 1 34 0;
#X connect 33 2 9 0;
#X connect 34 0 32 0;
#X restore 33 327 pd mtx_tab;
#X text 105 38 arguments: \$1 ... table name;
#X connect 0 0 10 0;
#X connect 1 0 10 1;
#X connect 10 0 2 0;
|