Update of /cvsroot/pure-data/abstractions/rradical/effects In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv24872
Added Files: rrad.adsr4~.pd rrad.sc4~.pd Log Message:
blabla: new files
--- NEW FILE: rrad.adsr4~.pd --- #N canvas 500 433 157 126 10; #X obj 2 15 cnv 15 150 100 empty $0-background-cnv empty 20 12 1 14 -228905 -66577 0; #X obj 433 -3 inlet OSC; #N canvas 127 377 981 424 saves 0; #X obj 45 160 originator $1 $0; #X obj 152 132 inlet OSC; #X obj 47 55 r $0-substate; #X obj 15 13 inlet substate; #X obj 15 35 route substate; #X obj 159 55 r $0-copy; #X msg 159 76 copy; #X obj 243 50 r $0-paste; #X msg 241 71 paste; #X text 154 15 This is the originator , including some ready to use standard functionality.; #X text 507 56 Put your commun sends here , if you like.; #X msg 15 91 setsub $1; #X msg 249 184 svdir $1; #X obj 250 139 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 250 163 savepanel; #X obj 152 189 outlet OSC; #X msg 108 214 svxdir /tmp/svdir.xml; #X msg 78 241 ldxdir /tmp/svdir.xml; #X obj 538 176 s $0-ain; #X obj 610 176 s $0-din; #X obj 682 176 s $0-sin; #X obj 776 179 s $0-rin; #X obj 536 107 r $0-a; #X obj 630 105 r $0-d; #X obj 698 106 r $0-s; #X obj 769 106 r $0-r; #X obj 772 142 commun /r $0; #X obj 682 142 commun /s $0; #X obj 582 141 commun /d $0; #X obj 496 137 commun /a $0; #X connect 0 2 15 0; #X connect 1 0 0 1; #X connect 2 0 11 0; #X connect 3 0 4 0; #X connect 4 0 11 0; #X connect 4 1 0 0; #X connect 5 0 6 0; #X connect 6 0 0 0; #X connect 7 0 8 0; #X connect 8 0 0 0; #X connect 11 0 0 0; #X connect 12 0 0 0; #X connect 13 0 14 0; #X connect 14 0 12 0; #X connect 16 0 0 0; #X connect 17 0 0 0; #X connect 22 0 29 0; #X connect 23 0 28 0; #X connect 24 0 27 0; #X connect 25 0 26 0; #X connect 26 0 21 0; #X connect 27 0 20 0; #X connect 28 0 19 0; #X connect 29 0 18 0; #X restore 371 -4 pd saves; #N canvas 569 61 450 300 cnv.ctl 0; #X obj 90 188 s $0-background-cnv; #X floatatom 108 59 5 100 1000 0 width - -; #X floatatom 112 83 4 50 500 0 height - -; #X obj 92 132 pack 0 0; #X msg 92 159 vis_size $1 $2; #X obj 110 106 t b f; #X connect 1 0 3 0; #X connect 2 0 5 0; #X connect 3 0 4 0; #X connect 4 0 0 0; #X connect 5 0 3 0; #X connect 5 1 3 1; #X restore 296 -4 pd cnv.ctl; #X obj 117 34 bng 15 250 50 0 $0-copy empty copy 0 -6 0 8 -225271 -1 -1; #X obj 117 62 bng 15 250 50 0 $0-paste empty paste 0 -6 0 8 -257472 -1 -1; #X text 184 -4 look! ==>; #X obj 371 17 outlet OSC; #X obj 10 37 vsl 8 64 0 100 0 0 $0-a $0-ain a 0 -8 1 8 -355 -260818 -143491 0 1; #X obj 29 37 vsl 8 64 0 127 0 0 $0-d $0-din d 0 -8 1 8 -355 -260818 -143491 0 1; #X obj 49 37 vsl 8 64 0 127 0 0 $0-s $0-sin s 0 -8 1 8 -355 -260818 -143491 0 1; #X obj 69 37 vsl 8 64 0 127 0 0 $0-r $0-rin r 0 -8 1 8 -355 -260818 -143491 0 1; #X obj 189 21 inlet; #X obj 189 72 outlet~; #N canvas 0 0 600 400 envelope 0; #X obj 173 134 r $0-level; #X obj 252 35 r $0-a; #X obj 293 85 r $0-d; #X obj 315 139 r $0-s; #X obj 413 132 r $0-r; #X obj 25 119 inlet; #X obj 174 346 outlet~; #N canvas 231 224 600 400 adsr 0; #X text 52 50 This patch is used as an abstraction in 25.envelope.pd ; #X obj 95 108 inlet; #X obj 298 111 inlet; #X text 91 79 trigger; #X obj 95 138 sel 0; #X obj 144 138 t b; #X obj 104 359 pack 0 $2; #X obj 362 112 inlet; #X obj 309 301 del $2; #X obj 338 324 f $4; #X obj 371 369 pack 0 $3; #X obj 410 112 inlet; #X obj 459 111 inlet; #X obj 504 111 inlet; #X msg 95 191 stop; #X obj 517 360 pack 0 $5; #X text 378 86 Traditional A , D , S , R; #X text 296 88 level; #X text 32 302 ATTACK; #X obj 371 465 outlet~; #X text 7 325 recall level; #X text 7 345 and pack with; #X text 8 365 attack time; #X text 28 124 if zero; #X text 29 141 release; #X text 17 183 and cancel; #X text 17 199 decay; #X text 148 120 bang if attack; #X text 183 294 on attack , set a; #X text 147 307 delay to go to sustain; #X text 189 324 recall sustain value; #X text 185 347 multiply by overall level; #X text 220 370 pack with decay time; #X text 510 386 on release ramp; #X text 511 403 back to zero; #X text 63 12 adsr - arguments: level , attack time , decay time , sustain level , release time; #X text 17 487 When you send this patch a nonzero trigger it schedules a line~ to do an attack and decay , and if zero , it starts the release ramp.; #X text 18 533 Objects such as f and pack can be given dollar sign arguments to initialize their contents from adsr's creation arguments. Inlets are supplied to update them on the fly.; #X obj 104 334 f; #X obj 364 346 * 1; #X obj 371 426 sqrt; #X obj 371 405 sqrt; #X obj 371 445 vline~; #X connect 1 0 4 0; #X connect 2 0 38 0; #X connect 2 0 39 1; #X connect 4 0 14 0; #X connect 4 0 15 0; #X connect 4 1 5 0; #X connect 5 0 8 0; #X connect 6 0 41 0; #X connect 7 0 6 1; #X connect 7 0 8 1; #X connect 8 0 9 0; #X connect 9 0 39 0; #X connect 10 0 41 0; #X connect 11 0 10 1; #X connect 12 0 9 1; #X connect 13 0 15 1; #X connect 14 0 8 0; #X connect 15 0 41 0; #X connect 38 0 6 0; #X connect 39 0 10 0; #X connect 40 0 42 0; #X connect 41 0 40 0; #X connect 42 0 19 0; #X restore 174 292 pd adsr -----------; #X obj 100 181 s $0-level; #X obj 253 62 rrad.scale 0 127 0 200; #X obj 308 164 rrad.scale 0 127 0 1; #X obj 289 119 rrad.scale 0 127 0 200; #X obj 172 168 rrad.scale 0 127 0 1; #X obj 366 202 rrad.scale 0 127 0 1000; #X obj 74 149 select 0; #X connect 0 0 12 0; #X connect 1 0 9 0; #X connect 2 0 11 0; #X connect 3 0 10 0; #X connect 4 0 13 0; #X connect 5 0 14 0; #X connect 5 0 7 0; #X connect 7 0 6 0; #X connect 9 0 7 2; #X connect 10 0 7 4; #X connect 11 0 7 3; #X connect 12 0 7 1; #X connect 13 0 7 5; #X connect 14 1 8 0; #X restore 189 47 pd envelope; #X text 23 -1 Graphical ADSR; #X obj 95 37 vsl 8 64 0 127 0 0 empty $0-level lvl 0 -8 1 8 -62784 -262144 -258699 0 1; #X obj 116 90 nbx 2 14 -1e+37 1e+37 0 0 $0-substate $0-parentstate preset 0 -6 0 8 -261681 -1 -1 0 256; #X connect 1 0 2 1; #X connect 2 0 7 0; #X connect 12 0 14 0; #X connect 14 0 13 0; #X coords 0 0 1 1 152 115 1;
--- NEW FILE: rrad.sc4~.pd --- #N canvas 404 482 252 143 10; #X obj 3 21 cnv 15 247 118 empty $0-background-cnv empty 20 12 1 14 -228992 -66577 0; #X obj 434 3 inlet OSC; #N canvas 183 51 1015 676 saves 0; #X obj 45 160 originator $1 $0; #X obj 152 132 inlet OSC; #X obj 47 55 r $0-substate; #X obj 15 13 inlet substate; #X obj 15 35 route substate; #X obj 159 55 r $0-copy; #X msg 159 76 copy; #X obj 243 50 r $0-paste; #X msg 241 71 paste; #X text 154 15 This is the originator , including some ready to use standard functionality.; #X text 507 56 Put your commun sends here , if you like.; #X msg 15 91 setsub $1; #X msg 249 184 svdir $1; #X obj 250 139 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 250 163 savepanel; #X obj 152 189 outlet OSC; #X msg 108 214 svxdir /tmp/svdir.xml; #X msg 78 241 ldxdir /tmp/svdir.xml; #X obj 698 157 s $0-p; #X obj 507 90 r $0-att; #X msg 698 135 control #2 $1; #X obj 507 112 scale-commun /att $0 1.5 400; #X obj 508 134 s $0-att; #X obj 685 225 s $0-p; #X obj 508 159 r $0-rel; #X obj 508 202 s $0-rel; #X msg 685 204 control #3 $1; #X obj 508 180 scale-commun /rel $0 2 800; #X obj 685 294 s $0-p; #X obj 508 228 r $0-thresh; #X obj 508 271 s $0-thresh; #X msg 685 273 control #4 $1; #X obj 508 249 scale-commun /thresh $0 -30 -1e-04; #X obj 681 364 s $0-p; #X msg 681 343 control #5 $1; #X obj 504 298 r $0-ratio; #X obj 504 341 s $0-ratio; #X obj 504 319 scale-commun /ratio $0 1 20; #X obj 680 440 s $0-p; #X obj 503 374 r $0-knee; #X obj 504 415 s $0-knee; #X msg 680 419 control #6 $1; #X obj 503 395 scale-commun /knee $0 1 10; #X obj 682 513 s $0-p; #X msg 682 492 control #7 $1; #X obj 505 446 r $0-makeup; #X obj 505 496 s $0-makeup; #X floatatom 720 472 5 0 0 0 - - -; #X obj 505 468 scale-commun /makeup $0 0 24; #X obj 710 184 s $0-rel-n; #X obj 756 257 s $0-thresh-n; #X obj 718 324 s $0-ratio-n; #X obj 700 396 s $0-knee-n; #X obj 628 542 s $0-makeup-n; #X obj 362 430 s $0-p; #X obj 171 362 r $0-rms-peak; #X obj 172 407 s $0-rms-peak; #X msg 362 408 control #1 $1; #X obj 391 354 s $0-rms-n; #X obj 171 385 scale-commun /rms-peak $0 0.001 1; #X obj 725 113 s $0-att-n; #X connect 0 2 15 0; #X connect 1 0 0 1; #X connect 2 0 11 0; #X connect 3 0 4 0; #X connect 4 0 11 0; #X connect 4 1 0 0; #X connect 5 0 6 0; #X connect 6 0 0 0; #X connect 7 0 8 0; #X connect 8 0 0 0; #X connect 11 0 0 0; #X connect 12 0 0 0; #X connect 13 0 14 0; #X connect 14 0 12 0; #X connect 16 0 0 0; #X connect 17 0 0 0; #X connect 19 0 21 0; #X connect 20 0 18 0; #X connect 21 0 22 0; #X connect 21 1 20 0; #X connect 21 1 60 0; #X connect 24 0 27 0; #X connect 26 0 23 0; #X connect 27 0 25 0; #X connect 27 1 26 0; #X connect 27 1 49 0; #X connect 29 0 32 0; #X connect 31 0 28 0; #X connect 32 0 30 0; #X connect 32 1 31 0; #X connect 32 1 50 0; #X connect 34 0 33 0; #X connect 35 0 37 0; #X connect 37 0 36 0; #X connect 37 1 34 0; #X connect 37 1 51 0; #X connect 39 0 42 0; #X connect 41 0 38 0; #X connect 42 0 40 0; #X connect 42 1 41 0; #X connect 42 1 52 0; #X connect 44 0 43 0; #X connect 45 0 48 0; #X connect 47 0 44 0; #X connect 48 0 46 0; #X connect 48 1 44 0; #X connect 48 1 53 0; #X connect 55 0 59 0; #X connect 57 0 54 0; #X connect 59 0 56 0; #X connect 59 1 57 0; #X connect 59 1 58 0; #X restore 372 2 pd saves; #N canvas 569 61 450 300 cnv.ctl 0; #X obj 90 188 s $0-background-cnv; #X floatatom 108 59 5 100 1000 0 width - -; #X floatatom 112 83 4 50 500 0 height - -; #X obj 92 132 pack 0 0; #X msg 92 159 vis_size $1 $2; #X obj 110 106 t b f; #X connect 1 0 3 0; #X connect 2 0 5 0; #X connect 3 0 4 0; #X connect 4 0 0 0; #X connect 5 0 3 0; #X connect 5 1 3 1; #X restore 297 2 pd cnv.ctl; #X obj 220 25 vradio 15 1 0 3 $0-substate $0-substate-r empty 0 -6 0 8 -260818 -1 -1 0; #X obj 220 116 bng 15 250 50 0 $0-copy empty copy 0 -6 0 8 -225271 -1 -1; #X obj 220 87 bng 15 250 50 0 $0-paste empty paste 0 -6 0 8 -257472 -1 -1; #X text 185 2 look! ==>; #X obj 372 23 outlet OSC; #N canvas 0 0 450 300 engine 0; #X obj 137 106 plugin~ sc4; #X msg 131 80 print; #X obj 178 27 inlet~; #X obj 231 27 inlet~; #X obj 182 146 outlet~; #X obj 236 147 outlet~; #X obj 77 83 r $0-p; #X obj 53 206 print plug; #X obj 52 141 spigot; #X obj 79 181 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1 ; #X connect 0 1 4 0; #X connect 0 2 5 0; #X connect 1 0 0 0; #X connect 2 0 0 1; #X connect 3 0 0 2; #X connect 6 0 0 0; #X connect 6 0 8 0; #X connect 8 0 7 0; #X connect 9 0 8 1; #X restore 261 59 pd engine; #X obj 249 32 inlet~; #X obj 305 36 inlet~; #X obj 253 87 outlet~; #X obj 309 93 outlet~; #X obj 10 36 vsl 12 64 0 127 0 0 $0-rms-peak $0-rms-peak rms-peak 0 -8 0 8 -233017 -1 -1 0 1; #X obj 30 47 vsl 12 64 0 127 0 0 $0-att $0-att att 0 -8 0 8 -195568 -1 -1 707 1; #X obj 54 48 vsl 12 64 0 127 0 0 $0-rel $0-rel rel 0 -8 0 8 -166441 -1 -1 2100 1; #X obj 82 42 vsl 12 64 0 127 0 0 $0-thresh $0-thresh thresh 0 -8 0 8 -261681 -1 -1 600 1; #X obj 108 53 vsl 12 64 0 127 0 0 $0-ratio $0-ratio ratio 0 -8 0 8 -241291 -1 -1 5328 1; #X obj 139 61 vsl 12 64 0 127 0 0 $0-knee $0-knee knee 0 -8 0 8 -225271 -1 -1 3736 1; #X obj 169 44 vsl 12 64 0 127 0 0 $0-makeup $0-makeup makeup 0 -8 0 8 -257472 -1 -1 2400 1; #X obj 4 115 nbx 3 10 -1e+37 1e+37 0 0 empty $0-rms-n empty 0 -6 0 8 -233017 -1 -1 0.334 256; #X obj 28 127 nbx 3 10 -1e+37 1e+37 0 0 empty $0-att-n empty 0 -6 0 8 -195568 -1 -1 46.2206 256; #X obj 56 118 nbx 3 10 -1e+37 1e+37 0 0 empty $0-rel-n empty 0 -6 0 8 -195568 -1 -1 268 256; #X obj 77 127 nbx 3 10 -1e+37 1e+37 0 0 empty $0-thresh-n empty 0 -6 0 8 -261681 -1 -1 -27.1429 256; #X obj 109 129 nbx 3 10 -1e+37 1e+37 0 0 empty $0-ratio-n empty 0 -6 0 8 -241291 -1 -1 17.0686 256; #X obj 147 130 nbx 3 10 -1e+37 1e+37 0 0 empty $0-knee-n empty 0 -6 0 8 -225271 -1 -1 6.33714 256; #X obj 166 116 nbx 3 10 -1e+37 1e+37 0 0 empty $0-makeup-n empty 0 -6 0 8 -257472 -1 -1 9.14286 256; #X connect 1 0 2 1; #X connect 2 0 8 0; #X connect 9 0 12 0; #X connect 9 1 13 0; #X connect 10 0 9 0; #X connect 11 0 9 1; #X coords 0 0 1 1 250 140 1;