-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathmemounpack.pd
97 lines (97 loc) · 2.55 KB
/
memounpack.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
#N canvas 67 145 458 551 10;
#X obj 48 120 list split 1;
#X obj 48 158 list;
#X obj 48 177 list split 1;
#X obj 168 272 list;
#X obj 168 291 list split 1;
#X obj 61 206 list;
#X msg 333 348 symbol;
#X obj 189 119 list;
#X obj 61 225 route bang;
#X obj 48 139 t b f f;
#X text 45 21 ** RECEBE LISTA GERADA POR [memopack] E LISTA DOS [memo]
PARA ONDE MANDAR OS CONTEÚDOS DESEMPACOTADOS;
#X text 85 435 TAMANHO DE CADA [memo] DESEMPACOTADO, f 22;
#X obj 168 348 makefilename %s_memo_load;
#X obj 147 387 send;
#X obj 48 254 t b a b;
#X obj 168 310 symbol;
#X text 183 387 ENVIA LISTA PARA CADA [memo];
#X obj 87 471 outlet MEMO_SIZE;
#X obj 48 101 t a b b;
#X obj 48 273 del 0;
#X text 45 297 EVITA STACK OVERFLOW, f 8;
#X text 97 206 LOOP;
#X text 226 119 ARMAZENA LISTA DE [memo];
#N canvas 73 126 505 316 CONTEXT 0;
#X obj 137 106 sel symbol;
#X obj 137 68 t b f;
#X obj 212 87 makefilename $%d-;
#X obj 234 137 bang;
#X msg 137 49 1;
#X obj 137 87 symbol \$1-;
#X obj 234 156 list append \$1;
#X obj 234 175 makefilename %s;
#X obj 137 232 makefilename;
#X obj 234 194 makefilename %s-%%s;
#X msg 234 213 set \$1;
#X msg 137 213 set %s;
#X obj 137 30 loadbang;
#X obj 137 271 outlet SYMBOL;
#X obj 40 30 inlet SYMBOL;
#X text 270 137 COM ARGUMENTO;
#X text 336 175 FORÇA COMO SYMBOL;
#X text 361 195 USA COMO PREFIXO;
#X text 218 25 ** SE HOUVER 1 ARGUMENTO \, USA COMO PREFIXO PARA DESIGNAR
CONTEXTO DOS [memo] \, SENÃO MANTÉM NOME DOS [memo] COMO NA ENTRADA
, f 42;
#X connect 0 0 11 0;
#X connect 0 1 3 0;
#X connect 1 0 5 0;
#X connect 1 1 2 0;
#X connect 2 0 0 1;
#X connect 3 0 6 0;
#X connect 4 0 1 0;
#X connect 5 0 0 0;
#X connect 6 0 7 0;
#X connect 7 0 9 0;
#X connect 8 0 13 0;
#X connect 9 0 10 0;
#X connect 10 0 8 0;
#X connect 11 0 8 0;
#X connect 12 0 4 0;
#X connect 14 0 8 0;
#X restore 168 329 pd CONTEXT;
#X text 265 435 BANG QUANDO TERMINA DE ENVIAR CONTEÚDOS, f 19;
#X text 133 225 IDENTIFICA FIM DO LOOP;
#X obj 267 471 outlet DONE_BANG;
#X obj 48 72 inlet MEMOPACK_LIST;
#X obj 210 72 inlet MEMO_LIST;
#X connect 0 0 9 0;
#X connect 0 1 1 1;
#X connect 1 0 2 0;
#X connect 2 0 14 0;
#X connect 2 1 5 1;
#X connect 3 0 4 0;
#X connect 4 0 15 0;
#X connect 4 1 3 1;
#X connect 5 0 8 0;
#X connect 6 0 13 1;
#X connect 7 0 3 1;
#X connect 8 0 26 0;
#X connect 8 1 0 0;
#X connect 9 0 1 0;
#X connect 9 1 2 1;
#X connect 9 2 17 0;
#X connect 12 0 13 1;
#X connect 14 0 19 0;
#X connect 14 1 13 0;
#X connect 14 2 3 0;
#X connect 15 0 23 0;
#X connect 18 0 0 0;
#X connect 18 1 6 0;
#X connect 18 2 7 0;
#X connect 19 0 5 0;
#X connect 23 0 12 0;
#X connect 27 0 18 0;
#X connect 28 0 7 1;