From b54beb5c550f8b12d0ecce9e3b89c9906c9f829b Mon Sep 17 00:00:00 2001 From: Luke Iannini Date: Thu, 24 Jul 2008 09:59:49 +0000 Subject: renamed svn path=/trunk/abstractions/senderfruit/; revision=10215 --- semento/rradical.state-p.pd | 220 ++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 220 insertions(+) create mode 100644 semento/rradical.state-p.pd (limited to 'semento/rradical.state-p.pd') diff --git a/semento/rradical.state-p.pd b/semento/rradical.state-p.pd new file mode 100644 index 0000000..a7f7b2a --- /dev/null +++ b/semento/rradical.state-p.pd @@ -0,0 +1,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; -- cgit v1.2.1