-
Notifications
You must be signed in to change notification settings - Fork 0
/
snapshot_xyz.pd
211 lines (211 loc) · 5.29 KB
/
snapshot_xyz.pd
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
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
#N canvas 253 857 640 186 12;
#X declare -lib iemmatrix;
#X obj 105 150 outlet size;
#X obj -112 10 inlet xyz;
#X text 97 61 1 = record;
#X text 97 75 0 = spit;
#X text 97 89 clear;
#X obj 13 150 outlet end;
#N canvas 0 22 288 401 write_xyz 0;
#X obj -56 16 inlet spit_xyz;
#X obj -56 356 outlet spit_xyz;
#N canvas 417 116 225 168 write_x 0;
#X obj 98 92 cup;
#X obj 10 52 trigger f b;
#X obj 10 122 tabwrite \$0-x;
#X obj 10 12 inlet;
#X obj 98 12 r \$0-reset_to;
#X connect 0 0 2 1;
#X connect 1 0 2 0;
#X connect 1 1 0 0;
#X connect 3 0 1 0;
#X connect 4 0 0 0;
#X restore 36 326 pd write_x;
#N canvas 0 22 225 168 write_y 0;
#X obj 98 92 cup;
#X obj 10 52 trigger f b;
#X obj 10 12 inlet;
#X obj 98 12 r \$0-reset_to;
#X obj 10 122 tabwrite \$0-y;
#X connect 0 0 4 1;
#X connect 1 0 4 0;
#X connect 1 1 0 0;
#X connect 2 0 1 0;
#X connect 3 0 0 0;
#X restore 36 266 pd write_y;
#N canvas 229 426 211 168 write_z 0;
#X obj 98 92 cup;
#X obj 10 52 trigger f b;
#X obj 10 12 inlet;
#X obj 98 12 r \$0-reset_to;
#X obj 10 122 tabwrite \$0-z;
#X connect 0 0 4 1;
#X connect 1 0 4 0;
#X connect 1 1 0 0;
#X connect 2 0 1 0;
#X connect 3 0 0 0;
#X restore 36 206 pd write_z;
#X obj -45 146 unpack f f f;
#X obj -45 116 spigot;
#X obj 52 16 inlet size;
#X obj -6 76 > 1;
#X obj 120 326 s \$0-x;
#X obj 130 266 s \$0-y;
#X obj 140 206 s \$0-z;
#X msg 140 176 const \$1;
#X msg 130 236 const \$2;
#X msg 120 296 const \$3;
#X obj 120 116 spigot;
#X obj 159 86 == 1;
#X connect 0 0 1 0;
#X connect 0 0 6 0;
#X connect 0 0 15 0;
#X connect 5 0 2 0;
#X connect 5 1 3 0;
#X connect 5 2 4 0;
#X connect 6 0 5 0;
#X connect 7 0 8 0;
#X connect 7 0 16 0;
#X connect 8 0 6 1;
#X connect 12 0 11 0;
#X connect 13 0 10 0;
#X connect 14 0 9 0;
#X connect 15 0 12 0;
#X connect 15 0 13 0;
#X connect 15 0 14 0;
#X connect 16 0 15 1;
#X restore -112 120 pd write_xyz;
#X obj -112 150 outlet spit_xyz;
#X obj -35 9 inlet buffer size;
#X obj -112 60 mtx_spitarray 120 3;
#X obj 98 10 inlet control;
#X obj 18 90 t a a;
#N canvas 374 71 390 260 main_control 0;
#X obj 143 9 inlet;
#X obj 143 39 route clear;
#X msg 282 159 0;
#X obj 282 189 s \$0-reset_to;
#X obj 143 219 outlet clear;
#X obj 6 219 outlet record/spit;
#X obj 6 179 spigot;
#X msg 45 99 0;
#X msg 249 159 1;
#X obj 217 71 t a a;
#X obj 249 99 select 1 0;
#X connect 0 0 1 0;
#X connect 1 0 4 0;
#X connect 1 0 7 0;
#X connect 1 1 9 0;
#X connect 2 0 3 0;
#X connect 6 0 5 0;
#X connect 7 0 6 1;
#X connect 8 0 6 1;
#X connect 9 0 6 0;
#X connect 9 1 10 0;
#X connect 10 0 8 0;
#X connect 10 1 2 0;
#X restore 98 40 pd main_control;
#X text 197 151 Juan Ignacio Mendoza Garay - 2022;
#N canvas 544 551 283 486 set_arrays 1;
#X obj 58 239 s \$0-x;
#X obj 81 209 s \$0-y;
#X obj 104 179 s \$0-z;
#X obj -30 -136 inlet size;
#X msg 157 54 const 0;
#X obj 157 24 delay 100;
#X obj 65 -136 inlet clear;
#X obj 65 -16 t b b;
#X obj -20 -106 moses 2;
#X obj -30 318 outlet size;
#X msg 157 269 0;
#X msg 26 54 resize \$1;
#X msg 65 24 2;
#X obj 26 24 - 1;
#N canvas 1129 447 555 238 mask 1;
#X text 271 15 Every time the table properties change;
#X text 271 30 the table is re-written and it goes to;
#X text 271 45 the front exposing its title \, which is;
#X text 271 60 aesthetically undesirable.;
#X text 271 106 properties change.;
#X text 271 76 To avoid this a canvas is;
#X text 271 91 renewed every time the table;
#X obj 12 180 s pd-\$0-cnvmask;
#X obj 12 14 inlet;
#X obj 72 44 r \$0-lbl;
#X text 174 178 label position background font;
#X msg 12 134 clear \, obj 1 0 cnv 15 198 18 empty empty \$1 \$2 8
0 14 \$3 \$4 0;
#X obj 152 44 r \$0-lbl_init;
#X text 177 197 default: empty 0 0 -1;
#X obj 12 44 del 50;
#X obj 12 104 list-store;
#X connect 8 0 14 0;
#X connect 9 0 15 0;
#X connect 11 0 7 0;
#X connect 12 0 15 1;
#X connect 14 0 15 0;
#X connect 15 0 11 0;
#X restore 26 269 pd mask;
#X obj 117 -16 s \$0-lbl_init;
#X msg 117 -46 empty 0 0 -1;
#X obj 85 -106 loadbang;
#X obj 85 -76 t b b;
#X obj 58 129 t a a a;
#X obj 26 89 t b a;
#X connect 3 0 8 0;
#X connect 3 0 9 0;
#X connect 4 0 10 0;
#X connect 4 0 19 0;
#X connect 5 0 4 0;
#X connect 6 0 7 0;
#X connect 7 0 12 0;
#X connect 7 1 5 0;
#X connect 8 0 12 0;
#X connect 8 1 13 0;
#X connect 10 0 9 0;
#X connect 11 0 20 0;
#X connect 12 0 11 0;
#X connect 13 0 11 0;
#X connect 16 0 15 0;
#X connect 17 0 18 0;
#X connect 18 0 7 0;
#X connect 18 1 16 0;
#X connect 19 0 0 0;
#X connect 19 1 1 0;
#X connect 19 2 2 0;
#X connect 20 0 14 0;
#X connect 20 1 19 0;
#X restore 105 120 pd set_arrays;
#N canvas 0 22 450 300 (subpatch) 0;
#X array \$0-z 1082 float 0;
#X coords 0 1 1081 -2 200 90 1;
#X restore 310 35 graph;
#N canvas 0 22 450 300 (subpatch) 0;
#X array \$0-y 1082 float 0;
#X coords 0 2 1081 -1 200 90 1;
#X restore 310 35 graph;
#N canvas 0 22 450 300 (subpatch) 0;
#X array \$0-x 1082 float 0;
#X coords 0 3 1081 0 200 90 1;
#X restore 310 35 graph;
#N canvas 0 22 450 300 \$0-cnvmask 0;
#X obj 1 0 cnv 15 198 18 empty empty segment 70 8 0 14 -228992 -66577
0;
#X coords 0 -1 1 1 200 18 1 0 0;
#X restore 310 14 pd \$0-cnvmask;
#X obj 218 10 inlet label;
#X obj 218 40 s \$0-lbl;
#X connect 1 0 9 0;
#X connect 6 0 7 0;
#X connect 8 0 9 1;
#X connect 9 0 6 0;
#X connect 9 1 5 0;
#X connect 9 2 11 0;
#X connect 10 0 12 0;
#X connect 11 0 6 1;
#X connect 11 1 14 0;
#X connect 12 0 9 3;
#X connect 12 1 14 1;
#X connect 14 0 0 0;
#X connect 19 0 20 0;
#X coords 0 -1 1 1 200 120 2 310 10;