aboutsummaryrefslogtreecommitdiff
path: root/memento-p/rradical.state-p.pd
blob: a7f7b2ae40e0ca7110551732389f0e208d47ddf2 (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
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
#N canvas 33 22 1040 638 10;
#X obj 108 454 outlet;
#X obj 87 475 outlet;
#X obj 173 410 print attr;
#X obj 87 380 pool RRADICAL;
#X obj 205 46 inlet;
#X obj 42 331 r \$0-pool;
#X obj 356 373 s \$0-pool;
#X obj 205 124 symbol \$1;
#X obj 134 29 loadbang;
#X msg 255 278 getdir;
#X obj 130 433 outlet;
#X obj 457 313 prepend get;
#X msg 306 160 getall;
#X obj 386 228 s \$0-substate;
#X obj 356 203 t b f;
#X msg 121 318 echodir \$1;
#X obj 121 291 tgl 15 1 empty empty empty 0 -6 0 8 -262144 -1 -1 1
1;
#X msg 118 347 getdir;
#X msg 137 79 bang;
#X msg 508 190 copyall;
#X msg 565 190 paste;
#X obj 532 223 s \$0-pool;
#X obj 508 136 symbol;
#N canvas 468 415 458 308 mkchange2substate 0;
#X obj 92 39 inlet;
#X obj 111 224 outlet;
#X obj 198 93 r \$0-memento;
#X obj 293 93 r \$0-substate;
#X obj 111 150 pack s s 0;
#X obj 92 93 symbol mkchdir;
#X obj 92 67 t b;
#X obj 111 180 route list;
#X text 204 180 Un-List it again;
#X connect 0 0 6 0;
#X connect 2 0 4 1;
#X connect 3 0 4 2;
#X connect 4 0 7 0;
#X connect 5 0 4 0;
#X connect 6 0 5 0;
#X connect 7 0 1 0;
#X restore 356 274 pd mkchange2substate;
#X obj 205 160 t b b s;
#X obj 249 209 s \$0-memento;
#X obj 17 525 print pool;
#X obj 205 84 route state getstate getall substate set get;
#X obj 508 160 select copy paste;
#X obj 698 550 s \$0-pool;
#X obj 17 544 print svld;
#X obj 601 373 symbol;
#X obj 793 377 symbol;
#X obj 17 563 print currentDir;
#X msg 191 349 printroot;
#N canvas 468 415 478 328 mkchange2tmp 0;
#X obj 92 39 inlet;
#X obj 111 224 outlet;
#X obj 198 93 r \$0-memento;
#X obj 92 93 symbol mkchdir;
#X obj 92 67 t b;
#X obj 111 180 route list;
#X text 204 180 Un-List it again;
#X msg 296 94 symbol tmp;
#X obj 111 150 pack s s s;
#X obj 296 66 loadbang;
#X msg 167 37 bang;
#X connect 0 0 4 0;
#X connect 2 0 8 1;
#X connect 3 0 8 0;
#X connect 4 0 3 0;
#X connect 5 0 1 0;
#X connect 7 0 8 2;
#X connect 8 0 5 0;
#X connect 9 0 7 0;
#X connect 10 0 4 0;
#X restore 623 347 pd mkchange2tmp;
#N canvas 1317 161 462 312 mkchange2substate 0;
#X obj 92 39 inlet;
#X obj 111 224 outlet;
#X obj 198 93 r \$0-memento;
#X obj 293 93 r \$0-substate;
#X obj 111 150 pack s s 0;
#X obj 92 93 symbol mkchdir;
#X obj 111 180 route list;
#X text 204 180 Un-List it again;
#X text 195 29 change back to substate dir;
#X obj 92 67 t b b;
#X msg 38 98 clrclip;
#X connect 0 0 9 0;
#X connect 2 0 4 1;
#X connect 3 0 4 2;
#X connect 4 0 6 0;
#X connect 5 0 4 0;
#X connect 6 0 1 0;
#X connect 9 0 10 0;
#X connect 9 1 5 0;
#X connect 10 0 1 0;
#X restore 771 424 pd mkchange2substate;
#X obj 579 325 t b a b;
#N canvas 405 362 623 338 sub2tmp 0;
#X obj 121 12 inlet;
#X obj 111 224 outlet;
#X obj 198 93 r \$0-memento;
#X obj 92 93 symbol mkchdir;
#X obj 111 180 route list;
#X text 204 180 Un-List it again;
#X msg 36 91 paste;
#X obj 121 40 t b b b;
#X msg 406 90 copyall;
#X text 189 8 copies data from current dir \, changes to "tmp" dir
\, pastes data.;
#X obj 293 93 symbol tmp;
#X msg 294 47 bang;
#X obj 359 47 loadbang;
#X obj 111 150 pack s s s;
#X connect 0 0 7 0;
#X connect 2 0 13 1;
#X connect 3 0 13 0;
#X connect 4 0 1 0;
#X connect 6 0 1 0;
#X connect 7 0 6 0;
#X connect 7 1 3 0;
#X connect 7 2 8 0;
#X connect 8 0 1 0;
#X connect 10 0 13 2;
#X connect 11 0 10 0;
#X connect 12 0 10 0;
#X connect 13 0 4 0;
#X restore 815 348 pd sub2tmp;
#X obj 771 324 t b a b;
#X msg 536 357 bang;
#X obj 17 582 print currentCommand;
#X obj 661 100 t a;
#N canvas 757 334 643 358 tmp2sub+abs1 0;
#X obj 121 12 inlet;
#X obj 181 257 outlet;
#X obj 268 126 r \$0-memento;
#X obj 363 126 r \$0-substate;
#X obj 181 183 pack s s 0;
#X obj 162 126 symbol mkchdir;
#X obj 181 213 route list;
#X text 274 213 Un-List it again;
#X msg 106 124 paste;
#X msg 476 123 copyall;
#X obj 121 40 t b b b b;
#X msg 35 125 absdir 1;
#X text 191 19 copies data from "tmp" dir \, changes to current substate
\, pastes data \, returns to absolute directory mode.;
#X connect 0 0 10 0;
#X connect 2 0 4 1;
#X connect 3 0 4 2;
#X connect 4 0 6 0;
#X connect 5 0 4 0;
#X connect 6 0 1 0;
#X connect 8 0 1 0;
#X connect 9 0 1 0;
#X connect 10 0 11 0;
#X connect 10 1 8 0;
#X connect 10 2 5 0;
#X connect 10 3 9 0;
#X connect 11 0 1 0;
#X restore 579 417 pd tmp2sub+abs1;
#X obj 661 293 route lddir svdir;
#X msg 793 398 absdir 0 \, svdir \$1 \, absdir 1;
#X msg 601 393 absdir 0 \, lddir \$1;
#X obj 407 160 prepent set;
#X connect 3 0 1 0;
#X connect 3 1 0 0;
#X connect 3 2 10 0;
#X connect 3 4 2 0;
#X connect 4 0 27 0;
#X connect 5 0 3 0;
#X connect 7 0 24 0;
#X connect 8 0 7 0;
#X connect 9 0 6 0;
#X connect 11 0 6 0;
#X connect 12 0 6 0;
#X connect 14 0 23 0;
#X connect 14 1 13 0;
#X connect 15 0 3 0;
#X connect 16 0 15 0;
#X connect 17 0 3 0;
#X connect 18 0 7 0;
#X connect 19 0 21 0;
#X connect 20 0 21 0;
#X connect 22 0 28 0;
#X connect 23 0 6 0;
#X connect 24 0 9 0;
#X connect 24 1 23 0;
#X connect 24 2 25 0;
#X connect 27 0 7 0;
#X connect 27 1 9 0;
#X connect 27 2 12 0;
#X connect 27 3 14 0;
#X connect 27 4 47 0;
#X connect 27 5 11 0;
#X connect 27 6 22 0;
#X connect 27 6 42 0;
#X connect 28 0 19 0;
#X connect 28 1 20 0;
#X connect 31 0 46 0;
#X connect 32 0 45 0;
#X connect 34 0 3 0;
#X connect 35 0 29 0;
#X connect 36 0 29 0;
#X connect 37 0 43 0;
#X connect 37 1 31 0;
#X connect 37 2 35 0;
#X connect 38 0 29 0;
#X connect 39 0 36 0;
#X connect 39 1 32 0;
#X connect 39 2 38 0;
#X connect 40 0 31 0;
#X connect 42 0 44 0;
#X connect 43 0 29 0;
#X connect 44 0 37 0;
#X connect 44 1 39 0;
#X connect 45 0 29 0;
#X connect 46 0 29 0;
#X connect 47 0 6 0;