From d061c2c746c0ecb5f5c6d19b8794edbd4c1bd00c Mon Sep 17 00:00:00 2001 From: Cyrille Henry Date: Wed, 21 May 2014 20:56:31 +0000 Subject: svn path=/trunk/externals/pmpd/; revision=17314 --- examples/67_scann_synth.pd | 386 ++++++++++++--------------------------------- 1 file changed, 98 insertions(+), 288 deletions(-) diff --git a/examples/67_scann_synth.pd b/examples/67_scann_synth.pd index 043d8bc..9cedade 100644 --- a/examples/67_scann_synth.pd +++ b/examples/67_scann_synth.pd @@ -1,5 +1,5 @@ -#N canvas 707 467 975 500 10; -#N canvas 724 239 694 538 create_corde 0; +#N canvas 928 576 807 445 10; +#N canvas 766 276 694 538 create_corde 0; #X obj 352 461 t a; #X msg 505 158 reset; #X obj 167 55 t b b b b b b; @@ -8,13 +8,7 @@ -1; #X obj 352 485 outlet; #X obj 293 256 % 128; -#X msg 208 351 setL souple 0.001; -#X msg 159 380 link souple2 fix mob 0.003 0.16; #X obj 293 278 pack f f; -#X msg 293 299 link souple \$1 \$2 0.01 0.2 0.5; -#X msg 415 211 mass mob 1 1 0 0; -#X msg 381 237 Xmax 2 \, Xmin -2 \, Ymin 0 \, Ymax 0; -#X msg 240 331 mass fix 0 0 0 0; #X msg 416 150 128; #X obj 416 185 until; #N canvas 157 402 342 362 _until 0; @@ -44,225 +38,47 @@ #X restore 293 193 pd _until; #X obj 293 233 + 1; #X obj 293 213 t f f; +#X msg 292 299 link souple \$1 \$2 0.01 0.2; +#X msg 208 351 setL souple 0; +#X msg 416 211 mass mob 1 1 0; +#X msg 241 331 mass fix 0 0 0; +#X msg 383 237 Xmax 5 \, Xmin -5; +#X msg 159 380 link souple2 fix mob 0.0001 0.001; #X connect 0 0 5 0; #X connect 1 0 0 0; -#X connect 2 0 8 0; -#X connect 2 0 7 0; -#X connect 2 1 13 0; -#X connect 2 2 16 0; -#X connect 2 3 12 0; -#X connect 2 4 14 0; +#X connect 2 0 18 0; +#X connect 2 0 14 0; +#X connect 2 1 16 0; +#X connect 2 2 10 0; +#X connect 2 3 17 0; +#X connect 2 4 8 0; #X connect 2 5 1 0; #X connect 3 0 2 0; #X connect 4 0 2 0; -#X connect 6 0 9 0; -#X connect 7 0 0 0; -#X connect 8 0 0 0; -#X connect 9 0 10 0; -#X connect 10 0 0 0; -#X connect 11 0 0 0; -#X connect 12 0 0 0; +#X connect 6 0 7 0; +#X connect 7 0 13 0; +#X connect 8 0 9 0; +#X connect 9 0 15 0; +#X connect 10 0 12 0; +#X connect 11 0 6 0; +#X connect 12 0 11 0; +#X connect 12 1 7 1; #X connect 13 0 0 0; -#X connect 14 0 15 0; -#X connect 15 0 11 0; -#X connect 16 0 18 0; -#X connect 17 0 6 0; -#X connect 18 0 17 0; -#X connect 18 1 9 1; +#X connect 14 0 0 0; +#X connect 15 0 0 0; +#X connect 16 0 0 0; +#X connect 17 0 0 0; +#X connect 18 0 0 0; #X restore 66 97 pd create_corde; #X obj 66 43 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 -1; #X obj 173 91 metro 3; -#X obj 66 168 pmpd2d --------; -#X msg 322 384 forceX \$1 \$2; -#X floatatom 338 253 5 0 0 0 - - -, f 5; -#X floatatom 355 270 5 0 0 0 - - -, f 5; -#X floatatom 371 287 5 0 0 0 - - -, f 5; -#X floatatom 388 304 5 0 0 0 - - -, f 5; -#X floatatom 404 321 5 0 0 0 - - -, f 5; -#N canvas 639 421 970 723 bass 0; -#X obj 24 707 outlet; -#X obj 41 191 f; -#X obj 70 221 + 1; -#X msg 49 108 0; -#X obj 39 167 until; -#X obj 26 687 pack f f; -#X obj 72 508 *; -#X obj 39 249 t f f; -#X obj 70 296 * 6.283; -#X obj 67 478 sin; -#X obj 122 151 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 -1; -#X obj 122 217 line; -#X obj 66 449 +; -#X obj 264 35 inlet; -#X obj 323 36 inlet; -#X obj 383 35 inlet; -#X obj 442 37 inlet; -#X obj 105 508 *; -#X obj 100 478 sin; -#X obj 140 509 *; -#X obj 135 479 sin; -#X obj 175 509 *; -#X obj 96 363 * 2; -#X obj 112 536 +; -#X obj 111 562 +; -#X obj 80 582 +; -#X obj 240 150 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 -1; -#X obj 240 216 line; -#X obj 355 152 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 -1; -#X obj 355 218 line; -#X obj 473 155 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 -1; -#X obj 473 221 line; -#X obj 97 449 +; -#X obj 133 449 +; -#X obj 169 451 +; -#X obj 238 240 * -1; -#X obj 475 247 * -1; -#X obj 251 438 random 1000; -#X obj 250 460 - 500; -#X obj 251 482 / 500; -#X obj 538 38 inlet; -#X obj 80 604 +; -#X obj 252 504 * 1e-05; -#X msg 39 145 128; -#X obj 71 271 / 127; -#X obj 240 170 metro 13043; -#X msg 239 194 0 \, 6.283 13043; -#X obj 122 171 metro 13524; -#X msg 121 193 0 \, 6.283 13524; -#X obj 355 172 metro 8554; -#X msg 356 197 0 \, 6.283 8554; -#X obj 473 175 metro 12026; -#X msg 473 198 0 \, 6.283 12026; -#X obj 170 479 sin; -#X obj 345 440 random 5; -#X obj 255 540 *; -#X obj 348 465 > 1; -#X obj 78 647 / 7; -#X obj 131 364 * 3.5; -#X obj 179 364 * 5; -#X obj 80 625 +; -#X obj 438 464 random 1000; -#X obj 437 544 *; -#X obj 436 438 t b; -#X obj 611 44 inlet; -#X obj 436 489 - 500; -#X obj 433 517 / 500; -#X obj 52 6 inlet; -#X obj 57 79 t b; -#X obj 124 128 loadbang; -#X obj 242 127 loadbang; -#X obj 357 129 loadbang; -#X obj 475 132 loadbang; -#X msg 479 429 seed 2.73255e+07; -#X obj 99 310 t f f f f f f f b f; -#X obj 262 58 / 3000; -#X obj 323 59 / 3000; -#X obj 384 58 / 5000; -#X obj 444 60 / 5000; -#X obj 538 61 / 500; -#X obj 609 65 / 3000; -#X connect 1 0 2 0; -#X connect 1 0 7 0; -#X connect 2 0 1 1; -#X connect 3 0 1 1; -#X connect 3 0 43 0; -#X connect 4 0 1 0; -#X connect 5 0 0 0; -#X connect 6 0 25 0; -#X connect 7 0 5 0; -#X connect 7 1 44 0; -#X connect 8 0 74 0; -#X connect 9 0 6 0; -#X connect 10 0 47 0; -#X connect 11 0 12 1; -#X connect 12 0 9 0; -#X connect 13 0 75 0; -#X connect 14 0 76 0; -#X connect 15 0 77 0; -#X connect 16 0 78 0; -#X connect 17 0 23 0; -#X connect 18 0 17 0; -#X connect 19 0 23 1; -#X connect 20 0 19 0; -#X connect 21 0 24 1; -#X connect 22 0 32 0; -#X connect 23 0 24 0; -#X connect 24 0 25 1; -#X connect 25 0 41 0; -#X connect 26 0 45 0; -#X connect 27 0 35 0; -#X connect 28 0 49 0; -#X connect 29 0 33 1; -#X connect 30 0 51 0; -#X connect 31 0 36 0; -#X connect 32 0 18 0; -#X connect 33 0 20 0; -#X connect 34 0 53 0; -#X connect 35 0 32 1; -#X connect 36 0 34 1; -#X connect 37 0 38 0; -#X connect 38 0 39 0; -#X connect 39 0 42 0; -#X connect 40 0 79 0; -#X connect 41 0 60 0; -#X connect 42 0 55 0; -#X connect 43 0 4 0; -#X connect 44 0 8 0; -#X connect 45 0 46 0; -#X connect 46 0 27 0; -#X connect 47 0 48 0; -#X connect 48 0 11 0; -#X connect 49 0 50 0; -#X connect 50 0 29 0; -#X connect 51 0 52 0; -#X connect 52 0 31 0; -#X connect 53 0 21 0; -#X connect 54 0 56 0; -#X connect 55 0 41 1; -#X connect 56 0 55 1; -#X connect 57 0 5 1; -#X connect 58 0 33 0; -#X connect 59 0 34 0; -#X connect 60 0 57 0; -#X connect 61 0 65 0; -#X connect 62 0 60 1; -#X connect 63 0 61 0; -#X connect 64 0 80 0; -#X connect 65 0 66 0; -#X connect 66 0 62 0; -#X connect 67 0 68 0; -#X connect 68 0 3 0; -#X connect 68 0 54 0; -#X connect 68 0 73 0; -#X connect 69 0 10 0; -#X connect 70 0 26 0; -#X connect 71 0 28 0; -#X connect 72 0 30 0; -#X connect 73 0 61 0; -#X connect 74 0 12 0; -#X connect 74 1 22 0; -#X connect 74 2 58 0; -#X connect 74 3 59 0; -#X connect 74 7 37 0; -#X connect 74 8 63 0; -#X connect 75 0 6 1; -#X connect 76 0 17 1; -#X connect 77 0 19 1; -#X connect 78 0 21 1; -#X connect 79 0 42 1; -#X connect 80 0 62 1; -#X restore 322 362 pd bass ---------; -#X obj 574 217 gemwin; -#X msg 627 154 destroy; +#X msg 657 241 forceX \$1 \$2; +#X obj 314 295 gemwin; +#X msg 367 232 destroy; #X obj 82 70 loadbang; -#X floatatom 421 339 5 0 0 0 - - -, f 5; -#X obj 575 337 dac~; -#X obj 322 406 s \$0-pmpd; +#X obj 458 277 dac~; +#X obj 657 263 s \$0-pmpd; #X obj 77 122 r \$0-pmpd; #N canvas 756 311 787 602 sound 0; #X obj 103 18 loadbang; @@ -308,7 +124,7 @@ #X connect 18 0 15 1; #X connect 18 0 16 1; #X connect 18 0 17 1; -#X restore 574 277 pd sound; +#X restore 457 217 pd sound; #N canvas 805 430 528 522 render_gem 0; #X obj 51 32 gemhead; #N canvas 784 146 473 504 gemlist 0; @@ -376,7 +192,7 @@ #X connect 16 0 14 2; #X connect 17 0 14 1; #X connect 18 0 13 0; -#X restore 575 381 pd render_gem; +#X restore 316 328 pd render_gem; #X obj 102 407 table corde_table 131; #X obj 66 210 route mob; #X obj 66 234 route 0 1 2; @@ -393,81 +209,75 @@ #X msg 173 115 bang \, massesPosXT corde_table \, massPos 0 \, massPos 1 \, massPos 2; #X obj 66 189 route massPos; -#X obj 575 300 *~ 0.1; -#X obj 620 300 *~ 0.1; -#X msg 764 342 setK souple \$1; -#X obj 764 323 / 100; -#X obj 764 283 / 10; -#X obj 764 303 + 1; -#X msg 861 341 setD souple2 \$1; -#X obj 792 141 vsl 15 128 0 127 0 0 empty empty empty 0 -9 0 10 -262144 +#X obj 458 240 *~ 0.1; +#X obj 503 240 *~ 0.1; +#X msg 577 353 setK souple \$1; +#X obj 577 314 + 1; +#X obj 605 152 vsl 15 128 0 127 0 0 empty empty empty 0 -9 0 10 -262144 -1 -1 0 1; -#X obj 861 317 / 95; -#X obj 764 141 vsl 15 128 0 127 0 0 empty empty empty 0 -9 0 10 -262144 +#X obj 577 152 vsl 15 128 0 127 0 0 empty empty empty 0 -9 0 10 -262144 -1 -1 0 1; -#X msg 574 131 reset \, create \, 1; -#X obj 861 362 s \$0-pmpd; -#X obj 764 362 s \$0-pmpd; -#X text 764 114 K; -#X text 794 113 D; +#X msg 314 209 reset \, create \, 1; +#X obj 674 373 s \$0-pmpd; +#X obj 577 373 s \$0-pmpd; +#X text 577 125 K; +#X text 607 124 D; #X text 311 4 scann synthesis example; -#X text 237 453 instrument based on chdh vivarium patch; -#X msg 593 186 dsp 1; -#X obj 641 217 s pd; -#X msg 641 186 dsp 0; -#X obj 574 39 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 +#X msg 333 264 dsp 1; +#X obj 381 295 s pd; +#X msg 381 264 dsp 0; +#X obj 314 51 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1 1; -#X obj 574 102 route 1 0; +#X obj 314 180 route 1 0; #X text 86 43 reset; -#X connect 0 0 3 0; +#X obj 66 168 pmpd --------; +#X msg 674 352 setD souple \$1; +#X floatatom 657 201 5 -1 1 0 - - -, f 5; +#X msg 657 219 0 \$1; +#X obj 579 333 / 500; +#X obj 674 328 / 500; +#X connect 0 0 45 0; #X connect 1 0 0 0; -#X connect 2 0 33 0; -#X connect 2 0 10 0; -#X connect 3 0 34 0; -#X connect 4 0 16 0; -#X connect 5 0 10 1; -#X connect 6 0 10 2; -#X connect 7 0 10 3; -#X connect 8 0 10 4; -#X connect 9 0 10 5; -#X connect 10 0 4 0; -#X connect 12 0 11 0; -#X connect 13 0 0 0; -#X connect 14 0 10 6; -#X connect 17 0 3 0; -#X connect 18 0 35 0; -#X connect 18 1 36 0; -#X connect 21 0 22 0; -#X connect 22 0 30 0; -#X connect 22 1 31 0; -#X connect 22 2 32 0; -#X connect 24 0 23 1; -#X connect 27 0 25 1; -#X connect 28 0 26 1; -#X connect 29 0 24 0; -#X connect 29 0 27 0; -#X connect 29 0 28 0; -#X connect 30 0 23 0; -#X connect 31 0 25 0; -#X connect 32 0 26 0; -#X connect 33 0 3 0; -#X connect 34 0 21 0; -#X connect 35 0 15 0; -#X connect 36 0 15 1; -#X connect 37 0 47 0; -#X connect 38 0 37 0; +#X connect 2 0 25 0; +#X connect 3 0 8 0; +#X connect 5 0 4 0; +#X connect 6 0 0 0; +#X connect 9 0 45 0; +#X connect 10 0 27 0; +#X connect 10 1 28 0; +#X connect 13 0 14 0; +#X connect 14 0 22 0; +#X connect 14 1 23 0; +#X connect 14 2 24 0; +#X connect 16 0 15 1; +#X connect 19 0 17 1; +#X connect 20 0 18 1; +#X connect 21 0 16 0; +#X connect 21 0 19 0; +#X connect 21 0 20 0; +#X connect 22 0 15 0; +#X connect 23 0 17 0; +#X connect 24 0 18 0; +#X connect 25 0 45 0; +#X connect 26 0 13 0; +#X connect 27 0 7 0; +#X connect 28 0 7 1; +#X connect 29 0 35 0; +#X connect 30 0 49 0; +#X connect 31 0 50 0; +#X connect 32 0 30 0; +#X connect 33 0 4 0; #X connect 39 0 40 0; -#X connect 40 0 38 0; -#X connect 41 0 46 0; +#X connect 41 0 40 0; #X connect 42 0 43 0; -#X connect 43 0 41 0; -#X connect 44 0 39 0; -#X connect 45 0 11 0; -#X connect 52 0 53 0; -#X connect 54 0 53 0; -#X connect 55 0 56 0; -#X connect 55 0 2 0; -#X connect 56 0 45 0; -#X connect 56 0 52 0; -#X connect 56 1 54 0; -#X connect 56 1 12 0; +#X connect 42 0 2 0; +#X connect 43 0 33 0; +#X connect 43 0 39 0; +#X connect 43 1 41 0; +#X connect 43 1 5 0; +#X connect 45 0 26 0; +#X connect 46 0 34 0; +#X connect 47 0 48 0; +#X connect 48 0 3 0; +#X connect 49 0 29 0; +#X connect 50 0 46 0; -- cgit v1.2.1