#N canvas 299 174 758 560 10; #X obj 264 329 textfile; #N canvas 0 0 450 300 setable_route 0; #X obj 148 99 inlet; #X obj 90 54 list split 1; #X obj 90 31 inlet; #X obj 90 188 outlet; #X obj 90 154 list; #X obj 148 188 outlet; #X obj 148 156 list; #X obj 90 124 select; #X connect 0 0 7 1; #X connect 1 0 7 0; #X connect 1 1 4 1; #X connect 1 1 6 1; #X connect 2 0 1 0; #X connect 4 0 3 0; #X connect 6 0 5 0; #X connect 7 0 4 0; #X connect 7 1 6 0; #X restore 264 360 pd setable_route; #X obj 313 290 list trim; #X obj 313 268 list prepend add; #X obj 166 266 until; #X msg 166 241 100; #X msg 216 223 rewind; #X obj 313 248 list prepend; #X obj 313 183 t b a; #X obj 313 218 list; #X obj 313 164 hradio 15 1 0 8 empty empty save_at_slot 0 -6 0 8 -262144 -1 -1 0; #X obj 166 195 t b b f; #X symbolatom 476 204 10 0 0 1 store_me - -; #X obj 166 166 hradio 15 1 0 8 empty empty load_slot 0 -6 0 8 -262144 -1 -1 0; #X floatatom 477 223 5 0 0 1 store_number - -; #X text 475 151 Data to store; #X msg 476 178 list foo bar store me; #X obj 264 408 print STORED; #N canvas 0 0 805 547 advanced 0; #X obj 281 389 textfile; #X obj 330 350 list trim; #X obj 330 328 list prepend add; #X obj 231 366 until; #X msg 229 341 100; #X msg 260 341 rewind; #X obj 330 308 list prepend; #X obj 330 243 t b a; #X obj 330 278 list; #X symbolatom 493 264 10 0 0 1 store_me - -; #X floatatom 494 283 5 0 0 1 store_number - -; #X text 492 211 Data to store; #X msg 493 238 list foo bar store me; #X obj 281 468 print STORED; #N canvas 0 0 450 300 setable_route_with_symbol 0; #X obj 204 102 inlet; #X obj 90 54 list split 1; #X obj 90 31 inlet; #X obj 90 188 outlet; #X obj 90 154 list; #X obj 148 188 outlet; #X obj 148 156 list; #X obj 90 124 select junksymbol; #X connect 0 0 7 1; #X connect 1 0 7 0; #X connect 1 1 4 1; #X connect 1 1 6 1; #X connect 2 0 1 0; #X connect 4 0 3 0; #X connect 6 0 5 0; #X connect 7 0 4 0; #X connect 7 1 6 0; #X restore 281 420 pd setable_route_with_symbol; #X obj 241 321 t b b a; #X symbolatom 216 292 10 0 0 0 reload_by_symbol - -; #X symbolatom 329 222 10 0 0 0 store_by_symbol - -; #X msg 399 158 c; #X msg 364 158 b; #X msg 329 158 a; #X obj 329 200 list; #X msg 181 202 c; #X msg 146 202 b; #X msg 111 202 a; #X obj 111 244 list; #X text 172 75 You can also store using a symbol key \, but not both num and syn keys at the same time because [select] doesn't like it. ; #X connect 0 0 14 0; #X connect 0 1 3 1; #X connect 1 0 0 0; #X connect 2 0 1 0; #X connect 3 0 0 0; #X connect 4 0 3 0; #X connect 5 0 0 0; #X connect 6 0 2 0; #X connect 7 0 8 0; #X connect 7 1 6 1; #X connect 8 0 6 0; #X connect 9 0 8 1; #X connect 10 0 8 1; #X connect 12 0 8 1; #X connect 14 0 13 0; #X connect 15 0 4 0; #X connect 15 1 5 0; #X connect 15 2 14 1; #X connect 16 0 15 0; #X connect 17 0 7 0; #X connect 18 0 21 0; #X connect 19 0 21 0; #X connect 20 0 21 0; #X connect 21 0 17 0; #X connect 22 0 25 0; #X connect 23 0 25 0; #X connect 24 0 25 0; #X connect 25 0 16 0; #X restore 541 383 pd advanced; #X msg 155 308 print; #X text 25 243 100 to avoid loops; #X connect 0 0 1 0; #X connect 0 1 4 1; #X connect 1 0 17 0; #X connect 2 0 0 0; #X connect 3 0 2 0; #X connect 4 0 0 0; #X connect 5 0 4 0; #X connect 6 0 0 0; #X connect 7 0 3 0; #X connect 8 0 9 0; #X connect 8 1 7 1; #X connect 9 0 7 0; #X connect 10 0 8 0; #X connect 11 0 5 0; #X connect 11 1 6 0; #X connect 11 2 1 1; #X connect 12 0 9 1; #X connect 13 0 11 0; #X connect 14 0 9 1; #X connect 16 0 9 1; #X connect 19 0 0 0;