This repository has been archived by the owner on Aug 6, 2022. It is now read-only.
-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathestudos_arrays.pd
executable file
·270 lines (270 loc) · 7.56 KB
/
estudos_arrays.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
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
#N canvas 282 87 799 613 16;
#N canvas 0 0 450 300 (subpatch) 0;
#X array array1 10 float 3;
#A 0 0.642859 0.757144 0.628573 0.385717 0.114289 3.09944e-06 -0.042854
-0.0142826 0.0285745 0.0571458;
#X coords 0 1 10 -1 200 140 1;
#X restore 528 -167 graph;
#N canvas 0 0 450 300 (subpatch) 0;
#X array array2 10 float 3;
#A 0 -0.900005 0.87143 0.842859 0.785716 0.757145 0.714287 0.67143
0.67143 0.642859 0.642859;
#X coords 0 1 10 -1 200 140 1;
#X restore 315 -173 graph;
#N canvas 0 0 450 300 (subpatch) 0;
#X array array3 20 float 3;
#A 0 0.0857061 -0.128579 -0.542863 -0.142865 0.0571347 0.142849 0.242848
0.299991 0.342848 0.385705 0.407133 0.428562 0.471419 0.49999 0.49999
0.485705 0.442848 0.27142 -0.0714362 -0.442863;
#X coords 0 1 20 -1 200 140 1;
#X restore 92 -169 graph;
#N canvas 0 0 450 300 (subpatch) 0;
#X array transita 40 float 3;
#A 0 0.0857061 0.0857061 -0.128579 -0.542863 -0.142865 0.0571347 0.142849
0.242848 0.299991 0.342848 0.385705 0.407133 0.428562 0.471419 0.49999
0.49999 0.485705 0.442848 0.27142 -0.0714362 -0.442863 -0.900005 0.87143
0.842859 0.785716 0.757145 0.714287 0.67143 0.67143 0.642859 0.642859
0.642859 0.757144 0.628573 0.385717 0.114289 3.09944e-06 -0.042854
-0.0142826 0.0571458;
#X coords 0 1 40 -1 200 140 1;
#X restore 535 199 graph;
#X text 551 17 objetivo:;
#X text 406 51 salvar 3 arrays em um arquivo e recuperar depois;
#X obj 174 82 savepanel;
#X obj 264 270 openpanel;
#X msg 174 108 \; transita write \$1;
#X msg 264 300 \; transita read \$1;
#N canvas 79 190 1182 548 escrevendo 0;
#X obj 366 -83 tabdump array1;
#X obj 365 -106 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 259 -75 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 259 -51 tabdump array2;
#X obj 158 -151 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 259 0 list append;
#X obj 234 116 list append;
#X obj 234 54 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 234 78 tabdump array3;
#X obj 367 211 list-len;
#X msg 367 243 \; transita resize \$1;
#X obj 23 236 list-dripslow;
#X obj 23 199 until;
#X floatatom 23 168 5 0 0 0 - - -;
#X obj 23 134 int;
#X obj 23 338 tabwrite transita;
#X obj 23 268 t f b;
#X obj 190 303 counter;
#X obj 158 -126 t b b b b b b;
#X obj 223 277 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 90 -138 inlet;
#X obj 537 -28 list-len;
#X obj 537 12 s tamanho1;
#X obj 538 57 list-len;
#X obj 538 97 s tamanho2;
#X obj 532 139 list-len;
#X obj 532 179 s tamanho3;
#X connect 0 0 5 1;
#X connect 0 0 21 0;
#X connect 1 0 0 0;
#X connect 2 0 3 0;
#X connect 3 0 5 0;
#X connect 3 0 23 0;
#X connect 4 0 18 0;
#X connect 5 0 6 1;
#X connect 6 0 11 1;
#X connect 6 0 9 0;
#X connect 7 0 8 0;
#X connect 8 0 6 0;
#X connect 8 0 25 0;
#X connect 9 0 10 0;
#X connect 9 0 14 1;
#X connect 11 0 16 0;
#X connect 12 0 11 0;
#X connect 13 0 12 0;
#X connect 14 0 13 0;
#X connect 16 0 15 0;
#X connect 16 1 17 0;
#X connect 17 0 15 1;
#X connect 18 0 19 0;
#X connect 18 1 14 0;
#X connect 18 3 7 0;
#X connect 18 4 2 0;
#X connect 18 5 1 0;
#X connect 19 0 17 2;
#X connect 20 0 4 0;
#X connect 21 0 22 0;
#X connect 23 0 24 0;
#X connect 25 0 26 0;
#X restore 102 177 pd escrevendo em array transitorio;
#N canvas 239 47 848 670 recuperando 0;
#X obj 61 87 tabdump transita;
#X obj 61 186 list split;
#X obj 291 130 prepend set;
#X msg 291 162 0.0857061 -0.128579 -0.542863 -0.142865 0.0571347 0.142849
0.242848 0.299991 0.342848 0.385705 0.407133 0.428562 0.471419 0.49999
0.49999 0.485705 0.442848 0.27142 -0.0714362 -0.442863;
#X msg 410 21 set;
#X text 101 110 recebe tamanho lista3;
#X obj 109 279 list split;
#X text 248 256 recebe tamanho lista2;
#X obj 292 445 prepend set;
#X msg 292 477 0.642859 0.757144 0.628573 0.385717 0.114289 3.09944e-06
-0.042854 -0.0142826 0.0285745 0.0571458;
#X obj 289 353 prepend set;
#X msg 288 380 -0.900005 0.87143 0.842859 0.785716 0.757145 0.714287
0.67143 0.67143 0.642859 0.642859;
#X text 589 141 array3;
#X text 473 457 array1;
#X text 460 358 array2;
#N canvas 608 205 380 432 reescreve 0;
#X obj 23 256 list-dripslow;
#X obj 23 219 until;
#X floatatom 23 188 5 0 0 0 - - -;
#X obj 23 154 int;
#X obj 23 288 t f b;
#X obj 190 323 counter;
#X obj 223 297 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 25 75 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 25 95 t b b;
#X obj 23 358 tabwrite array1;
#X obj 26 31 inlet;
#X obj 289 182 inlet;
#X obj 67 125 r tamanho1;
#X connect 0 0 4 0;
#X connect 1 0 0 0;
#X connect 2 0 1 0;
#X connect 3 0 2 0;
#X connect 4 0 9 0;
#X connect 4 1 5 0;
#X connect 5 0 9 1;
#X connect 6 0 5 2;
#X connect 7 0 8 0;
#X connect 8 0 6 0;
#X connect 8 1 3 0;
#X connect 10 0 7 0;
#X connect 11 0 0 1;
#X connect 12 0 3 1;
#X restore 21 445 pd reescreve array1;
#X obj 43 14 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 43 42 t b b;
#N canvas 20 135 380 432 reescreve 0;
#X obj 23 256 list-dripslow;
#X obj 23 219 until;
#X floatatom 23 188 5 0 0 0 - - -;
#X obj 23 154 int;
#X obj 23 288 t f b;
#X obj 190 323 counter;
#X obj 223 297 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 25 75 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 25 95 t b b;
#X obj 26 31 inlet;
#X obj 289 182 inlet;
#X obj 23 358 tabwrite array2;
#X obj 71 127 r tamanho2;
#X connect 0 0 4 0;
#X connect 1 0 0 0;
#X connect 2 0 1 0;
#X connect 3 0 2 0;
#X connect 4 0 11 0;
#X connect 4 1 5 0;
#X connect 5 0 11 1;
#X connect 6 0 5 2;
#X connect 7 0 8 0;
#X connect 8 0 6 0;
#X connect 8 1 3 0;
#X connect 9 0 7 0;
#X connect 10 0 0 1;
#X connect 12 0 3 1;
#X restore 41 490 pd reescreve array2;
#N canvas 24 157 380 432 reescreve 0;
#X obj 23 256 list-dripslow;
#X obj 23 219 until;
#X floatatom 23 188 5 0 0 0 - - -;
#X obj 23 154 int;
#X obj 23 288 t f b;
#X obj 190 323 counter;
#X obj 223 297 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 25 75 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 25 95 t b b;
#X obj 26 31 inlet;
#X obj 289 182 inlet;
#X obj 23 358 tabwrite array3;
#X obj 73 129 r tamanho3;
#X connect 0 0 4 0;
#X connect 1 0 0 0;
#X connect 2 0 1 0;
#X connect 3 0 2 0;
#X connect 4 0 11 0;
#X connect 4 1 5 0;
#X connect 5 0 11 1;
#X connect 6 0 5 2;
#X connect 7 0 8 0;
#X connect 8 0 6 0;
#X connect 8 1 3 0;
#X connect 9 0 7 0;
#X connect 10 0 0 1;
#X connect 12 0 3 1;
#X restore 69 540 pd reescreve array3;
#X obj 117 11 inlet;
#X obj 260 43 r tamanho3;
#X obj 174 226 r tamanho2;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 0 19 1;
#X connect 1 1 6 0;
#X connect 2 0 3 0;
#X connect 4 0 3 0;
#X connect 4 0 9 0;
#X connect 4 0 11 0;
#X connect 6 0 10 0;
#X connect 6 0 18 1;
#X connect 6 1 8 0;
#X connect 6 1 15 1;
#X connect 8 0 9 0;
#X connect 10 0 11 0;
#X connect 16 0 17 0;
#X connect 17 0 15 0;
#X connect 17 0 18 0;
#X connect 17 0 19 0;
#X connect 17 1 0 0;
#X connect 20 0 16 0;
#X connect 21 0 1 1;
#X connect 22 0 6 1;
#X restore 101 366 pd recuperando dados;
#X obj 121 30 t b b;
#X obj 121 3 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 101 245 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 264 241 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X text 144 -2 1 - salvar;
#X text 290 239 2 - abrir;
#X text 128 241 3 - recupera;
#X obj 19 105 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X text 45 100 0 - tamanhos;
#X obj 19 72 loadbang;
#X obj 101 289 t b b;
#X connect 6 0 8 0;
#X connect 7 0 9 0;
#X connect 12 0 6 0;
#X connect 12 1 10 0;
#X connect 13 0 12 0;
#X connect 14 0 22 0;
#X connect 15 0 7 0;
#X connect 19 0 10 0;
#X connect 21 0 19 0;
#X connect 22 0 11 0;
#X connect 22 1 11 0;