Mercurial > hg > beaglert
changeset 168:eb62ed0d67e3
- edited karplusStrong pd example
| author | chnrx <chris.heinrichs@gmail.com> |
|---|---|
| date | Thu, 03 Dec 2015 19:13:14 +0000 |
| parents | 28d1473742bc |
| children | e80340fe527a |
| files | projects/heavy/pd/karplusStrong/_main.pd projects/heavy/pd/karplusStrong/count.pd |
| diffstat | 2 files changed, 236 insertions(+), 6 deletions(-) [+] |
line wrap: on
line diff
--- a/projects/heavy/pd/karplusStrong/_main.pd Thu Dec 03 17:22:07 2015 +0000 +++ b/projects/heavy/pd/karplusStrong/_main.pd Thu Dec 03 19:13:14 2015 +0000 @@ -11,13 +11,12 @@ #X obj 118 389 s~ \$0-fb1; #X obj 38 94 adc~ 3; #X obj 38 116 hip~ 100; -#X obj 98 146 r~ \$0-fb1; -#X obj 38 168 delwrite~ \$0-wg1 100; +#X obj 98 176 r~ \$0-fb1; +#X obj 38 198 delwrite~ \$0-wg1 100; #X obj 38 268 *~; #X obj 38 290 *~ 10; #X text 99 116 <<< centre (i.e. DC block) signal with high-pass filter ; -#X obj 38 246 adc~ 4; #X text 100 94 <<< use accelerometer \, piezo or FSR on first analog in; #X text 105 245 <<< use potentiometer or fader on second analog in @@ -26,15 +25,216 @@ #X text 100 225 DELAY PERIOD:; #X text 182 365 <<< and decay here [0-0.9999]; #X text 182 345 <<< set damping here [~100-20000]; +#N canvas 335 566 461 274 gate 0; +#N canvas 0 22 450 278 (subpatch) 0; +#X array \$0-xfer 1024 float 3; +#A 0 0 -0.808242 -0.804734 -0.801234 -0.797741 -0.794256 -0.790778 +-0.787309 -0.783846 -0.780392 -0.776945 -0.773506 -0.770074 -0.76665 +-0.763233 -0.759824 -0.756423 -0.75303 -0.749644 -0.746266 -0.742895 +-0.739532 -0.736176 -0.732829 -0.729488 -0.726156 -0.722831 -0.719514 +-0.716204 -0.712902 -0.709608 -0.706321 -0.703042 -0.69977 -0.696507 +-0.69325 -0.690002 -0.686761 -0.683527 -0.680302 -0.677084 -0.673873 +-0.67067 -0.667475 -0.664288 -0.661108 -0.657935 -0.654771 -0.651614 +-0.648464 -0.645323 -0.642188 -0.639062 -0.635943 -0.632832 -0.629728 +-0.626632 -0.623544 -0.620463 -0.61739 -0.614324 -0.611266 -0.608216 +-0.605174 -0.602139 -0.599111 -0.596092 -0.59308 -0.590075 -0.587078 +-0.584089 -0.581107 -0.578134 -0.575167 -0.572209 -0.569257 -0.566314 +-0.563378 -0.56045 -0.55753 -0.554617 -0.551711 -0.548814 -0.545924 +-0.543041 -0.540167 -0.537299 -0.53444 -0.531588 -0.528744 -0.525907 +-0.523078 -0.520257 -0.517443 -0.514637 -0.511839 -0.509048 -0.506265 +-0.503489 -0.500721 -0.497961 -0.495208 -0.492463 -0.489726 -0.486996 +-0.484274 -0.481559 -0.478852 -0.476153 -0.473461 -0.470777 -0.468101 +-0.465432 -0.462771 -0.460117 -0.457472 -0.454833 -0.452203 -0.44958 +-0.446964 -0.444357 -0.441757 -0.439164 -0.436579 -0.434002 -0.431432 +-0.42887 -0.426316 -0.42377 -0.42123 -0.418699 -0.416175 -0.413659 +-0.41115 -0.40865 -0.406156 -0.403671 -0.401193 -0.398722 -0.396259 +-0.393804 -0.391357 -0.388917 -0.386485 -0.38406 -0.381643 -0.379234 +-0.376832 -0.374438 -0.372051 -0.369673 -0.367301 -0.364938 -0.362582 +-0.360233 -0.357893 -0.35556 -0.353234 -0.350916 -0.348606 -0.346304 +-0.344009 -0.341721 -0.339442 -0.33717 -0.334905 -0.332649 -0.330399 +-0.328158 -0.325924 -0.323698 -0.321479 -0.319268 -0.317065 -0.314869 +-0.312681 -0.3105 -0.308328 -0.306162 -0.304005 -0.301855 -0.299713 +-0.297578 -0.295451 -0.293331 -0.291219 -0.289115 -0.287019 -0.28493 +-0.282848 -0.280775 -0.278709 -0.27665 -0.2746 -0.272556 -0.270521 +-0.268493 -0.266473 -0.26446 -0.262455 -0.260458 -0.258468 -0.256486 +-0.254511 -0.252545 -0.250585 -0.248634 -0.24669 -0.244753 -0.242825 +-0.240904 -0.23899 -0.237084 -0.235186 -0.233296 -0.231413 -0.229537 +-0.22767 -0.22581 -0.223957 -0.222112 -0.220275 -0.218446 -0.216624 +-0.21481 -0.213003 -0.211204 -0.209413 -0.207629 -0.205853 -0.204084 +-0.202323 -0.20057 -0.198824 -0.197086 -0.195356 -0.193633 -0.191918 +-0.190211 -0.188511 -0.186819 -0.185134 -0.183457 -0.181788 -0.180126 +-0.178472 -0.176826 -0.175187 -0.173556 -0.171932 -0.170316 -0.168708 +-0.167108 -0.165515 -0.163929 -0.162351 -0.160781 -0.159219 -0.157664 +-0.156117 -0.154577 -0.153045 -0.151521 -0.150004 -0.148495 -0.146993 +-0.1455 -0.144013 -0.142535 -0.141064 -0.139601 -0.138145 -0.136697 +-0.135256 -0.133824 -0.132398 -0.130981 -0.129571 -0.128169 -0.126774 +-0.125387 -0.124008 -0.122636 -0.121272 -0.119915 -0.118566 -0.117225 +-0.115891 -0.114565 -0.113247 -0.111936 -0.110633 -0.109338 -0.10805 +-0.10677 -0.105497 -0.104232 -0.102975 -0.101725 -0.100483 -0.0992487 +-0.0980219 -0.0968027 -0.0955911 -0.0943872 -0.0931909 -0.0920023 -0.0908212 +-0.0896478 -0.0884821 -0.0873239 -0.0861734 -0.0850305 -0.0838953 -0.0827676 +-0.0816476 -0.0805353 -0.0794305 -0.0783334 -0.077244 -0.0761621 -0.0750879 +-0.0740213 -0.0729623 -0.071911 -0.0708673 -0.0698312 -0.0688028 -0.067782 +-0.0667688 -0.0657632 -0.0647653 -0.063775 -0.0627924 -0.0618173 -0.0608499 +-0.0598901 -0.058938 -0.0579935 -0.0570566 -0.0561273 -0.0552057 -0.0542917 +-0.0533853 -0.0524866 -0.0515955 -0.050712 -0.0498361 -0.0489679 -0.0481073 +-0.0472543 -0.046409 -0.0455713 -0.0447412 -0.0439188 -0.0431039 -0.0422968 +-0.0414972 -0.0407053 -0.039921 -0.0391443 -0.0383752 -0.0376138 -0.03686 +-0.0361139 -0.0353754 -0.0346445 -0.0339212 -0.0332056 -0.0324976 -0.0317972 +-0.0311044 -0.0304193 -0.0297418 -0.029072 -0.0284097 -0.0277551 -0.0271082 +-0.0264688 -0.0258371 -0.025213 -0.0245966 -0.0239877 -0.0233865 -0.022793 +-0.022207 -0.0216287 -0.021058 -0.020495 -0.0199396 -0.0193918 -0.0188516 +-0.0183191 -0.0177942 -0.0172769 -0.0167673 -0.0162653 -0.0157709 -0.0152841 +-0.014805 -0.0143335 -0.0138696 -0.0134134 -0.0129648 -0.0125238 -0.0120905 +-0.0116647 -0.0112466 -0.0108362 -0.0104333 -0.0100381 -0.00965057 +-0.00927063 -0.00889832 -0.00853363 -0.00817657 -0.00782715 -0.00748535 +-0.00715118 -0.00682465 -0.00650574 -0.00619446 -0.00589081 -0.00559479 +-0.0053064 -0.00502563 -0.0047525 -0.004487 -0.00422913 -0.00397888 +-0.00373627 -0.00350128 -0.00327393 -0.0030542 -0.0028421 -0.00263763 +-0.0024408 -0.00225159 -0.00207001 -0.00189606 -0.00172974 -0.00157104 +-0.00141998 -0.00127655 -0.00114075 -0.00101257 -0.000892029 -0.000779114 +-0.000673828 -0.000576172 -0.000486145 -0.000403747 -0.000328979 -0.000261841 +-0.000202332 -0.000150452 -0.000106201 -6.95801e-05 -4.05884e-05 -1.92261e-05 +-5.49316e-06 0 -0 -0 -0 -0 -0 -0 -0 -0 -0 -0 -0 -0 -0 -0 -0 -0 -0 -0 +-0 -0 -0 -0 -0 -0 -0 -0 -0 -0 -0 -0 -0 -0 -0 -0 -0 -0 -0 -0 -0 -0 -0 +-0 -0 -0 -0 -0 -0 -0 -0 -0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 +0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 5.49316e-06 +1.92261e-05 4.05884e-05 6.95801e-05 0.000106201 0.000150452 0.000202332 +0.000261841 0.000328979 0.000403747 0.000486145 0.000576172 0.000673828 +0.000779114 0.000892029 0.00101257 0.00114075 0.00127655 0.00141998 +0.00157104 0.00172974 0.00189606 0.00207001 0.00225159 0.0024408 0.00263763 +0.0028421 0.0030542 0.00327393 0.00350128 0.00373627 0.00397888 0.00422913 +0.004487 0.0047525 0.00502563 0.0053064 0.00559479 0.00589081 0.00619446 +0.00650574 0.00682465 0.00715118 0.00748535 0.00782715 0.00817657 0.00853363 +0.00889832 0.00927063 0.00965057 0.0100381 0.0104333 0.0108362 0.0112466 +0.0116647 0.0120905 0.0125238 0.0129648 0.0134134 0.0138696 0.0143335 +0.014805 0.0152841 0.0157709 0.0162653 0.0167673 0.0172769 0.0177942 +0.0183191 0.0188516 0.0193918 0.0199396 0.020495 0.021058 0.0216287 +0.022207 0.022793 0.0233865 0.0239877 0.0245966 0.025213 0.0258371 +0.0264688 0.0271082 0.0277551 0.0284097 0.029072 0.0297418 0.0304193 +0.0311044 0.0317972 0.0324976 0.0332056 0.0339212 0.0346445 0.0353754 +0.0361139 0.03686 0.0376138 0.0383752 0.0391443 0.039921 0.0407053 +0.0414972 0.0422968 0.0431039 0.0439188 0.0447412 0.0455713 0.046409 +0.0472543 0.0481073 0.0489679 0.0498361 0.050712 0.0515955 0.0524866 +0.0533853 0.0542917 0.0552057 0.0561273 0.0570566 0.0579935 0.058938 +0.0598901 0.0608499 0.0618173 0.0627924 0.063775 0.0647653 0.0657632 +0.0667688 0.067782 0.0688028 0.0698312 0.0708673 0.071911 0.0729623 +0.0740213 0.0750879 0.0761621 0.077244 0.0783334 0.0794305 0.0805353 +0.0816476 0.0827676 0.0838953 0.0850305 0.0861734 0.0873239 0.0884821 +0.0896478 0.0908212 0.0920023 0.0931909 0.0943872 0.0955911 0.0968027 +0.0980219 0.0992487 0.100483 0.101725 0.102975 0.104232 0.105497 0.10677 +0.10805 0.109338 0.110633 0.111936 0.113247 0.114565 0.115891 0.117225 +0.118566 0.119915 0.121272 0.122636 0.124008 0.125387 0.126774 0.128169 +0.129571 0.130981 0.132398 0.133824 0.135256 0.136697 0.138145 0.139601 +0.141064 0.142535 0.144013 0.1455 0.146993 0.148495 0.150004 0.151521 +0.153045 0.154577 0.156117 0.157664 0.159219 0.160781 0.162351 0.163929 +0.165515 0.167108 0.168708 0.170316 0.171932 0.173556 0.175187 0.176826 +0.178472 0.180126 0.181788 0.183457 0.185134 0.186819 0.188511 0.190211 +0.191918 0.193633 0.195356 0.197086 0.198824 0.20057 0.202323 0.204084 +0.205853 0.207629 0.209413 0.211204 0.213003 0.21481 0.216624 0.218446 +0.220275 0.222112 0.223957 0.22581 0.22767 0.229537 0.231413 0.233296 +0.235186 0.237084 0.23899 0.240904 0.242825 0.244753 0.24669 0.248634 +0.250585 0.252545 0.254511 0.256486 0.258468 0.260458 0.262455 0.26446 +0.266473 0.268493 0.270521 0.272556 0.2746 0.27665 0.278709 0.280775 +0.282848 0.28493 0.287019 0.289115 0.291219 0.293331 0.295451 0.297578 +0.299713 0.301855 0.304005 0.306162 0.308328 0.3105 0.312681 0.314869 +0.317065 0.319268 0.321479 0.323698 0.325924 0.328158 0.330399 0.332649 +0.334905 0.33717 0.339442 0.341721 0.344009 0.346304 0.348606 0.350916 +0.353234 0.35556 0.357893 0.360233 0.362582 0.364938 0.367301 0.369673 +0.372051 0.374438 0.376832 0.379234 0.381643 0.38406 0.386485 0.388917 +0.391357 0.393804 0.396259 0.398722 0.401193 0.403671 0.406156 0.40865 +0.41115 0.413659 0.416175 0.418699 0.42123 0.42377 0.426316 0.42887 +0.431432 0.434002 0.436579 0.439164 0.441757 0.444357 0.446964 0.44958 +0.452203 0.454833 0.457472 0.460117 0.462771 0.465432 0.468101 0.470777 +0.473461 0.476153 0.478852 0.481559 0.484274 0.486996 0.489726 0.492463 +0.495208 0.497961 0.500721 0.503489 0.506265 0.509048 0.511839 0.514637 +0.517443 0.520257 0.523078 0.525907 0.528744 0.531588 0.53444 0.537299 +0.540167 0.543041 0.545924 0.548814 0.551711 0.554617 0.55753 0.56045 +0.563378 0.566314 0.569257 0.572209 0.575167 0.578134 0.581107 0.584089 +0.587078 0.590075 0.59308 0.596092 0.599111 0.602139 0.605174 0.608216 +0.611266 0.614324 0.61739 0.620463 0.623544 0.626632 0.629728 0.632832 +0.635943 0.639062 0.642188 0.645323 0.648464 0.651614 0.654771 0.657935 +0.661108 0.664288 0.667475 0.67067 0.673873 0.677084 0.680302 0.683527 +0.686761 0.690002 0.69325 0.696507 0.69977 0.703042 0.706321 0.709608 +0.712902 0.716204 0.719514 0.722831; +#A 1000 0.726156 0.729488 0.732829 0.736176 0.739532 0.742895 0.746266 +0.749644 0.75303 0.756423 0.759824 0.763233 0.76665 0.770074 0.773506 +0.776945 0.780392 0.783846 0.787309 0.790778 0.794256 0.797741 0.801234 +0.804734; +#X coords 0 1 1023 -1 200 200 1 0 0; +#X restore 230 34 graph; +#X obj 25 27 inlet~; +#X obj 25 49 clip~ -1 1; +#X obj 25 71 *~ 512; +#X obj 25 93 +~ 512; +#X obj 25 115 tabread4~ \$0-xfer; +#X obj 25 137 outlet~; +#N canvas 0 22 334 332 generate-xfer 0; +#X obj 8 290 tabwrite \$0-xfer; +#X obj 8 109 / 1024; +#X obj 8 129 * 2; +#X obj 8 149 - 1; +#X obj 8 169 moses 0; +#X obj 8 191 + 0.1; +#X obj 8 213 clip -1 0; +#X obj 68 191 - 0.1; +#X obj 68 213 clip 0 1; +#X obj 101 16 inlet threshold; +#X obj 101 78 count 1024; +#X obj 128 58 s \$0-thresh; +#X obj 95 169 r \$0-thresh; +#X obj 101 38 t b f; +#X obj 68 236 *; +#X obj 8 236 *; +#X obj 8 258 * -1; +#X text 140 203 <<< deadzone; +#X text 140 253 <<< smooth by taking exponent; +#X connect 1 0 2 0; +#X connect 2 0 3 0; +#X connect 3 0 4 0; +#X connect 4 0 5 0; +#X connect 4 1 7 0; +#X connect 5 0 6 0; +#X connect 6 0 15 0; +#X connect 6 0 15 1; +#X connect 7 0 8 0; +#X connect 8 0 14 0; +#X connect 8 0 14 1; +#X connect 9 0 13 0; +#X connect 10 0 0 1; +#X connect 10 0 1 0; +#X connect 12 0 5 1; +#X connect 12 0 7 1; +#X connect 13 0 10 0; +#X connect 13 1 11 0; +#X connect 14 0 0 0; +#X connect 15 0 16 0; +#X connect 16 0 0 0; +#X restore 26 217 pd generate-xfer; +#X text 58 196 <<< threshold; +#X obj 26 173 loadbang; +#X msg 26 195 0.1; +#X connect 1 0 2 0; +#X connect 2 0 3 0; +#X connect 3 0 4 0; +#X connect 4 0 5 0; +#X connect 5 0 6 0; +#X connect 9 0 10 0; +#X connect 10 0 7 0; +#X restore 38 137 pd gate; +#X obj 38 246 adc~ 10; +#X text 98 137 <<< thresholding to remove any consistent noise in the +excitation signal; #X connect 6 0 7 0; #X connect 6 0 0 0; #X connect 6 0 0 1; #X connect 7 0 8 0; #X connect 8 0 9 0; #X connect 10 0 11 0; -#X connect 11 0 13 0; +#X connect 11 0 23 0; #X connect 12 0 13 0; #X connect 14 0 15 0; #X connect 15 0 6 0; -#X connect 17 0 14 0; -#X connect 17 0 14 1; +#X connect 23 0 13 0; +#X connect 24 0 14 0; +#X connect 24 0 14 1;
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/projects/heavy/pd/karplusStrong/count.pd Thu Dec 03 19:13:14 2015 +0000 @@ -0,0 +1,30 @@ +#N canvas 592 177 306 227 10; +#X obj 32 111 f; +#X obj 57 111 + 1; +#X obj 57 151 sel 0; +#X obj 57 171 del 1e-36; +#X obj 57 131 > 1023; +#X msg 32 90 0; +#X obj 19 171 - 1; +#X obj 19 193 outlet; +#X obj 90 87 \$1; +#X obj 90 109 - 1; +#X obj 90 66 loadbang; +#X obj 32 48 inlet; +#X obj 32 69 t b; +#X text 33 14 temporary replacement for [until] object; +#X text 67 195 outputs index (0->[N-1]); +#X connect 0 0 1 0; +#X connect 1 0 0 1; +#X connect 1 0 4 0; +#X connect 1 0 6 0; +#X connect 2 0 3 0; +#X connect 3 0 0 0; +#X connect 4 0 2 0; +#X connect 5 0 0 0; +#X connect 6 0 7 0; +#X connect 8 0 9 0; +#X connect 9 0 4 1; +#X connect 10 0 8 0; +#X connect 11 0 12 0; +#X connect 12 0 5 0;