#N canvas 391 93 239 71 10; #N canvas 0 0 443 348 simple 0; #X obj 100 100 cnv 15 200 60 empty empty simpleshaper 5 8 1 14 -233017 -66577 0; #X obj 111 132 tgl 15 0 empty empty on/off 0 -6 1 8 -262144 -1 -1 1 1; #X obj 110 195 line~; #X msg 111 175 \$1 300; #X obj 94 253 *~; #X obj 93 286 outlet~; #N canvas 0 0 509 496 simpleshaper 0; #X obj -108 -128 sig~; #X obj -124 -35 *~; #X obj -108 -149 mtof; #X obj -107 -106 +~; #X obj -69 -150 osc~ 8; #X obj -69 -128 *~; #N canvas 0 0 682 329 ssumtabosc 0; #X obj 198 288 s \$0-t0; #N canvas 0 0 450 300 graph7 0; #X array \$0-t0 259 float 3; #A 0 -0.0928052 0 0.0928052 0.184773 0.275076 0.362907 0.447486 0.528074 0.603977 0.674558 0.739239 0.797514 0.84895 0.893192 0.929969 0.959096 0.980471 0.994081 1 0.998383 0.98947 0.973575 0.951086 0.922457 0.888202 0.848887 0.805124 0.75756 0.706871 0.653751 0.598903 0.543032 0.486831 0.430981 0.376132 0.322904 0.271875 0.223574 0.178478 0.137005 0.099511 0.0662843 0.0375458 0.0134465 -0.00593235 -0.0205793 -0.0305504 -0.0359669 -0.0370119 -0.0339262 -0.0270029 -0.0165825 -0.00304591 0.0131916 0.0316877 0.0519802 0.0735946 0.0960512 0.118873 0.141593 0.16376 0.184946 0.204752 0.222816 0.238813 0.252461 0.263529 0.271831 0.277237 0.279667 0.279094 0.275543 0.269091 0.259862 0.248025 0.233791 0.21741 0.199162 0.179355 0.158321 0.136405 0.113964 0.0913583 0.068945 0.0470742 0.0260817 0.00628385 -0.0120272 -0.0285883 -0.0431695 -0.055577 -0.0656566 -0.0732954 -0.0784232 -0.0810137 -0.0810839 -0.0786939 -0.0739449 -0.0669775 -0.0579689 -0.0471296 -0.0346992 -0.0209426 -0.00614494 0.0093931 0.0253608 0.0414425 0.0573232 0.0726937 0.087256 0.100728 0.112849 0.123382 0.132122 0.138892 0.143554 0.146005 0.146183 0.144065 0.139667 0.133046 0.124298 0.113555 0.100984 0.086782 0.071177 0.0544189 0.0367783 0.0185407 2.00979e-06 -0.0185367 -0.0367744 -0.0544152 -0.0711735 -0.0867788 -0.100981 -0.113552 -0.124296 -0.133044 -0.139666 -0.144064 -0.146183 -0.146005 -0.143554 -0.138893 -0.132123 -0.123385 -0.112851 -0.100731 -0.087259 -0.072697 -0.0573266 -0.041446 -0.0253643 -0.00939652 0.00614165 0.0209395 0.0346963 0.047127 0.0579668 0.0669757 0.0739436 0.0786931 0.0810837 0.081014 0.078424 0.0732967 0.0656585 0.0555795 0.0431724 0.0285917 0.012031 -0.00627972 -0.0260772 -0.0470696 -0.0689402 -0.0913534 -0.113959 -0.1364 -0.158316 -0.179351 -0.199158 -0.217406 -0.233788 -0.248022 -0.25986 -0.26909 -0.275542 -0.279093 -0.279667 -0.277238 -0.271833 -0.263531 -0.252464 -0.238816 -0.22282 -0.204757 -0.18495 -0.163764 -0.141598 -0.118878 -0.0960561 -0.0735993 -0.0519848 -0.0316919 -0.0131954 0.00304267 0.0165799 0.0270011 0.0339251 0.0370117 0.0359676 0.030552 0.0205819 0.00593603 -0.0134418 -0.03754 -0.0662776 -0.0995034 -0.136997 -0.178469 -0.223564 -0.271864 -0.322893 -0.376121 -0.430969 -0.486819 -0.543019 -0.598891 -0.653739 -0.70686 -0.757549 -0.805114 -0.848878 -0.888194 -0.92245 -0.951081 -0.973571 -0.989467 -0.998382 -1 -0.994083 -0.980474 -0.959101 -0.929977 -0.893201 -0.84896 -0.797526 -0.739252 -0.674572 -0.603993 -0.528091 -0.447504 -0.362925 -0.275095 -0.184793 -0.0928252 -2.00979e-05 0.0927852; #X coords 0 0 259 1 200 140 0; #X restore 31 246 graph; #X msg 199 267 sinesum 256 \$1 \$2 \$3 \$4 \$5 \$6 \$7 \$8; #X obj 172 94 vsl 10 64 0 1 0 1 empty empty empty 0 -8 0 8 -262144 -258699 -1 2300 1; #X obj 169 196 pack f f f f f f f f; #X obj 175 173 t b; #X obj 182 94 vsl 10 64 0 1 0 1 empty empty empty 0 -8 0 8 -262144 -258699 -1 1500 1; #X obj 192 94 vsl 10 64 0 1 0 1 empty empty empty 0 -8 0 8 -262144 -258699 -1 2600 1; #X obj 202 94 vsl 10 64 0 1 0 1 empty empty empty 0 -8 0 8 -262144 -258699 -1 4700 1; #X obj 212 94 vsl 10 64 0 1 0 1 empty empty empty 0 -8 0 8 -262144 -258699 -1 5700 1; #X obj 222 94 vsl 10 64 0 1 0 1 empty empty empty 0 -8 0 8 -262144 -258699 -1 6000 1; #X obj 232 94 vsl 10 64 0 1 0 1 empty empty empty 0 -8 0 8 -262144 -258699 -1 6300 1; #X obj 242 94 vsl 10 64 0 1 0 1 empty empty empty 0 -8 0 8 -262144 -258699 -1 6300 1; #X msg 124 266 normalize; #X obj 169 217 t b l; #X obj 124 245 del 2; #X obj -84 178 inlet~; #X obj -85 269 outlet~; #X obj -84 246 tabread4~ \$0-t0; #X obj -84 223 *~ 256; #N canvas 0 0 701 555 oscil 0; #X msg 218 -315 1 0 0 0 0 0 0 0; #X msg 222 -283 1 1 0 0 0 0 0 0; #X msg 225 -254 1 0 1 0 0 0 0 0; #X msg 234 -225 1 1 1 0 0 0 0 0; #X msg 238 -199 1 0 0 1 0 0 0 0; #X msg 245 -174 1 1 0 1 0 1 0 0; #X msg 249 -143 1 1 1 1 1 0 0 0; #X msg 253 -114 1 1 0 1 1 1 0 1; #X msg 260 -90 1 1 1 1 1 1 0 0; #X msg 270 -62 1 1 1 1 1 1 1 1; #X msg 276 -35 0 1 0 1 0 1 0 1; #X obj 218 -345 sel 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15; #X obj 215 1 outlet preset spectrums; #X obj 218 -367 inlet waveform select; #X connect 0 0 12 0; #X connect 1 0 12 0; #X connect 2 0 12 0; #X connect 3 0 12 0; #X connect 4 0 12 0; #X connect 5 0 12 0; #X connect 6 0 12 0; #X connect 7 0 12 0; #X connect 8 0 12 0; #X connect 9 0 12 0; #X connect 10 0 12 0; #X connect 11 0 0 0; #X connect 11 1 1 0; #X connect 11 2 2 0; #X connect 11 3 3 0; #X connect 11 4 4 0; #X connect 11 5 5 0; #X connect 11 6 6 0; #X connect 11 7 7 0; #X connect 11 8 8 0; #X connect 11 9 9 0; #X connect 11 10 10 0; #X connect 13 0 11 0; #X restore 257 142 pd oscil slect map; #X text 56 6 Additive source using sinesum to fill a table with sinusoid components. The table is then normalised.; #X obj 257 114 inlet waveform; #X connect 2 0 0 0; #X connect 3 0 4 0; #X connect 4 0 14 0; #X connect 5 0 4 0; #X connect 6 0 5 0; #X connect 6 0 4 1; #X connect 7 0 5 0; #X connect 7 0 4 2; #X connect 8 0 5 0; #X connect 8 0 4 3; #X connect 9 0 5 0; #X connect 9 0 4 4; #X connect 10 0 5 0; #X connect 10 0 4 5; #X connect 11 0 5 0; #X connect 11 0 4 6; #X connect 12 0 5 0; #X connect 12 0 4 7; #X connect 13 0 0 0; #X connect 14 0 15 0; #X connect 14 1 2 0; #X connect 15 0 13 0; #X connect 16 0 19 0; #X connect 18 0 17 0; #X connect 19 0 18 0; #X connect 20 0 14 0; #X connect 22 0 20 0; #X coords 0 0 1 1 180 100 0; #X restore -108 -64 pd ssumtabosc; #X obj -153 30 *~ 0.125; #X obj -84 29 *~ 0.125; #X obj -107 -86 phasor~; #X obj -84 117 outlet~; #X text -54 74 ajf 2006; #X obj -198 -243 inlet notes; #N canvas 0 0 450 300 cheby3 0; #N canvas 0 0 450 300 graph7 0; #X array \$0-c6 259 float 3; #A 0 -1.07105 -1 -0.930418 -0.862289 -0.795603 -0.730347 -0.66651 -0.60408 -0.543047 -0.483398 -0.425123 -0.36821 -0.312647 -0.258423 -0.205526 -0.153946 -0.10367 -0.0546875 -0.00698662 0.039444 0.0846157 0.12854 0.171228 0.212692 0.252943 0.291992 0.329851 0.366531 0.402044 0.436401 0.469614 0.501694 0.532652 0.5625 0.591249 0.618912 0.645498 0.671021 0.69549 0.718918 0.741316 0.762695 0.783068 0.802444 0.820837 0.838257 0.854715 0.870224 0.884794 0.898438 0.911165 0.922989 0.93392 0.94397 0.95315 0.961472 0.968946 0.975586 0.981401 0.986404 0.990606 0.994019 0.996653 0.99852 0.999632 1 0.999636 0.99855 0.996756 0.994263 0.991083 0.987228 0.98271 0.977539 0.971727 0.965286 0.958227 0.950562 0.942301 0.933456 0.92404 0.914062 0.903536 0.892471 0.88088 0.868774 0.856165 0.843063 0.829481 0.81543 0.80092 0.785965 0.770575 0.754761 0.738535 0.721909 0.704893 0.6875 0.669741 0.651627 0.633169 0.61438 0.59527 0.575851 0.556135 0.536133 0.515856 0.495316 0.474524 0.453491 0.43223 0.410751 0.389067 0.367188 0.345125 0.322891 0.300497 0.277954 0.255274 0.232468 0.209547 0.186523 0.163408 0.140213 0.116949 0.0936279 0.070261 0.0468597 0.0234356 0 -0.0234356 -0.0468597 -0.070261 -0.0936279 -0.116949 -0.140213 -0.163408 -0.186523 -0.209547 -0.232468 -0.255274 -0.277954 -0.300497 -0.322891 -0.345125 -0.367188 -0.389067 -0.410751 -0.43223 -0.453491 -0.474524 -0.495316 -0.515856 -0.536133 -0.556135 -0.575851 -0.59527 -0.61438 -0.633169 -0.651627 -0.669741 -0.6875 -0.704893 -0.721909 -0.738535 -0.754761 -0.770575 -0.785965 -0.80092 -0.81543 -0.829481 -0.843063 -0.856165 -0.868774 -0.88088 -0.892471 -0.903536 -0.914062 -0.92404 -0.933456 -0.942301 -0.950562 -0.958227 -0.965286 -0.971727 -0.977539 -0.98271 -0.987228 -0.991083 -0.994263 -0.996756 -0.99855 -0.999636 -1 -0.999632 -0.99852 -0.996653 -0.994019 -0.990606 -0.986404 -0.981401 -0.975586 -0.968946 -0.961472 -0.95315 -0.94397 -0.93392 -0.922989 -0.911165 -0.898438 -0.884794 -0.870224 -0.854715 -0.838257 -0.820837 -0.802444 -0.783068 -0.762695 -0.741316 -0.718918 -0.69549 -0.671021 -0.645498 -0.618912 -0.591249 -0.5625 -0.532652 -0.501694 -0.469614 -0.436401 -0.402044 -0.366531 -0.329851 -0.291992 -0.252943 -0.212692 -0.171228 -0.12854 -0.0846157 -0.039444 0.00698662 0.0546875 0.10367 0.153946 0.205526 0.258423 0.312647 0.36821 0.425123 0.483398 0.543047 0.60408 0.66651 0.730347 0.795603 0.862289 0.930418 1 1.07105 ; #X coords 0 0 1 1 200 140 0; #X restore 64 194 graph; #X obj -48 156 *~ 128; #X obj -49 175 +~ 128; #N canvas 113 0 415 280 make-table 0; #X obj 97 61 t b b; #X obj 169 86 f; #X obj 207 86 + 1; #X msg 191 63 0; #X obj 97 84 until; #X obj 169 116 t f f; #X obj 96 112 sel 258; #X obj 97 42 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; #X obj 44 143 expr ($f1-129)/128; #X obj 97 19 inlet; #X obj 44 167 expr 4*$f1*$f1*$f1-3*$f1; #X text 265 167 3rd C.P.; #X obj 70 193 tabwrite \$0-c6; #X connect 0 0 4 0; #X connect 0 1 3 0; #X connect 1 0 2 0; #X connect 1 0 5 0; #X connect 1 0 6 0; #X connect 2 0 1 1; #X connect 3 0 1 1; #X connect 4 0 1 0; #X connect 5 0 8 0; #X connect 5 1 12 1; #X connect 6 0 4 1; #X connect 7 0 0 0; #X connect 8 0 10 0; #X connect 9 0 7 0; #X connect 10 0 12 0; #X restore 106 194 pd make-table; #X obj -48 131 inlet~; #X obj -48 218 outlet~; #X obj -48 194 tabread4~ \$0-c6; #X obj 106 165 r \$0-c3sel; #X obj 192 165 r \$0-c5sel; #X connect 1 0 2 0; #X connect 2 0 6 0; #X connect 4 0 1 0; #X connect 6 0 5 0; #X connect 7 0 3 0; #X coords 0 0 1 1 85 60 0; #X restore -154 5 pd cheby3; #N canvas 0 0 450 300 cheby4 0; #N canvas 0 0 450 300 graph7 0; #X array \$0-c7 259 float 3; #A 0 1.12746 1 0.877426 0.759644 0.646563 0.538094 0.434146 0.334633 0.239467 0.14856 0.0618258 -0.0208201 -0.099463 -0.174187 -0.245075 -0.31221 -0.375673 -0.435547 -0.491911 -0.544845 -0.594429 -0.640739 -0.683856 -0.723854 -0.76081 -0.7948 -0.825898 -0.854179 -0.879715 -0.90258 -0.922845 -0.940582 -0.95586 -0.96875 -0.979321 -0.98764 -0.993776 -0.997795 -0.999764 -0.999748 -0.997811 -0.994019 -0.988433 -0.981117 -0.972132 -0.96154 -0.949401 -0.935775 -0.920721 -0.904297 -0.88656 -0.867568 -0.847377 -0.826042 -0.803618 -0.780159 -0.755717 -0.730347 -0.704099 -0.677024 -0.649174 -0.620598 -0.591344 -0.561462 -0.530998 -0.5 -0.468513 -0.436584 -0.404256 -0.371574 -0.338582 -0.30532 -0.271832 -0.238159 -0.204341 -0.170417 -0.136427 -0.102409 -0.0684009 -0.0344386 -0.000558853 0.0332031 0.0668125 0.100235 0.133439 0.166389 0.199056 0.231408 0.263413 0.295044 0.32627 0.357064 0.387397 0.417244 0.446578 0.475373 0.503605 0.53125 0.558285 0.584687 0.610434 0.635506 0.659881 0.683541 0.706466 0.728638 0.750039 0.770653 0.790464 0.809456 0.827614 0.844925 0.861376 0.876953 0.891645 0.905442 0.918332 0.930305 0.941354 0.95147 0.960645 0.968872 0.976146 0.98246 0.987812 0.992195 0.995608 0.998047 0.999512 1 0.999512 0.998047 0.995608 0.992195 0.987812 0.98246 0.976146 0.968872 0.960645 0.95147 0.941354 0.930305 0.918332 0.905442 0.891645 0.876953 0.861376 0.844925 0.827614 0.809456 0.790464 0.770653 0.750039 0.728638 0.706466 0.683541 0.659881 0.635506 0.610434 0.584687 0.558285 0.53125 0.503605 0.475373 0.446578 0.417244 0.387397 0.357064 0.32627 0.295044 0.263413 0.231408 0.199056 0.166389 0.133439 0.100235 0.0668125 0.0332031 -0.000558853 -0.0344386 -0.0684009 -0.102409 -0.136427 -0.170417 -0.204341 -0.238159 -0.271832 -0.30532 -0.338582 -0.371574 -0.404256 -0.436584 -0.468513 -0.5 -0.530998 -0.561462 -0.591344 -0.620598 -0.649174 -0.677024 -0.704099 -0.730347 -0.755717 -0.780159 -0.803618 -0.826042 -0.847377 -0.867568 -0.88656 -0.904297 -0.920721 -0.935775 -0.949401 -0.96154 -0.972132 -0.981117 -0.988433 -0.994019 -0.997811 -0.999748 -0.999764 -0.997795 -0.993776 -0.98764 -0.979321 -0.96875 -0.95586 -0.940582 -0.922845 -0.90258 -0.879715 -0.854179 -0.825898 -0.7948 -0.76081 -0.723854 -0.683856 -0.640739 -0.594429 -0.544845 -0.491911 -0.435547 -0.375673 -0.31221 -0.245075 -0.174187 -0.099463 -0.0208201 0.0618258 0.14856 0.239467 0.334633 0.434146 0.538094 0.646563 0.759644 0.877426 1 1.12746; #X coords 0 0 1 1 200 140 0; #X restore 64 194 graph; #X obj -48 156 *~ 128; #X obj -49 175 +~ 128; #N canvas 113 0 817 374 make-table 0; #X obj 118 158 t b b; #X obj 190 183 f; #X obj 228 183 + 1; #X msg 212 160 0; #X obj 118 181 until; #X obj 190 213 t f f; #X obj 117 209 sel 258; #X obj 65 240 expr ($f1-129)/128; #X obj 65 264 expr 8*$f1*$f1*$f1*$f1-8*$f1*$f1+1; #X text 278 284 4th C.P.; #X obj 91 290 tabwrite \$0-c7; #X obj 118 116 loadbang; #X connect 0 0 4 0; #X connect 0 1 3 0; #X connect 1 0 2 0; #X connect 1 0 5 0; #X connect 1 0 6 0; #X connect 2 0 1 1; #X connect 3 0 1 1; #X connect 4 0 1 0; #X connect 5 0 7 0; #X connect 5 1 10 1; #X connect 6 0 4 1; #X connect 7 0 8 0; #X connect 8 0 10 0; #X connect 11 0 0 0; #X restore 106 194 pd make-table; #X obj -48 131 inlet~; #X obj -48 218 outlet~; #X obj -48 194 tabread4~ \$0-c7; #X obj 107 173 r \$0-c4sel; #X obj 193 173 r \$0-c6sel; #X connect 1 0 2 0; #X connect 2 0 6 0; #X connect 4 0 1 0; #X connect 6 0 5 0; #X coords 0 0 1 1 85 60 0; #X restore -84 5 pd cheby4; #X obj -198 -128 ead~ 500 500; #X obj -198 -219 t b l; #X obj -198 -103 *~; #X obj -19 29 *~ 0.125; #X text -32 -319 simple shaper; #X text -164 -288 ( note \, velocity \, attack \, deacy \, vibrato \, 3rd distortion \, 4th distortion \, original oscillator \, additive waveform ); #X obj -84 95 *~; #X obj -168 -187 unpack f f f f f f f f f; #X text 63 -150 <--- vibrato oscillator; #X text 63 -89 <--- main phasor; #X text 64 -62 <--- additive table osc; #X text 61 2 <--- waveshapers; #X text 64 -31 <--- waveshape amplitude; #X text 61 33 <--- mixers; #X connect 0 0 3 0; #X connect 1 0 13 0; #X connect 1 0 14 0; #X connect 2 0 0 0; #X connect 3 0 9 0; #X connect 4 0 5 0; #X connect 5 0 3 1; #X connect 6 0 1 1; #X connect 6 0 18 0; #X connect 7 0 21 0; #X connect 8 0 21 0; #X connect 9 0 6 0; #X connect 12 0 16 0; #X connect 13 0 7 0; #X connect 14 0 8 0; #X connect 15 0 17 0; #X connect 16 0 15 0; #X connect 16 1 22 0; #X connect 17 0 1 0; #X connect 17 0 21 1; #X connect 18 0 21 0; #X connect 21 0 10 0; #X connect 22 0 2 0; #X connect 22 1 17 1; #X connect 22 2 15 1; #X connect 22 3 15 2; #X connect 22 4 5 1; #X connect 22 5 7 1; #X connect 22 6 8 1; #X connect 22 7 18 1; #X connect 22 8 6 1; #X restore 94 228 pd simpleshaper; #X obj 149 125 bng 15 100 50 0 \$0-i1 empty empty 0 -6 0 8 -262144 -260818 -1; #X obj 169 125 bng 15 100 50 0 \$0-i2 empty empty 0 -6 0 8 -262144 -260818 -1; #X obj 189 125 bng 15 100 50 0 \$0-i3 empty empty 0 -6 0 8 -262144 -260818 -1; #X obj 209 125 bng 15 100 50 0 \$0-i4 empty empty 0 -6 0 8 -262144 -260818 -1; #X obj 229 125 bng 15 100 50 0 \$0-i5 empty empty 0 -6 0 8 -262144 -260818 -1; #X obj 249 125 bng 15 100 50 0 \$0-i6 empty empty 0 -6 0 8 -262144 -260818 -1; #N canvas 0 0 450 300 presets 0; #X msg 108 41 28 0.8 5 12000 0.2 0.2 0.4 0.6 6 bassamophone1; #X msg 109 63 33 0.4 10 12000 0.2 0.1 0.7 0.9 6 bassamaphone2; #X msg 111 98 44 0.9 1000 5000 0.7 0.3 0.1 0.1 4 stringumyjig1; #X msg 112 120 47 1 400 5000 1 0.1 0.2 0.05 4 stringunmyjig2; #X msg 112 152 42 0.7 100 300 0.4 0.4 0.6 0 8 saxomaphone1; #X msg 112 173 42 0.9 100 300 0.4 0.4 0.6 0 8 saxomaphone2; #X obj 80 258 outlet params lists; #X obj 34 13 inlet; #X obj 74 13 inlet; #X obj 124 13 inlet; #X obj 164 13 inlet; #X obj 214 13 inlet; #X obj 254 13 inlet; #X obj 302 12 inlet; #X obj 342 12 inlet; #X connect 0 0 6 0; #X connect 1 0 6 0; #X connect 2 0 6 0; #X connect 3 0 6 0; #X connect 4 0 6 0; #X connect 5 0 6 0; #X connect 7 0 0 0; #X connect 8 0 1 0; #X connect 9 0 2 0; #X connect 10 0 3 0; #X connect 11 0 4 0; #X connect 12 0 5 0; #X restore 182 173 pd presets; #X msg 182 197 symbol \$10; #X symbolatom 150 144 20 0 0 0 - - -; #X obj 14 202 sel 1; #X msg 14 229 \; pd dsp 1; #X connect 1 0 3 0; #X connect 1 0 16 0; #X connect 2 0 4 1; #X connect 3 0 2 0; #X connect 4 0 5 0; #X connect 6 0 4 0; #X connect 7 0 13 0; #X connect 8 0 13 1; #X connect 9 0 13 2; #X connect 10 0 13 3; #X connect 11 0 13 4; #X connect 12 0 13 5; #X connect 13 0 14 0; #X connect 13 0 6 0; #X connect 14 0 15 0; #X connect 16 0 17 0; #X coords 0 -1 1 1 200 60 1 100 100; #X restore 13 -100 pd simple shaper; #X obj 14 -80 dac~; #X connect 0 0 1 0; #X connect 0 0 1 1;