From f383589a188de280f26afe092168d3e6f5206ea6 Mon Sep 17 00:00:00 2001 From: Luke Iannini Date: Thu, 24 Jul 2008 10:04:42 +0000 Subject: renaming very unfortunately named semento to memento-p to aid discoverability (for the record, semento was supposed to be a play on 'senderfoot's memento' and 'cement'! :)). abstractions marked with -p are part of polaroid, and those with -c have features for controctopus. svn path=/trunk/abstractions/senderfruit/; revision=10216 --- semento/originator-p.pd | 265 ------------------------------------------------ 1 file changed, 265 deletions(-) delete mode 100644 semento/originator-p.pd (limited to 'semento/originator-p.pd') diff --git a/semento/originator-p.pd b/semento/originator-p.pd deleted file mode 100644 index e3ccb9f..0000000 --- a/semento/originator-p.pd +++ /dev/null @@ -1,265 +0,0 @@ -#N canvas 210 71 1030 697 10; -#X text 425 22 responsibilities:; -#X text 98 10 ORIGINATOR (the mixing engineer); -#X text 447 59 * set memento (restore settings from photo); -#X text 448 40 * create memento (take photo); -#N canvas 76 23 720 450 createMemento 0; -#X obj 48 84 inlet; -#X obj 97 117 symbol \$1; -#X obj 97 90 loadbang; -#X obj 97 150 s \$0-memento; -#X text 75 49 \$1 is the default name of the memento \, that this originator -creates \, but it can be changed later.; -#X obj 74 179 outlet; -#X text 292 108 What is a memento?; -#X text 275 121 a memento is a directory in a global (data)pool; -#X obj 305 139 r \$0-memento; -#X msg 309 180 state \$1; -#X obj 319 213 s \$0-pool; -#X connect 0 0 1 0; -#X connect 1 0 3 0; -#X connect 1 0 5 0; -#X connect 2 0 1 0; -#X connect 8 0 9 0; -#X connect 9 0 10 0; -#X restore 122 321 pd createMemento; -#X obj 122 104 inlet; -#N canvas 600 185 664 406 setMemento 0; -#X text 238 12 setMemento is responsible for restoring all registered -variables.; -#X obj 64 26 inlet; -#X obj 109 286 outlet; -#X obj 109 249 r \$0-restore; -#X msg 64 126 getall; -#X obj 64 183 s \$0-pool; -#N canvas 468 415 450 300 change2substate 0; -#X obj 92 39 inlet; -#X obj 113 198 outlet; -#X obj 185 93 r \$0-memento; -#X obj 280 93 r \$0-substate; -#X obj 113 144 pack s s 0; -#X obj 92 93 symbol chdir; -#X obj 92 67 t b; -#X obj 113 167 route list; -#X text 218 163 un-list 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 131 127 pd change2substate; -#X text 186 104 change to dir memento substate; -#X obj 64 52 t b b b; -#X obj 130 75 s \$0-set-ON; -#X connect 1 0 8 0; -#X connect 3 0 2 0; -#X connect 4 0 5 0; -#X connect 6 0 5 0; -#X connect 8 0 4 0; -#X connect 8 1 6 0; -#X connect 8 2 9 0; -#X restore 256 446 pd setMemento; -#X text 431 90 What is a memento?; -#X text 463 111 a memento is a directory in a global (data)pool; -#X text 432 135 What is a state?; -#X obj 563 328 r \$0-pool; -#X symbolatom 691 374 10 0 0 3 memento - -; -#X msg 170 103 create help; -#X msg 261 103 set memento; -#X obj 777 348 inlet; -#X obj 178 297 s \$0-substate; -#X obj 828 482 r \$0-substate; -#X msg 828 511 substate \$1; -#X msg 99 471 copy; -#X msg 210 472 paste; -#X obj 134 514 s \$0-pool; -#X obj 309 341 symbol; -#X obj 156 440 t b b; -#X obj 563 460 s \$2-in; -#X obj 197 418 r \$0-set; -#X obj 148 472 s \$0-set; -#X obj 828 540 s \$0-pool; -#X obj 225 274 s \$0-pool; -#X text 819 348 OSC inlet; -#X text 462 154 a state is the content of a memento subdirectory named -by a number.; -#X obj 535 273 r \$2-RRADICAL-MEMENTO; -#X text 443 248 \$2-RRADICAL-MEMENTO is sent by commun objects; -#X obj 777 413 s \$2-RRADICAL-OSC; -#X obj 385 520 outlet; -#N canvas 468 415 450 300 ch2subs 0; -#X obj 92 39 inlet; -#X obj 113 198 outlet; -#X obj 185 93 r \$0-memento; -#X obj 280 93 r \$0-substate; -#X obj 113 144 pack s s 0; -#X obj 92 67 t b; -#X obj 113 167 route list; -#X text 218 163 un-list again; -#X obj 92 94 symbol chdir; -#X connect 0 0 5 0; -#X connect 2 0 4 1; -#X connect 3 0 4 2; -#X connect 4 0 6 0; -#X connect 5 0 8 0; -#X connect 6 0 1 0; -#X connect 8 0 4 0; -#X restore 255 252 pd ch2subs; -#X obj 225 230 t a b; -#X obj 563 382 spigot; -#X obj 448 520 spigot; -#N canvas 548 386 450 300 tgl 0; -#X obj 155 198 outlet; -#X obj 240 198 outlet; -#X msg 151 120 0; -#X msg 184 120 1; -#X msg 233 120 0; -#X msg 266 120 1; -#X obj 295 55 r \$0-set-ON; -#X obj 292 85 loadbang; -#X obj 185 65 r \$0-get-ON; -#X text 20 7 This tgl is to prevent some loops when using get and set. -; -#X connect 2 0 0 0; -#X connect 3 0 0 0; -#X connect 4 0 1 0; -#X connect 5 0 1 0; -#X connect 6 0 2 0; -#X connect 6 0 5 0; -#X connect 7 0 5 0; -#X connect 7 0 2 0; -#X connect 8 0 3 0; -#X connect 8 0 4 0; -#X restore 486 348 pd tgl; -#X obj 235 177 t a b; -#X obj 287 175 s \$0-get-ON; -#X obj 385 493 spigot; -#X obj 448 544 outlet; -#X text 353 541 Value outlet; -#X text 494 545 Value/Key outlet; -#X obj 370 228 s \$0-substate; -#X obj 340 203 t b f; -#X obj 23 316 s \$0-pool; -#X obj 646 494 outlet; -#X text 641 515 OSC outlet; -#X obj 637 461 OSCprepend \$1; -#X msg 720 487 setsub \$1; -#X obj 720 547 s \$0-setsub; -#X obj 173 77 r \$0-setsub; -#X obj 161 378 select copy paste set; -#X obj 122 132 route create substate get setsub; -#X obj 340 251 s \$0-set; -#X obj 25 261 symbol; -#X obj 101 267 symbol; -#X obj 12 220 t b a; -#X msg 12 360 set; -#X text 12 382 after loadx \, set; -#X obj 12 77 r SET_ALL_RRADICALS; -#X obj 818 245 r \$0-substate; -#X text 795 218 \$2 == \$0 parent; -#X msg 818 270 set \$1; -#X obj 818 298 s \$2-parentstate; -#X msg 745 513 /preset \$1; -#X obj 563 351 rradical.state-p \$1; -#X obj 262 77 r \$2-localSave; -#X text 14 47 global send to do something crazy with!; -#X obj 262 56 r \$1-localSetsub; -#X obj 22 197 route lddir svdir; -#X msg 23 285 lddir \$1; -#X msg 102 289 svdir \$1; -#X obj 884 377 r \$1/OSC; -#X obj 731 308 r PDOSC; -#X obj 77 580 r \$1/getParams; -#X obj 77 619 s \$2/listParams; -#X text 85 599 Dispatch to commun-cs; -#X obj 563 419 prepent RRADICAL.dummy; -#X obj 535 300 prepent set; -#X obj 448 493 prepent RRADICAL.dummy; -#X obj 235 196 prepent get; -#X obj 816 32 r \$2-COMMUN-RESPONSE; -#X obj 816 86 s PDOSC; -#X obj 816 60 OSCprepend \$1; -#X obj 764 437 routeOSC /preset /substate; -#X obj 777 377 deeprouteOSC \$1; -#X obj 247 579 r \$2/returnParams; -#X obj 247 619 s \$1/paramsList; -#X connect 5 0 55 0; -#X connect 10 0 68 0; -#X connect 11 0 50 1; -#X connect 12 0 55 0; -#X connect 13 0 55 0; -#X connect 14 0 88 0; -#X connect 16 0 17 0; -#X connect 16 0 67 0; -#X connect 17 0 26 0; -#X connect 18 0 20 0; -#X connect 19 0 20 0; -#X connect 21 0 54 0; -#X connect 22 0 25 0; -#X connect 22 1 19 0; -#X connect 24 0 6 0; -#X connect 30 0 50 0; -#X connect 30 0 81 0; -#X connect 34 0 27 0; -#X connect 35 0 27 0; -#X connect 35 1 34 0; -#X connect 36 0 80 0; -#X connect 37 0 42 0; -#X connect 38 0 37 1; -#X connect 38 0 41 1; -#X connect 38 1 36 1; -#X connect 39 0 83 0; -#X connect 39 1 40 0; -#X connect 41 0 33 0; -#X connect 46 0 56 0; -#X connect 46 1 45 0; -#X connect 50 0 48 0; -#X connect 51 0 52 0; -#X connect 53 0 55 0; -#X connect 54 0 18 0; -#X connect 54 1 22 0; -#X connect 54 2 6 0; -#X connect 55 0 4 0; -#X connect 55 1 15 0; -#X connect 55 2 39 0; -#X connect 55 3 46 0; -#X connect 55 4 21 0; -#X connect 55 4 72 0; -#X connect 57 0 73 0; -#X connect 58 0 74 0; -#X connect 59 0 60 0; -#X connect 59 1 57 0; -#X connect 60 0 21 0; -#X connect 62 0 55 0; -#X connect 63 0 65 0; -#X connect 65 0 66 0; -#X connect 67 0 50 0; -#X connect 68 0 36 0; -#X connect 68 0 41 0; -#X connect 68 0 82 0; -#X connect 68 1 80 1; -#X connect 68 1 82 1; -#X connect 68 2 11 0; -#X connect 69 0 55 0; -#X connect 71 0 55 0; -#X connect 72 0 59 0; -#X connect 72 1 58 0; -#X connect 73 0 47 0; -#X connect 74 0 47 0; -#X connect 75 0 32 0; -#X connect 75 0 87 0; -#X connect 76 0 88 0; -#X connect 77 0 78 0; -#X connect 80 0 23 0; -#X connect 81 0 68 0; -#X connect 82 0 37 0; -#X connect 83 0 35 0; -#X connect 84 0 86 0; -#X connect 86 0 85 0; -#X connect 87 0 51 0; -#X connect 87 1 51 0; -#X connect 88 0 32 0; -#X connect 88 0 87 0; -#X connect 89 0 90 0; -- cgit v1.2.1