From 779b45410e8c76b2984d26823e97310c7601b38f Mon Sep 17 00:00:00 2001 From: Cyrille Henry Date: Fri, 10 Apr 2009 17:52:07 +0000 Subject: initial commit of the puremapping abstraction collection svn path=/trunk/abstractions/nusmuk/; revision=11004 --- puremapping/pmcloud_1d.pd | 107 ++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 107 insertions(+) create mode 100644 puremapping/pmcloud_1d.pd (limited to 'puremapping/pmcloud_1d.pd') diff --git a/puremapping/pmcloud_1d.pd b/puremapping/pmcloud_1d.pd new file mode 100644 index 0000000..08854a2 --- /dev/null +++ b/puremapping/pmcloud_1d.pd @@ -0,0 +1,107 @@ +#N canvas 374 197 743 397 10; +#X obj 45 9 inlet; +#X obj 42 350 outlet; +#X obj 468 7 inlet; +#X msg 468 54 setK lnk \$1; +#X obj 561 8 inlet; +#X obj 379 3 inlet; +#N canvas 670 136 639 733 create_clouds 0; +#X obj 70 30 loadbang; +#X obj 175 649 t a; +#X obj 173 677 outlet; +#X obj 32 50 t b b b b b b; +#N canvas 0 0 259 330 loop 0; +#X obj 74 149 f; +#X obj 74 213 + 1; +#X obj 74 171 moses \$1; +#X obj 74 104 t b f; +#X obj 104 281 outlet; +#X obj 74 82 inlet; +#X msg 74 126 0; +#X obj 74 191 t f f; +#X obj 96 240 t f; +#X connect 0 0 2 0; +#X connect 1 0 8 0; +#X connect 2 0 7 0; +#X connect 3 0 6 0; +#X connect 3 1 2 1; +#X connect 5 0 3 0; +#X connect 6 0 0 0; +#X connect 7 0 1 0; +#X connect 7 1 4 0; +#X connect 8 0 0 0; +#X restore 85 126 pd loop; +#X obj 85 103 \$1; +#X obj 145 229 random 1000; +#X obj 145 253 / 1000; +#X msg 126 419 link lnk cloud in \$1 0; +#X msg 89 471 link lnk cloud cloud \$1 0; +#X obj 126 391 \$2; +#X obj 85 446 \$2; +#X obj 48 421 \$3; +#X obj 145 177 * 654543; +#X msg 85 156 bang; +#X msg 145 201 seed \$1; +#X obj 145 145 \$1; +#X obj 39 12 inlet; +#X msg 145 312 mass cloud 1 1 \$1; +#X msg 175 94 reset \, mass in 0 1 0 \, mass fixe 0 0 0; +#X msg 48 504 link damp fixe cloud 0 \$1; +#X connect 0 0 3 0; +#X connect 1 0 2 0; +#X connect 3 1 11 0; +#X connect 3 1 12 0; +#X connect 3 2 10 0; +#X connect 3 3 5 0; +#X connect 3 4 19 0; +#X connect 3 5 16 0; +#X connect 4 0 14 0; +#X connect 5 0 4 0; +#X connect 6 0 7 0; +#X connect 7 0 18 0; +#X connect 8 0 1 0; +#X connect 9 0 1 0; +#X connect 10 0 8 0; +#X connect 11 0 9 0; +#X connect 12 0 20 0; +#X connect 13 0 15 0; +#X connect 14 0 6 0; +#X connect 15 0 6 0; +#X connect 16 0 13 0; +#X connect 17 0 3 0; +#X connect 18 0 1 0; +#X connect 19 0 1 0; +#X connect 20 0 1 0; +#X restore 46 169 pd create_clouds; +#X obj 42 300 route massesPosId; +#X obj 42 324 route cloud; +#X obj 161 90 t b l; +#X msg 192 138 posX in \$1; +#X msg 561 54 setD damp \$1; +#X msg 380 54 setL lnk \$1; +#X msg 161 114 bang \, get massesPos cloud; +#X obj 68 143 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 +-1; +#X msg 99 61 forceX cloud \$1; +#X obj 42 278 msd; +#X obj 46 30 route reset force; +#X connect 0 0 17 0; +#X connect 2 0 3 0; +#X connect 3 0 16 0; +#X connect 4 0 11 0; +#X connect 5 0 12 0; +#X connect 6 0 16 0; +#X connect 7 0 8 0; +#X connect 8 0 1 0; +#X connect 9 0 13 0; +#X connect 9 1 10 0; +#X connect 10 0 16 0; +#X connect 11 0 16 0; +#X connect 12 0 16 0; +#X connect 13 0 16 0; +#X connect 14 0 6 0; +#X connect 15 0 16 0; +#X connect 16 0 7 0; +#X connect 17 0 6 0; +#X connect 17 1 15 0; +#X connect 17 2 9 0; -- cgit v1.2.1