pp.graindelay~.pd

#N canvas 194 81 986 587 10;
#X obj 287 139 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj 287 179 metro 100;
#X msg 289 266 next bang;
#X obj 338 131 random;
#X obj 338 154 +;
#N canvas 50 60 532 262 \$0-graindelay~ 0;
#N canvas 133 210 841 473 mask 0;
#X obj 100 100 cnv 15 520 250 empty empty empty 20 12 0 14 -262144
-66577 0;
#X obj 115 157 nbx 8 12 0 171000 0 0 \$0-delay \$0-delayr Delay(ms)
70 7 2 10 -262144 -1 -1 500 256;
#X obj 109 128 tgl 20 0 \$0-int_triggeronoff \$0-int_triggeronoffr
empty 17 7 2 10 -228856 -1 -1 1 1;
#X obj 284 158 nbx 8 12 0 171000 0 0 \$0-random-delay \$0-random-delayr
Random-Delay(ms) 70 7 2 10 -262144 -1 -1 0 256;
#X obj 115 172 nbx 5 12 -160 160 0 0 \$0-size \$0-sizer Grainsize(ms)
69 7 2 10 -262144 -1 -1 160 256;
#X obj 142 142 nbx 4 12 1 1e+37 0 0 \$0-trigger-speed \$0-trigger-speedr
Grain-Distance(ms) 42 7 2 10 -262144 -1 -1 5 256;
#X obj 284 173 nbx 5 12 0 1e+11 0 0 \$0-random-size \$0-random-sizer
Random-Grainsize(ms) 70 7 2 10 -262144 -1 -1 0 256;
#X obj 284 143 nbx 4 12 0 1e+37 0 0 \$0-random-trigger-speed \$0-random-trigger-speedr
Random-Grain-Distance(ms) 70 7 2 10 -262144 -1 -1 0 256;
#X obj 115 187 nbx 5 12 -1e+28 1e+28 0 0 \$0-pitch \$0-pitchr Pitch(cents)
70 7 2 10 -262144 -1 -1 -313 256;
#X obj 284 188 nbx 5 12 0 1e+13 0 0 \$0-random-pitch \$0-random-pitchr
Random-Pitch(cents) 70 7 2 10 -262144 -1 -1 0 256;
#X obj 273 193 cnv 5 5 5 empty empty + 0 0 0 10 -262144 -66577 0;
#X obj 273 198 cnv 5 1 1 empty empty _ 0 -5 0 10 -262144 -66577 0;
#X obj 274 149 cnv 5 5 5 empty empty + 0 0 0 10 -262144 -66577 0;
#X obj 273 164 cnv 5 5 5 empty empty + 0 0 0 10 -262144 -66577 0;
#X obj 273 179 cnv 5 5 5 empty empty + 0 0 0 10 -262144 -66577 0;
#X obj 115 202 nbx 4 12 -100 100 0 0 \$0-pan \$0-panr Panorama 70 7
2 10 -262144 -1 -1 0 256;
#X obj 284 203 nbx 4 12 0 100 0 0 \$0-random-pan \$0-random-panr Random-Panorama(%)
70 7 2 10 -262144 -1 -1 100 256;
#X obj 273 208 cnv 5 5 5 empty empty + 0 0 0 10 -262144 -66577 0;
#X obj 273 213 cnv 5 1 1 empty empty _ 0 -5 0 10 -262144 -66577 0;
#X obj 115 217 nbx 4 12 -100 0 0 0 \$0-amp \$0-ampr Amplitude(db) 70
7 2 10 -262144 -1 -1 0 256;
#X obj 284 218 nbx 4 12 0 100 0 0 \$0-random-amp \$0-random-ampr Random-Amplitude(db)
70 7 2 10 -262144 -1 -1 0 256;
#X obj 273 224 cnv 5 1 1 empty empty _ 0 -5 0 10 -262144 -66577 0;
#X obj 496 275 hradio 10 1 0 5 \$0-env-type \$0-env-typer Type 0 -7
2 10 -262144 -1 -1 0;
#X obj 496 143 cnv 15 98 72 empty empty empty 20 12 0 14 -162280 -66577
0;
#N canvas 3 52 450 300 mask 0;
#X obj 101 101 cnv 15 94 68 empty empty empty 20 12 0 14 -262144 -66577
0;
#N canvas 0 50 450 250 (subpatch) 0;
#X array \$0-window 1024 float 3;
#A 0 0 0.0213089 0.0405036 0.0589658 0.0769611 0.094609 0.111977 0.129109
0.146033 0.16277 0.179334 0.195738 0.211989 0.228093 0.244057 0.259882
0.275572 0.29113 0.306555 0.321849 0.337012 0.352045 0.366947 0.381718
0.396356 0.410861 0.425232 0.439467 0.453566 0.467526 0.481347 0.495026
0.508563 0.521955 0.5352 0.548297 0.561244 0.57404 0.586681 0.599167
0.611496 0.623665 0.635673 0.647517 0.659196 0.670708 0.682051 0.693224
0.704223 0.715048 0.725696 0.736166 0.746456 0.756564 0.766488 0.776227
0.785778 0.79514 0.804312 0.813291 0.822077 0.830667 0.83906 0.847254
0.855249 0.863041 0.870631 0.878016 0.885195 0.892167 0.89893 0.905484
0.911826 0.917957 0.923874 0.929577 0.935064 0.940334 0.945387 0.950222
0.954837 0.959231 0.963405 0.967356 0.971085 0.97459 0.977871 0.980928
0.983759 0.986364 0.988742 0.990894 0.992819 0.994516 0.995985 0.997226
0.998238 0.999022 0.999577 0.999902 1 0.999998 0.999994 0.999987 0.999978
0.999965 0.99995 0.999933 0.999913 0.999889 0.999864 0.999835 0.999804
0.999771 0.999734 0.999695 0.999653 0.999609 0.999562 0.999512 0.999459
0.999404 0.999346 0.999286 0.999222 0.999156 0.999088 0.999016 0.998942
0.998866 0.998786 0.998704 0.99862 0.998532 0.998442 0.998349 0.998254
0.998156 0.998055 0.997952 0.997845 0.997737 0.997625 0.997511 0.997394
0.997275 0.997152 0.997027 0.9969 0.99677 0.996637 0.996501 0.996363
0.996222 0.996078 0.995932 0.995783 0.995631 0.995477 0.99532 0.99516
0.994998 0.994833 0.994665 0.994495 0.994322 0.994146 0.993968 0.993787
0.993603 0.993417 0.993228 0.993036 0.992842 0.992645 0.992445 0.992242
0.992037 0.99183 0.991619 0.991406 0.991191 0.990972 0.990751 0.990527
0.990301 0.990072 0.98984 0.989606 0.989369 0.989129 0.988887 0.988642
0.988394 0.988144 0.987891 0.987636 0.987377 0.987116 0.986853 0.986587
0.986318 0.986046 0.985772 0.985495 0.985216 0.984933 0.984649 0.984361
0.984071 0.983778 0.983483 0.983185 0.982884 0.982581 0.982275 0.981966
0.981655 0.981341 0.981025 0.980706 0.980384 0.980059 0.979732 0.979403
0.97907 0.978735 0.978397 0.978057 0.977714 0.977369 0.977021 0.97667
0.976316 0.97596 0.975602 0.97524 0.974876 0.97451 0.974141 0.973769
0.973394 0.973017 0.972637 0.972255 0.97187 0.971483 0.971092 0.9707
0.970304 0.969906 0.969505 0.969102 0.968696 0.968288 0.967877 0.967463
0.967047 0.966628 0.966206 0.965782 0.965355 0.964926 0.964494 0.964059
0.963622 0.963182 0.96274 0.962295 0.961847 0.961397 0.960944 0.960489
0.960031 0.959571 0.959107 0.958642 0.958173 0.957702 0.957229 0.956753
0.956274 0.955793 0.955309 0.954822 0.954333 0.953842 0.953348 0.952851
0.952352 0.95185 0.951345 0.950838 0.950328 0.949816 0.949301 0.948784
0.948264 0.947742 0.947217 0.946689 0.946159 0.945626 0.945091 0.944553
0.944012 0.943469 0.942924 0.942376 0.941825 0.941272 0.940716 0.940158
0.939597 0.939034 0.938468 0.937899 0.937328 0.936755 0.936178 0.9356
0.935019 0.934435 0.933849 0.93326 0.932668 0.932075 0.931478 0.930879
0.930278 0.929674 0.929067 0.928458 0.927847 0.927232 0.926616 0.925997
0.925375 0.924751 0.924124 0.923495 0.922863 0.922229 0.921592 0.920953
0.920311 0.919667 0.91902 0.918371 0.917719 0.917065 0.916408 0.915749
0.915087 0.914423 0.913756 0.913087 0.912415 0.911741 0.911064 0.910385
0.909704 0.909019 0.908333 0.907644 0.906952 0.906258 0.905562 0.904863
0.904161 0.903457 0.902751 0.902042 0.901331 0.900617 0.899901 0.899182
0.898461 0.897737 0.897011 0.896282 0.895551 0.894818 0.894082 0.893344
0.892603 0.89186 0.891114 0.890366 0.889615 0.888862 0.888107 0.887349
0.886589 0.885826 0.885061 0.884293 0.883523 0.882751 0.881976 0.881199
0.880419 0.879637 0.878852 0.878065 0.877276 0.876484 0.87569 0.874893
0.874094 0.873293 0.872489 0.871683 0.870874 0.870063 0.86925 0.868434
0.867616 0.866795 0.865973 0.865147 0.864319 0.863489 0.862657 0.861822
0.860985 0.860145 0.859303 0.858459 0.857612 0.856763 0.855911 0.855058
0.854201 0.853343 0.852482 0.851619 0.850753 0.849885 0.849015 0.848142
0.847267 0.84639 0.84551 0.844628 0.843744 0.842857 0.841968 0.841076
0.840183 0.839287 0.838388 0.837488 0.836585 0.835679 0.834772 0.833861
0.832949 0.832035 0.831118 0.830198 0.829277 0.828353 0.827427 0.826498
0.825568 0.824634 0.823699 0.822761 0.821821 0.820879 0.819935 0.818988
0.818039 0.817087 0.816134 0.815178 0.814219 0.813259 0.812296 0.811331
0.810364 0.809394 0.808422 0.807448 0.806472 0.805493 0.804512 0.803529
0.802544 0.801556 0.800566 0.799574 0.79858 0.797583 0.796584 0.795583
0.79458 0.793574 0.792567 0.791557 0.790544 0.78953 0.788513 0.787494
0.786473 0.78545 0.784424 0.783397 0.782367 0.781334 0.7803 0.779263
0.778225 0.777184 0.776141 0.775095 0.774048 0.772998 0.771946 0.770892
0.769835 0.768777 0.767716 0.766653 0.765588 0.764521 0.763452 0.76238
0.761307 0.760231 0.759153 0.758072 0.75699 0.755906 0.754819 0.75373
0.752639 0.751546 0.750451 0.749354 0.748254 0.747153 0.746049 0.744943
0.743835 0.742725 0.741612 0.740498 0.739381 0.738263 0.737142 0.736019
0.734894 0.733767 0.732638 0.731507 0.730373 0.729238 0.7281 0.72696
0.725819 0.724675 0.723529 0.722381 0.72123 0.720078 0.718924 0.717768
0.716609 0.715449 0.714286 0.713121 0.711955 0.710786 0.709615 0.708442
0.707267 0.70609 0.704911 0.70373 0.702547 0.701362 0.700174 0.698985
0.697794 0.696601 0.695405 0.694208 0.693008 0.691807 0.690603 0.689398
0.68819 0.686981 0.685769 0.684556 0.68334 0.682123 0.680903 0.679681
0.678458 0.677232 0.676005 0.674775 0.673544 0.67231 0.671075 0.669837
0.668598 0.667356 0.666113 0.664868 0.66362 0.662371 0.66112 0.659866
0.658611 0.657354 0.656095 0.654834 0.653571 0.652306 0.651039 0.64977
0.648499 0.647227 0.645952 0.644675 0.643397 0.642117 0.640834 0.63955
0.638264 0.636976 0.635685 0.634394 0.6331 0.631804 0.630506 0.629207
0.627905 0.626602 0.625296 0.623989 0.62268 0.621369 0.620056 0.618742
0.617425 0.616107 0.614786 0.613464 0.61214 0.610814 0.609486 0.608156
0.606825 0.605491 0.604156 0.602819 0.60148 0.600139 0.598796 0.597452
0.596105 0.594757 0.593407 0.592055 0.590701 0.589346 0.587988 0.586629
0.585268 0.583905 0.582541 0.581174 0.579806 0.578436 0.577064 0.57569
0.574314 0.572937 0.571558 0.570177 0.568794 0.56741 0.566023 0.564635
0.563245 0.561854 0.56046 0.559065 0.557668 0.556269 0.554868 0.553466
0.552062 0.550656 0.549249 0.547839 0.546428 0.545015 0.5436 0.542184
0.540766 0.539346 0.537924 0.536501 0.535076 0.533649 0.53222 0.53079
0.529358 0.527924 0.526489 0.525052 0.523613 0.522172 0.52073 0.519286
0.51784 0.516392 0.514943 0.513492 0.51204 0.510585 0.509129 0.507671
0.506212 0.504751 0.503288 0.501824 0.500358 0.49889 0.49742 0.495949
0.494476 0.493002 0.491525 0.490047 0.488568 0.487087 0.485604 0.484119
0.482633 0.481145 0.479656 0.478164 0.476671 0.475177 0.473681 0.472183
0.470684 0.469183 0.46768 0.466176 0.46467 0.463162 0.461653 0.460142
0.458629 0.457115 0.4556 0.454082 0.452563 0.451043 0.44952 0.447997
0.446471 0.444944 0.443415 0.441885 0.440353 0.43882 0.437285 0.435748
0.43421 0.43267 0.431128 0.429585 0.428041 0.426495 0.424947 0.423397
0.421846 0.420294 0.418739 0.417184 0.415626 0.414067 0.412507 0.410945
0.409381 0.407816 0.406249 0.404681 0.403111 0.40154 0.399967 0.398392
0.396816 0.395238 0.393659 0.392078 0.390496 0.388912 0.387326 0.385739
0.384151 0.38256 0.380969 0.379375 0.377781 0.376184 0.374586 0.372987
0.371386 0.369783 0.368179 0.366574 0.364967 0.363358 0.361748 0.360136
0.358523 0.356908 0.355291 0.353674 0.352054 0.350433 0.34881 0.347187
0.345561 0.343934 0.342305 0.340675 0.339043 0.33741 0.335775 0.334139
0.332501 0.330862 0.329221 0.327578 0.325935 0.324289 0.322642 0.320994
0.319343 0.317692 0.316039 0.314384 0.312728 0.31107 0.309411 0.30775
0.306088 0.304424 0.302758 0.301091 0.299423 0.297753 0.296081 0.294408
0.292733 0.291057 0.289379 0.2877 0.286019 0.284337 0.282653 0.280968
0.279281 0.277592 0.275902 0.27421 0.272517 0.270822 0.269126 0.267427
0.265728 0.264027 0.262324 0.26062 0.258914 0.257207 0.255498 0.253787
0.252075 0.250361 0.248646 0.246929 0.24521 0.24349 0.241768 0.240044
0.238319 0.236593 0.234864 0.233134 0.231403 0.229669 0.227934 0.226198
0.22446 0.22272 0.220978 0.219235 0.21749 0.215743 0.213995 0.212245
0.210493 0.20874 0.206984 0.205228 0.203469 0.201708 0.199946 0.198182
0.196417 0.194649 0.19288 0.191109 0.189336 0.187561 0.185785 0.184006
0.182226 0.180444 0.17866 0.176874 0.175086 0.173296 0.171505 0.169711
0.167916 0.166118 0.164319 0.162517 0.160714 0.158908 0.157101 0.155291
0.153479 0.151665 0.149849 0.148031 0.146211 0.144388 0.142564 0.140737
0.138908 0.137076 0.135243 0.133407 0.131568 0.129727 0.127884 0.126038
0.12419 0.12234 0.120486 0.118631 0.116772 0.114911 0.113048 0.111181
0.109312 0.10744 0.105565 0.103686 0.101806 0.0999219 0.098035 0.0961447
0.0942515 0.0923552 0.090455 0.0885519 0.0866447 0.0847344 0.0828208
0.0809029 0.078981 0.0770561 0.0751263 0.0731928 0.0712553 0.0693131
0.0673662 0.0654148 0.0634589 0.0614976 0.0595313 0.05756 0.0555826
0.0536004 0.0516116;
#A 1000 0.0496167 0.0476154 0.0456075 0.0435915 0.0415691 0.0395388
0.037499 0.0354516 0.0333933 0.0313261 0.0292464 0.0271564 0.0250514
0.0229339 0.0208029 0.0186519 0.0164806 0.0142893 0.0120666 0.00981471
0.0075208 0.00515683 0.00269974 0;
#X coords 0 1 1024 0 96 70 1 0 0;
#X restore 100 100 graph;
#X coords 0 -1 1 1 96 70 2 100 100;
#X restore 497 144 pd mask;
#X obj 496 129 cnv 12 80 12 empty empty empty 20 12 0 14 -262144 -66577
0;
#X obj 499 229 hsl 92 10 0 1 0 0 \$0-env-bias \$0-env-biasr Bias -2
-7 2 10 -262144 -1 -1 750 1;
#X obj 496 128 cnv 10 10 10 empty empty Grain-Envelope 0 5 2 10 -262144
-1 0;
#X obj 133 126 cnv 10 10 10 empty empty Int.Grain-Trigger 0 5 2 10
-262144 -1 0;
#X obj 115 292 nbx 5 12 0 15000 0 0 \$0-filter-freq \$0-filter-freqr
Frequency(Hz) 70 7 2 10 -262144 -1 -1 100 256;
#X obj 284 292 nbx 5 12 0 15000 0 0 \$0-random-filter-freq \$0-random-filter-freqr
Random-Frequency(Hz) 70 7 2 10 -262144 -1 -1 5000 256;
#X obj 115 307 nbx 3 12 0 100 0 0 \$0-filter-q \$0-filter-qr Q 70 6
2 9 -262144 -1 -1 1 256;
#X obj 284 307 nbx 3 12 0 100 0 0 \$0-random-filter-q \$0-random-filter-qr
Random-Q 70 6 2 9 -262144 -1 -1 6 256;
#X obj 141 278 tgl 10 0 \$0-filter-bypass \$0-filter-bypassr Bypass
15 6 2 10 -262144 -1 -1 0 1;
#X obj 273 297 cnv 5 5 5 empty empty + 0 0 0 10 -262144 -66577 0;
#X obj 273 313 cnv 5 5 5 empty empty + 0 0 0 10 -262144 -66577 0;
#X obj 115 262 cnv 10 10 10 empty empty bp-Filter 0 5 2 10 -262144
-1 0;
#X obj 499 252 hsl 92 10 0 1 0 0 \$0-env-shape \$0-env-shaper Shape
-2 -7 2 10 -262144 -1 -1 2850 1;
#X obj 330 118 cnv 15 10 10 empty empty graindelay~ 0 0 2 14 -262144
-162280 0;
#X obj 540 105 cnv 10 10 10 empty \$0-active-grains 32 0 5 2 11 -262144
-1 0;
#X obj 517 105 cnv 10 10 10 empty empty max. 0 5 2 10 -262144 -1 0
;
#X obj 560 106 cnv 10 10 10 empty empty Grains 0 5 2 10 -262144 -1
0;
#X obj 592 106 cnv 10 10 10 empty empty active 0 5 2 10 -262144 -1
0;
#X obj 115 242 nbx 4 12 0 1e+11 0 0 \$0-feedback \$0-feedbackr Feedback(%)
70 7 2 10 -262144 -1 -1 97 256;
#X obj 270 243 nbx 6 12 0 10000 0 0 \$0-damping \$0-dampingr Feedback-damping(hz)
70 7 2 10 -262144 -1 -1 5000 256;
#X obj 496 318 nbx 4 14 0 100 0 0 \$0-drywet \$0-drywetr Dry/Wet(%)
0 -7 2 10 -262144 -1 -1 50 256;
#X obj 270 258 tgl 10 0 \$0-xfeed \$0-xfeedr X-feed 15 6 2 10 -262144
-1 -1 1 1;
#X coords 0 -1 1 1 521 251 2 100 100;
#X restore 5 3 pd mask;
#X restore 766 258 pd \$0-graindelay~;
#N canvas 537 52 560 555 envelope 0;
#N canvas 284 50 661 699 hann 0;
#X obj 102 334 until;
#X obj 102 355 f;
#X obj 129 361 + 1;
#X msg 167 330 0;
#X obj 154 205 t b b;
#X obj 103 382 t f f;
#X obj 99 499 expr -cos($f1*3.14159)*.5+.5;
#X obj 322 526 expr -cos($f1*3.14159)*.5+.5;
#X obj 322 551 * -1;
#X obj 323 573 + 1;
#X obj 181 421 moses;
#X obj 169 612 pow 1;
#X obj 445 120 exp;
#X obj 445 8 inlet shape;
#X obj 445 28 / 100;
#X obj 291 8 inlet x;
#X obj 101 468 /;
#X obj 102 292 f 1024;
#X obj 206 658 tabwrite \$0-window;
#X obj 322 497 expr ($f1-$f2)/(1024-$f2-1);
#X obj 444 143 t b f;
#X obj 290 135 t b f;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 0 5 0;
#X connect 2 0 1 1;
#X connect 3 0 1 1;
#X connect 4 0 17 0;
#X connect 4 1 3 0;
#X connect 5 0 10 0;
#X connect 5 1 18 1;
#X connect 6 0 11 0;
#X connect 7 0 8 0;
#X connect 8 0 9 0;
#X connect 9 0 11 0;
#X connect 10 0 16 0;
#X connect 10 1 19 0;
#X connect 11 0 18 0;
#X connect 12 0 20 0;
#X connect 13 0 14 0;
#X connect 14 0 12 0;
#X connect 15 0 21 0;
#X connect 16 0 6 0;
#X connect 17 0 0 0;
#X connect 19 0 7 0;
#X connect 20 0 4 0;
#X connect 20 1 11 1;
#X connect 21 0 4 0;
#X connect 21 1 10 1;
#X connect 21 1 16 1;
#X connect 21 1 19 1;
#X restore 87 503 pd hann;
#N canvas 702 50 631 726 trapez 0;
#X obj 43 374 until;
#X obj 43 395 f;
#X obj 70 401 + 1;
#X msg 161 344 0;
#X obj 120 480 moses;
#X obj 134 280 t b b;
#X obj 119 439 t f f;
#X obj 118 608 clip 0 1;
#X obj 120 583 *;
#X obj 238 12 inlet x;
#X obj 435 15 inlet shape;
#X obj 435 82 / 100;
#X obj 435 107 + 1;
#X obj 435 173 max 1;
#X obj 43 347 f 1024;
#X obj 213 505 expr -($f1-$f2)/(1024-$f2-1)+1;
#X obj 435 195 t b f;
#X obj 238 164 t b f f f;
#X obj 148 640 tabwrite \$0-window;
#X obj 120 531 / 1024;
#X obj 435 58 + 200;
#X obj 435 151 -;
#X msg 435 129 6 \$1;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 0 6 0;
#X connect 2 0 1 1;
#X connect 3 0 1 1;
#X connect 4 0 19 0;
#X connect 4 1 15 0;
#X connect 5 0 14 0;
#X connect 5 1 3 0;
#X connect 6 0 4 0;
#X connect 6 1 18 1;
#X connect 7 0 18 0;
#X connect 8 0 7 0;
#X connect 9 0 17 0;
#X connect 10 0 20 0;
#X connect 11 0 12 0;
#X connect 12 0 22 0;
#X connect 13 0 16 0;
#X connect 14 0 0 0;
#X connect 15 0 8 0;
#X connect 16 0 5 0;
#X connect 16 1 8 1;
#X connect 17 0 5 0;
#X connect 17 1 4 1;
#X connect 17 2 19 1;
#X connect 17 3 15 1;
#X connect 19 0 8 0;
#X connect 20 0 11 0;
#X connect 21 0 13 0;
#X connect 22 0 21 0;
#X restore 296 501 pd trapez;
#X obj 125 175 f;
#X obj 241 117 t b f;
#X obj 401 114 t b f;
#N canvas 633 50 680 699 curved2 0;
#X obj 64 415 until;
#X obj 64 436 f;
#X obj 91 442 + 1;
#X msg 139 412 0;
#X obj 113 328 t b b;
#X obj 63 472 t f f;
#X obj 53 586 expr if($f2<=0 \, -pow((1-$f1) \, (-$f2+1))+1 \, pow($f1
\, $f2+1));
#X obj 127 631 expr if($f2<=0 \, -pow((1-$f1) \, (-$f2+1))+1 \, pow($f1
\, $f2+1));
#X obj 128 654 * -1;
#X obj 129 676 + 1;
#X obj 63 509 moses;
#X obj 576 171 exp;
#X obj 478 86 moses 0;
#X obj 478 168 * -1;
#X obj 479 209 exp;
#X obj 480 230 * -1;
#X obj 478 123 + 1;
#X obj 478 146 moses -1;
#X obj 479 190 - 1;
#X obj 479 62 - 1;
#X obj 63 551 /;
#X obj 302 21 inlet x;
#X obj 479 18 inlet shape;
#X obj 479 38 / 100;
#X obj 493 265 t b b f f;
#X obj 478 608 * -1;
#X obj 64 381 f 1024;
#X obj 141 729 tabwrite \$0-window;
#X obj 189 546 expr ($f1-$f2)/(1024-$f2-1);
#X obj 302 211 t b f f f;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 0 5 0;
#X connect 2 0 1 1;
#X connect 3 0 1 1;
#X connect 4 0 26 0;
#X connect 4 1 3 0;
#X connect 5 0 10 0;
#X connect 5 1 27 1;
#X connect 6 0 27 0;
#X connect 7 0 8 0;
#X connect 8 0 9 0;
#X connect 9 0 27 0;
#X connect 10 0 20 0;
#X connect 10 1 28 0;
#X connect 11 0 24 0;
#X connect 12 0 16 0;
#X connect 12 1 11 0;
#X connect 13 0 18 0;
#X connect 14 0 15 0;
#X connect 15 0 24 0;
#X connect 16 0 17 0;
#X connect 17 0 13 0;
#X connect 17 1 24 0;
#X connect 18 0 14 0;
#X connect 19 0 12 0;
#X connect 20 0 6 0;
#X connect 21 0 29 0;
#X connect 22 0 23 0;
#X connect 23 0 19 0;
#X connect 24 0 4 0;
#X connect 24 2 6 1;
#X connect 24 3 25 0;
#X connect 25 0 7 1;
#X connect 26 0 0 0;
#X connect 28 0 7 0;
#X connect 29 0 4 0;
#X connect 29 1 10 1;
#X connect 29 2 20 1;
#X connect 29 3 28 1;
#X restore 219 501 pd curved2;
#N canvas 633 50 680 699 curved 0;
#X obj 66 424 until;
#X obj 66 445 f;
#X obj 93 451 + 1;
#X msg 141 421 0;
#X obj 115 337 t b b;
#X obj 65 481 t f f;
#X obj 55 595 expr if($f2<=0 \, -pow((1-$f1) \, (-$f2+1))+1 \, pow($f1
\, $f2+1));
#X obj 129 640 expr if($f2<=0 \, -pow((1-$f1) \, (-$f2+1))+1 \, pow($f1
\, $f2+1));
#X obj 130 663 * -1;
#X obj 131 685 + 1;
#X obj 65 518 moses;
#X obj 578 180 exp;
#X obj 480 95 moses 0;
#X obj 480 177 * -1;
#X obj 481 218 exp;
#X obj 482 239 * -1;
#X obj 480 132 + 1;
#X obj 480 155 moses -1;
#X obj 481 199 - 1;
#X obj 481 71 - 1;
#X obj 65 560 /;
#X obj 304 30 inlet x;
#X obj 481 27 inlet shape;
#X obj 481 47 / 100;
#X obj 495 274 t b b f f;
#X obj 66 397 f 1024;
#X obj 143 741 tabwrite \$0-window;
#X obj 191 555 expr ($f1-$f2)/(1024-$f2-1);
#X obj 304 220 t b f f f;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 0 5 0;
#X connect 2 0 1 1;
#X connect 3 0 1 1;
#X connect 4 0 25 0;
#X connect 4 1 3 0;
#X connect 5 0 10 0;
#X connect 5 1 26 1;
#X connect 6 0 26 0;
#X connect 7 0 8 0;
#X connect 8 0 9 0;
#X connect 9 0 26 0;
#X connect 10 0 20 0;
#X connect 10 1 27 0;
#X connect 11 0 24 0;
#X connect 12 0 16 0;
#X connect 12 1 11 0;
#X connect 13 0 18 0;
#X connect 14 0 15 0;
#X connect 15 0 24 0;
#X connect 16 0 17 0;
#X connect 17 0 13 0;
#X connect 17 1 24 0;
#X connect 18 0 14 0;
#X connect 19 0 12 0;
#X connect 20 0 6 0;
#X connect 21 0 28 0;
#X connect 22 0 23 0;
#X connect 23 0 19 0;
#X connect 24 0 4 0;
#X connect 24 2 6 1;
#X connect 24 3 7 1;
#X connect 25 0 0 0;
#X connect 27 0 7 0;
#X connect 28 0 4 0;
#X connect 28 1 10 1;
#X connect 28 2 20 1;
#X connect 28 3 27 1;
#X restore 148 501 pd curved;
#X obj 124 375 pack 0 512;
#X obj 248 375 pack 0 0;
#X obj 124 200 t f f;
#N canvas 227 104 947 699 complex 0;
#X obj 190 316 until;
#X obj 190 337 f;
#X obj 217 343 + 1;
#X msg 265 302 0;
#X obj 211 240 t b b;
#X obj 460 630 expr -cos($f1*3.14159)*.5+.5;
#X obj 282 512 moses;
#X obj 235 741 pow 1;
#X obj 680 199 t b f;
#X obj 254 674 expr -cos($f1*3.14159)*.5+.5;
#X obj 324 774 *;
#X obj 460 653 * -1;
#X obj 461 675 + 1;
#X obj 190 612 expr -cos($f1*18.8496)*.5+.5;
#X obj 679 36 inlet vsl;
#X obj 399 28 inlet hsl;
#X obj 399 143 t b f f f;
#X obj 190 482 t float float;
#X obj 190 367 t float float;
#X obj 189 291 f 1024;
#X obj 190 588 / 1024;
#X obj 460 602 expr ($f1-$f2)/(1024-$f2-1);
#X obj 324 797 tabwrite \$0-window;
#X obj 254 651 / 512;
#X obj 680 71 + 200;
#X obj 680 93 / 400;
#X obj 680 137 + 0.2;
#X obj 680 115 * 2.5;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 0 18 0;
#X connect 2 0 1 1;
#X connect 3 0 1 1;
#X connect 4 0 19 0;
#X connect 4 1 3 0;
#X connect 5 0 11 0;
#X connect 6 0 23 0;
#X connect 6 1 21 0;
#X connect 7 0 10 0;
#X connect 8 0 4 0;
#X connect 8 1 7 1;
#X connect 9 0 10 1;
#X connect 10 0 22 0;
#X connect 11 0 12 0;
#X connect 12 0 10 1;
#X connect 13 0 7 0;
#X connect 14 0 24 0;
#X connect 15 0 16 0;
#X connect 16 0 4 0;
#X connect 16 1 6 1;
#X connect 16 2 23 1;
#X connect 16 3 21 1;
#X connect 17 0 20 0;
#X connect 17 1 6 0;
#X connect 18 0 17 0;
#X connect 18 1 22 1;
#X connect 19 0 0 0;
#X connect 20 0 13 0;
#X connect 21 0 5 0;
#X connect 23 0 9 0;
#X connect 24 0 25 0;
#X connect 25 0 27 0;
#X connect 26 0 8 0;
#X connect 27 0 26 0;
#X restore 373 501 pd complex;
#X obj 124 401 route 0 1 2 3 4;
#X obj 246 400 route 0 1 2 3 4;
#X obj 241 50 r \$0-env-bias;
#X obj 401 44 r \$0-env-shape;
#X text 78 520 well \, i think some of the math in this subpatches
is redundant;
#X obj 401 68 * 400;
#X obj 401 90 - 200;
#X obj 241 71 * 974;
#X obj 241 93 + 25;
#X obj 125 60 r \$0-env-type;
#X connect 2 0 9 0;
#X connect 3 0 2 0;
#X connect 3 1 7 1;
#X connect 4 0 2 0;
#X connect 4 1 8 1;
#X connect 7 0 11 0;
#X connect 8 0 12 0;
#X connect 9 0 7 0;
#X connect 9 1 8 0;
#X connect 11 0 0 0;
#X connect 11 1 6 0;
#X connect 11 2 5 0;
#X connect 11 3 1 0;
#X connect 11 4 10 0;
#X connect 12 0 0 1;
#X connect 12 1 6 1;
#X connect 12 2 5 1;
#X connect 12 3 1 1;
#X connect 12 4 10 1;
#X connect 13 0 18 0;
#X connect 14 0 16 0;
#X connect 16 0 17 0;
#X connect 17 0 4 0;
#X connect 18 0 19 0;
#X connect 19 0 3 0;
#X connect 20 0 2 0;
#X restore 766 195 pd envelope;
#X obj 364 153 r \$0-trigger-speed;
#X obj 385 133 r \$0-random-trigger-speed;
#X obj 287 202 s \$0-trigger;
#X obj 338 107 r \$0-trigger;
#X obj 289 243 r \$0-trigger;
#X obj 287 79 r \$0-int_triggeronoff;
#N canvas 288 160 924 538 map 0;
#X obj 215 317 s \$0-grainsize;
#X obj 215 49 r \$0-size;
#X obj 262 98 r \$0-random-size;
#X obj 229 131 random;
#X obj 229 75 r \$0-trigger;
#X obj 215 181 +;
#X obj 227 209 r \$0-trigger-speed;
#X obj 227 274 * -1;
#X obj 227 253 t f f;
#X obj 215 295 clip;
#X obj 229 154 t b f;
#X obj 39 258 s \$0-grainpitch;
#X obj 59 193 r \$0-pitch;
#X obj 39 236 +;
#X obj 58 213 t b f;
#X obj 39 83 r \$0-trigger;
#X obj 39 172 -;
#X obj 39 150 random;
#X obj 78 106 r \$0-random-pitch;
#X obj 78 129 * 2;
#X obj 391 232 s \$0-grainpan;
#X obj 391 183 / 100;
#X obj 420 33 r \$0-trigger;
#X obj 391 11 r \$0-pan;
#X obj 391 210 clip -1 1;
#X obj 460 53 r \$0-random-pan;
#X obj 459 73 * 2;
#X obj 420 115 -;
#X obj 420 93 random;
#X obj 388 266 r \$0-amp;
#X obj 388 411 + 100;
#X obj 388 433 dbtorms;
#X obj 398 357 t b f;
#X obj 399 292 r \$0-trigger;
#X obj 399 335 random;
#X obj 438 313 r \$0-random-amp;
#X obj 388 454 s \$0-grainamp;
#X obj 388 385 -;
#X obj 420 137 t b f;
#X obj 391 160 +;
#X obj 632 37 r \$0-trigger;
#X obj 600 137 s \$0-freq;
#X obj 600 286 s \$0-q;
#X obj 632 59 random;
#X obj 632 81 t b f;
#X obj 600 106 +;
#X obj 617 196 r \$0-trigger;
#X obj 617 218 random;
#X obj 617 240 t b f;
#X obj 600 265 +;
#X obj 600 14 r \$0-filter-freq;
#X obj 682 58 r \$0-random-filter-freq;
#X obj 600 163 r \$0-filter-q;
#X obj 666 217 r \$0-random-filter-q;
#X obj 227 232 * 32;
#X connect 1 0 5 0;
#X connect 2 0 3 1;
#X connect 3 0 10 0;
#X connect 4 0 3 0;
#X connect 5 0 9 0;
#X connect 6 0 54 0;
#X connect 7 0 9 1;
#X connect 8 0 7 0;
#X connect 8 1 9 2;
#X connect 9 0 0 0;
#X connect 10 0 5 0;
#X connect 10 1 5 1;
#X connect 12 0 14 0;
#X connect 13 0 11 0;
#X connect 14 0 13 0;
#X connect 14 1 13 1;
#X connect 15 0 17 0;
#X connect 16 0 13 0;
#X connect 17 0 16 0;
#X connect 18 0 16 1;
#X connect 18 0 19 0;
#X connect 19 0 17 1;
#X connect 21 0 24 0;
#X connect 22 0 28 0;
#X connect 23 0 39 0;
#X connect 24 0 20 0;
#X connect 25 0 26 0;
#X connect 25 0 27 1;
#X connect 26 0 28 1;
#X connect 27 0 38 0;
#X connect 28 0 27 0;
#X connect 29 0 37 0;
#X connect 30 0 31 0;
#X connect 31 0 36 0;
#X connect 32 0 37 0;
#X connect 32 1 37 1;
#X connect 33 0 34 0;
#X connect 34 0 32 0;
#X connect 35 0 34 1;
#X connect 37 0 30 0;
#X connect 38 0 39 0;
#X connect 38 1 39 1;
#X connect 39 0 21 0;
#X connect 40 0 43 0;
#X connect 43 0 44 0;
#X connect 44 0 45 0;
#X connect 44 1 45 1;
#X connect 45 0 41 0;
#X connect 46 0 47 0;
#X connect 47 0 48 0;
#X connect 48 0 49 0;
#X connect 48 1 49 1;
#X connect 49 0 42 0;
#X connect 50 0 45 0;
#X connect 51 0 43 1;
#X connect 52 0 49 0;
#X connect 53 0 47 1;
#X connect 54 0 8 0;
#X restore 766 216 pd map;
#N canvas 81 109 784 586 stuff 0;
#X obj 174 305 r \$0-trigger-speed;
#X msg 174 510 range \$1 \$2;
#X obj 174 532 s \$0-sizer;
#X obj 247 405 r \$0-size;
#X obj 229 432 <;
#X obj 275 438 f;
#X obj 229 454 sel 1;
#X obj 275 481 s \$0-size;
#X obj 176 53 r \$0-visbng;
#X obj 196 184 s \$0-visbngr;
#X msg 176 156 color 0 0;
#X msg 260 156 color 10 10;
#X obj 260 134 del 250;
#X obj 176 75 t b;
#X obj 530 153 r \$0-trigger-speed;
#X obj 501 82 r \$0-size;
#X obj 501 197 /;
#X obj 530 175 t b f;
#X obj 501 150 +;
#X obj 515 103 r \$0-random-size;
#X obj 515 125 t b f;
#X obj 501 218 i;
#X obj 564 268 r \$0-int_triggeronoff;
#X obj 500 393 spigot;
#X obj 564 290 t f f;
#X obj 512 309 sel 1;
#X obj 501 329 f;
#X obj 539 497 s \$0-active-grains;
#X msg 539 475 label \$1;
#X obj 577 326 loadbang;
#X msg 577 348 0;
#X obj 539 453 makefilename %d;
#X obj 483 369 f;
#X obj 281 182 s \$0-namecnv;
#X obj 413 325 metro 100;
#X obj 501 239 abs;
#X obj 413 283 r \$0-visbng;
#X obj 413 304 t b;
#X text 16 280 grainsize should not exceed grain-distance * 32 (number
of max. active grains);
#X obj 396 270 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 174 488 pack 0 0;
#X obj 89 129 s pd-\$0-graindelay~;
#X msg 89 105 relocate 532x262+1+1 1x1+50+60 \, vis 1 \, editmode 0
;
#X obj 174 406 t f f f f;
#X obj 174 456 * -1;
#X obj 501 262 + 1;
#X obj 229 326 r \$0-int_triggeronoff;
#X obj 174 383 spigot;
#X obj 229 349 t f f;
#X obj 55 391 sel 0;
#X msg 55 414 range -6000 6000;
#X obj 174 327 * 32;
#X obj 501 286 min 32;
#X connect 0 0 51 0;
#X connect 1 0 2 0;
#X connect 3 0 4 1;
#X connect 4 0 6 0;
#X connect 5 0 7 0;
#X connect 6 0 5 0;
#X connect 8 0 13 0;
#X connect 10 0 9 0;
#X connect 10 0 33 0;
#X connect 11 0 9 0;
#X connect 11 0 33 0;
#X connect 12 0 11 0;
#X connect 13 0 42 0;
#X connect 13 0 12 0;
#X connect 13 0 10 0;
#X connect 14 0 17 0;
#X connect 15 0 18 0;
#X connect 16 0 21 0;
#X connect 17 0 16 0;
#X connect 17 1 16 1;
#X connect 18 0 16 0;
#X connect 19 0 20 0;
#X connect 20 0 18 0;
#X connect 20 1 18 1;
#X connect 21 0 35 0;
#X connect 22 0 24 0;
#X connect 23 0 31 0;
#X connect 24 0 25 0;
#X connect 24 1 23 1;
#X connect 25 0 26 0;
#X connect 25 1 31 0;
#X connect 26 0 32 1;
#X connect 28 0 27 0;
#X connect 29 0 30 0;
#X connect 30 0 31 0;
#X connect 31 0 28 0;
#X connect 32 0 23 0;
#X connect 34 0 32 0;
#X connect 35 0 45 0;
#X connect 36 0 37 0;
#X connect 37 0 34 0;
#X connect 39 0 37 0;
#X connect 40 0 1 0;
#X connect 42 0 41 0;
#X connect 43 0 44 0;
#X connect 43 1 40 1;
#X connect 43 2 4 0;
#X connect 43 3 5 1;
#X connect 44 0 40 0;
#X connect 45 0 52 0;
#X connect 46 0 48 0;
#X connect 47 0 43 0;
#X connect 48 0 49 0;
#X connect 48 1 47 1;
#X connect 49 0 50 0;
#X connect 50 0 2 0;
#X connect 51 0 47 0;
#X connect 52 0 26 0;
#X restore 766 237 pd stuff;
#N canvas 689 58 450 300 init 0;
#X obj 119 33 loadbang;
#X obj 119 77 f \$0;
#X obj 227 51 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X msg 119 100 \; \$1-filter-bypassr 1 \; \$1-trigger-speedr 50 \;
\$1-sizer 100 \; \$1-env-typer 0 \; \$1-env-biasr 0.5 \; \$1-env-shaper
0.5 \; \$1-dampingr 5000 \; \$1-drywetr 100 \; \$1-filter-freqr 100
\; \$1-random-filter-freqr 5000 \; \$1-filter-qr 1 \;;
#X connect 0 0 1 0;
#X connect 1 0 3 0;
#X connect 2 0 1 0;
#X restore 766 173 pd init;
#X obj 663 93 inlet~;
#X obj 103 115 hsl 150 15 0 127 0 0 \$0-visbng \$0-visbngr empty 50
8 2 10 -233017 -233017 -1 0 1;
#X obj 289 538 outlet~;
#X obj 663 537 outlet~;
#X obj 767 92 inlet;
#N canvas 104 85 1187 629 in 0;
#X obj 41 17 inlet;
#X obj 41 234 != 0;
#X obj 73 223 s \$0-trigger-speedr;
#X obj 105 246 s \$0-random-trigger-speedr;
#X obj 138 202 s \$0-delayr;
#X obj 171 294 s \$0-random-delayr;
#X obj 41 84 route int.grain-trigger grain-distance random-grain-distance
delay random-delay grainsize random-grainsize pitch random-pitch panorama
random-panorama;
#X obj 203 167 s \$0-sizer;
#X obj 235 213 s \$0-random-sizer;
#X obj 235 192 max 0;
#X obj 268 139 s \$0-pitchr;
#X obj 300 163 s \$0-random-pitchr;
#X obj 333 185 s \$0-panr;
#X obj 365 213 s \$0-random-panr;
#X obj 398 278 s \$0-ampr;
#X obj 434 300 s \$0-random-ampr;
#X obj 468 327 s \$0-feedbackr;
#X obj 503 354 s \$0-dampingr;
#X obj 538 377 s \$0-filter-bypassr;
#X obj 573 400 s \$0-filter-freqr;
#X obj 608 423 s \$0-random-filter-freqr;
#X obj 643 446 s \$0-filter-qr;
#X obj 678 468 s \$0-random-filter-qr;
#X obj 713 402 s \$0-drywetr;
#X obj 771 322 s \$0-env-typer;
#X obj 869 421 s \$0-env-biasr;
#X obj 820 372 s \$0-env-shaper;
#X obj 820 352 clip 0 1;
#X obj 869 397 clip 0 1;
#X obj 41 269 s \$0-int_triggeronoffr;
#X obj 1066 324 t b;
#X obj 1066 347 s \$0-trigger;
#X obj 918 443 symbol;
#X obj 918 466 s \$0-env-set;
#N canvas 698 546 200 251 route 0;
#X obj 20 20 inlet;
#X obj 30 60 route save recall;
#X obj 30 85 route float;
#X obj 97 111 route float;
#X obj 30 136 s \$0-save;
#X obj 30 108 i;
#X obj 98 133 i;
#X obj 98 161 s \$0-recall;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 1 3 0;
#X connect 2 0 5 0;
#X connect 3 0 6 0;
#X connect 5 0 4 0;
#X connect 6 0 7 0;
#X restore 67 39 pd route save-recall;
#N canvas 362 125 450 479 recall 0;
#X obj 49 145 outlet;
#N canvas 3 54 450 600 listsplit 0;
#X obj 158 23 inlet;
#X obj 220 87 list length;
#X obj 220 113 until;
#X obj 182 150 f;
#X obj 278 150 + 1;
#X msg 265 111 0;
#X obj 182 226 list store;
#X msg 182 202 get \$1 1;
#X obj 154 367 list split;
#X obj 222 342 f;
#X obj 154 334 list;
#X obj 98 124 list;
#X obj 182 389 list split 1;
#X obj 154 274 t bang bang bang;
#X obj 182 179 t f f;
#X obj 158 48 t l l l b;
#X obj 154 473 outlet;
#X obj 154 440 list trim;
#X obj 163 248 sel |;
#X text 275 197 hacky split list at "|";
#X connect 0 0 15 0;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 3 0 14 0;
#X connect 4 0 3 1;
#X connect 5 0 3 1;
#X connect 6 0 18 0;
#X connect 7 0 6 0;
#X connect 8 0 17 0;
#X connect 8 1 12 0;
#X connect 9 0 8 1;
#X connect 10 0 8 0;
#X connect 11 0 15 0;
#X connect 12 1 11 0;
#X connect 13 0 10 0;
#X connect 13 1 9 0;
#X connect 13 2 2 1;
#X connect 14 0 7 0;
#X connect 14 1 9 1;
#X connect 15 0 1 0;
#X connect 15 1 10 1;
#X connect 15 2 6 1;
#X connect 15 3 5 0;
#X connect 17 0 16 0;
#X connect 18 0 13 0;
#X restore 49 117 pd listsplit;
#X obj 49 24 r \$0-recall;
#X obj 49 54 pipe 1;
#X obj 221 409 text fromlist \$0-savestates;
#X obj 49 77 text get \$0-savestates;
#X msg 253 246 21;
#X obj 253 269 until;
#X obj 253 292 f;
#X obj 300 295 + 1;
#X obj 253 315 t b f;
#X obj 253 367 text set \$0-savestates;
#X obj 221 114 text tolist \$0-savestates;
#X msg 253 342 list empty_slot;
#X obj 221 160 t a b;
#X obj 151 166 loadbang;
#X obj 221 137 savestate;
#X obj 221 33 text define \$0-savestates;
#X obj 151 189 del 0;
#X msg 298 199 0;
#X obj 253 220 spigot 1;
#X connect 1 0 0 0;
#X connect 2 0 3 0;
#X connect 3 0 5 0;
#X connect 5 0 1 0;
#X connect 6 0 7 0;
#X connect 7 0 8 0;
#X connect 8 0 9 0;
#X connect 8 0 10 0;
#X connect 9 0 8 1;
#X connect 10 0 13 0;
#X connect 10 1 11 1;
#X connect 12 0 16 0;
#X connect 13 0 11 0;
#X connect 14 0 4 0;
#X connect 14 1 19 0;
#X connect 15 0 18 0;
#X connect 16 0 14 0;
#X connect 16 1 12 0;
#X connect 18 0 20 0;
#X connect 19 0 20 1;
#X connect 20 0 6 0;
#X restore 134 60 pd recall;
#X obj 398 241 route amplitude random-amplitude feedback feedback-damping
filter-bypass frequency random-frequency q random-q dry/wet;
#X obj 968 491 s \$0-xfeedr;
#X obj 771 286 route env-type env-shape env-bias set-env x-feed blocksize
bang;
#X obj 1017 410 s \$0-blocksize;
#N canvas 3 57 617 375 blocksize 0;
#X obj 214 145 i;
#X obj 214 120 t f f;
#X obj 214 166 /;
#X obj 214 186 == 1;
#X obj 184 76 t f f;
#X obj 184 212 spigot;
#X text 249 141 prevent setting blocksizes that are not a power of
2;
#X msg 244 244 blocksize is not a power of 2;
#X obj 184 294 outlet;
#X obj 244 222 sel 0;
#X obj 184 54 inlet;
#X obj 214 99 log 2;
#X obj 244 266 print pp.grain-delay~;
#X connect 0 0 2 0;
#X connect 1 0 0 0;
#X connect 1 1 2 1;
#X connect 2 0 3 0;
#X connect 3 0 5 1;
#X connect 3 0 9 0;
#X connect 4 0 5 0;
#X connect 4 1 11 0;
#X connect 5 0 8 0;
#X connect 7 0 12 0;
#X connect 9 0 7 0;
#X connect 10 0 4 0;
#X connect 11 0 1 0;
#X restore 1017 381 pd blocksize;
#X text 1015 429 placeholder...;
#X connect 0 0 6 0;
#X connect 0 0 34 0;
#X connect 1 0 29 0;
#X connect 6 0 1 0;
#X connect 6 1 2 0;
#X connect 6 2 3 0;
#X connect 6 3 4 0;
#X connect 6 4 5 0;
#X connect 6 5 7 0;
#X connect 6 6 9 0;
#X connect 6 7 10 0;
#X connect 6 8 11 0;
#X connect 6 9 12 0;
#X connect 6 10 13 0;
#X connect 6 11 36 0;
#X connect 9 0 8 0;
#X connect 27 0 26 0;
#X connect 28 0 25 0;
#X connect 30 0 31 0;
#X connect 32 0 33 0;
#X connect 35 0 6 0;
#X connect 36 0 14 0;
#X connect 36 1 15 0;
#X connect 36 2 16 0;
#X connect 36 3 17 0;
#X connect 36 4 18 0;
#X connect 36 5 19 0;
#X connect 36 6 20 0;
#X connect 36 7 21 0;
#X connect 36 8 22 0;
#X connect 36 9 23 0;
#X connect 36 10 38 0;
#X connect 38 0 24 0;
#X connect 38 1 27 0;
#X connect 38 2 28 0;
#X connect 38 3 32 0;
#X connect 38 4 37 0;
#X connect 38 5 40 0;
#X connect 38 6 30 0;
#X connect 40 0 39 0;
#X restore 767 115 pd in;
#N canvas 309 85 836 657 outlet-message 0;
#X obj 73 672 outlet;
#X obj 67 5 r \$0-int_triggeronoff;
#X obj 81 27 r \$0-trigger-speed;
#X obj 96 50 r \$0-random-trigger-speed;
#X obj 111 70 r \$0-delay;
#N canvas 3 54 1301 388 bang-once...................................................
0;
#X obj 145 81 t b f;
#X obj 103 81 t b f;
#X obj 60 177 del 0;
#X obj 60 81 t b f;
#X obj 188 81 t b f;
#X obj 232 81 t b f;
#X obj 274 81 t b f;
#X obj 60 35 inlet;
#X obj 103 34 inlet;
#X obj 145 34 inlet;
#X obj 188 34 inlet;
#X obj 232 35 inlet;
#X obj 275 35 inlet;
#X obj 436 326 outlet;
#X obj 60 211 f;
#X obj 321 82 t b f;
#X obj 322 36 inlet;
#X obj 368 80 t b f;
#X obj 369 34 inlet;
#X obj 419 81 t b f;
#X obj 463 81 t b f;
#X obj 505 81 t b f;
#X obj 419 34 inlet;
#X obj 463 35 inlet;
#X obj 506 35 inlet;
#X obj 551 80 t b f;
#X obj 595 80 t b f;
#X obj 637 80 t b f;
#X obj 551 34 inlet;
#X obj 595 35 inlet;
#X obj 638 35 inlet;
#X obj 680 82 t b f;
#X obj 681 36 inlet;
#X obj 726 81 t b f;
#X obj 770 81 t b f;
#X obj 812 81 t b f;
#X obj 726 35 inlet;
#X obj 770 36 inlet;
#X obj 813 36 inlet;
#X obj 859 82 t b f;
#X obj 860 36 inlet;
#X obj 905 81 t b f;
#X obj 949 81 t b f;
#X obj 991 81 t b f;
#X obj 905 35 inlet;
#X obj 949 36 inlet;
#X obj 992 36 inlet;
#X obj 1035 81 t b f;
#X obj 1036 36 inlet;
#X obj 1081 80 t b f;
#X obj 1082 35 inlet;
#X obj 1129 81 t b f;
#X obj 1130 36 inlet;
#X obj 436 301 pack 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;
#X connect 0 0 2 0;
#X connect 0 1 53 2;
#X connect 1 0 2 0;
#X connect 1 1 53 1;
#X connect 2 0 14 0;
#X connect 3 0 2 0;
#X connect 3 1 14 1;
#X connect 4 0 2 0;
#X connect 4 1 53 3;
#X connect 5 0 2 0;
#X connect 5 1 53 4;
#X connect 6 0 2 0;
#X connect 6 1 53 5;
#X connect 7 0 3 0;
#X connect 8 0 1 0;
#X connect 9 0 0 0;
#X connect 10 0 4 0;
#X connect 11 0 5 0;
#X connect 12 0 6 0;
#X connect 14 0 53 0;
#X connect 15 0 2 0;
#X connect 15 1 53 6;
#X connect 16 0 15 0;
#X connect 17 0 2 0;
#X connect 17 1 53 7;
#X connect 18 0 17 0;
#X connect 19 0 2 0;
#X connect 19 1 53 8;
#X connect 20 0 2 0;
#X connect 20 1 53 9;
#X connect 21 0 2 0;
#X connect 21 1 53 10;
#X connect 22 0 19 0;
#X connect 23 0 20 0;
#X connect 24 0 21 0;
#X connect 25 0 2 0;
#X connect 25 1 53 11;
#X connect 26 0 2 0;
#X connect 26 1 53 12;
#X connect 27 0 2 0;
#X connect 27 1 53 13;
#X connect 28 0 25 0;
#X connect 29 0 26 0;
#X connect 30 0 27 0;
#X connect 31 0 2 0;
#X connect 31 1 53 14;
#X connect 32 0 31 0;
#X connect 33 0 2 0;
#X connect 33 1 53 15;
#X connect 34 0 2 0;
#X connect 34 1 53 16;
#X connect 35 0 2 0;
#X connect 35 1 53 17;
#X connect 36 0 33 0;
#X connect 37 0 34 0;
#X connect 38 0 35 0;
#X connect 39 0 2 0;
#X connect 39 1 53 18;
#X connect 40 0 39 0;
#X connect 41 0 2 0;
#X connect 41 1 53 19;
#X connect 42 0 2 0;
#X connect 42 1 53 20;
#X connect 43 0 2 0;
#X connect 43 1 53 21;
#X connect 44 0 41 0;
#X connect 45 0 42 0;
#X connect 46 0 43 0;
#X connect 47 0 2 0;
#X connect 47 1 53 22;
#X connect 48 0 47 0;
#X connect 49 0 2 0;
#X connect 49 1 53 23;
#X connect 50 0 49 0;
#X connect 51 0 2 0;
#X connect 51 1 53 24;
#X connect 52 0 51 0;
#X connect 53 0 13 0;
#X restore 81 326 pd bang-once...................................................
;
#X obj 126 91 r \$0-random-delay;
#X obj 141 112 r \$0-size;
#X obj 156 134 r \$0-random-size;
#X obj 215 224 r \$0-random-pan;
#X obj 200 203 r \$0-pan;
#X obj 186 180 r \$0-random-pitch;
#X obj 171 159 r \$0-pitch;
#X obj 230 247 r \$0-amp;
#X obj 259 57 r \$0-random-amp;
#X obj 274 80 r \$0-feedback;
#X obj 289 101 r \$0-damping;
#X obj 304 122 r \$0-filter-bypass;
#X obj 319 144 r \$0-filter-freq;
#X obj 333 165 r \$0-random-filter-freq;
#X obj 348 185 r \$0-filter-q;
#X obj 363 205 r \$0-random-filter-q;
#X obj 378 226 r \$0-drywet;
#X obj 393 246 r \$0-env-type;
#X obj 408 268 r \$0-env-bias;
#X obj 423 289 r \$0-env-shape;
#X obj 153 593 list trim;
#X msg 86 591 addcomma;
#X obj 153 570 list prepend add2;
#X msg 12 458 set;
#X obj 65 366 t b a b;
#X obj 108 538 t b a a;
#N canvas 497 319 297 264 save 0;
#X obj 48 16 inlet;
#N canvas 690 259 481 384 collect 0;
#X obj 47 60 inlet;
#X obj 47 274 outlet;
#X obj 98 180 list;
#X obj 166 181 t l;
#X obj 47 225 list;
#X obj 98 139 list append |;
#X obj 47 126 del 0;
#X obj 47 82 t b a;
#X text 119 75 hacky thing... replaycing " \, " with "|";
#X connect 0 0 7 0;
#X connect 2 0 3 0;
#X connect 2 0 4 1;
#X connect 3 0 2 1;
#X connect 4 0 1 0;
#X connect 5 0 2 0;
#X connect 6 0 2 1;
#X connect 6 0 4 0;
#X connect 7 0 6 0;
#X connect 7 1 5 0;
#X restore 48 38 pd collect;
#X obj 117 16 r \$0-save;
#X obj 27 130 text set \$0-savestates;
#X obj 27 104 list;
#X obj 117 62 t b f;
#X obj 117 39 clip 0 20;
#X connect 0 0 1 0;
#X connect 1 0 4 1;
#X connect 2 0 6 0;
#X connect 4 0 3 0;
#X connect 5 0 4 0;
#X connect 5 1 3 1;
#X connect 6 0 5 0;
#X restore 170 545 pd save;
#X obj 452 311 r \$0-xfeed;
#X msg 81 417 int.grain-trigger \$1 \, grain-distance \$2 \, random-grain-distance
\$3 \, delay \$4 \, random-delay \$5 \, grainsize \$6 \, random-grainsize
\$7 \, pitch \$8 \, random-pitch \$9 \, panorama \$10 \, random-panorama
\$11 \, amplitude \$12 \, random-amplitude \$13 \, feedback \$14 \,
feedback-damping \$15 \, filter-bypass \$16 \, frequency \$17 \, random-frequency
\$18 \, q \$19 \, random-q \$20 \, dry/wet \$21 \, env-type \$22 \,
env-bias \$23 \, env-shape \$24 \, x-feed \$25;
#X connect 1 0 5 0;
#X connect 2 0 5 1;
#X connect 3 0 5 2;
#X connect 4 0 5 3;
#X connect 5 0 30 0;
#X connect 6 0 5 4;
#X connect 7 0 5 5;
#X connect 8 0 5 6;
#X connect 9 0 5 10;
#X connect 10 0 5 9;
#X connect 11 0 5 8;
#X connect 12 0 5 7;
#X connect 13 0 5 11;
#X connect 14 0 5 12;
#X connect 15 0 5 13;
#X connect 16 0 5 14;
#X connect 17 0 5 15;
#X connect 18 0 5 16;
#X connect 19 0 5 17;
#X connect 20 0 5 18;
#X connect 21 0 5 19;
#X connect 22 0 5 20;
#X connect 23 0 5 21;
#X connect 24 0 5 22;
#X connect 25 0 5 23;
#X connect 26 0 0 0;
#X connect 27 0 0 0;
#X connect 28 0 26 0;
#X connect 29 0 0 0;
#X connect 30 0 0 0;
#X connect 30 1 34 0;
#X connect 30 2 29 0;
#X connect 31 0 27 0;
#X connect 31 1 28 0;
#X connect 31 2 32 0;
#X connect 33 0 5 24;
#X connect 34 0 31 0;
#X restore 753 456 pd outlet-message;
#X obj 753 484 outlet;
#X text 730 538 philipp schmalfuß \, 2018/19;
#X obj 289 288 clone pp.graindelay-onegrain 32 \$0;
#N canvas 1 57 607 400 dry/wet 0;
#X obj 46 0 inlet~;
#X obj 303 135 line~;
#X obj 303 113 pack 0 30;
#X obj 272 254 *~;
#X obj 46 374 outlet~;
#X obj 121 375 outlet~;
#X obj 288 222 -~;
#X obj 303 55 r \$0-drywet;
#X obj 272 1 inlet~;
#X obj 45 253 *~;
#X obj 121 1 inlet~;
#X obj 120 256 *~;
#X obj 303 78 / 50;
#X obj 302 198 clip~ 1 2;
#X obj 288 174 sig~ 2;
#X obj 135 212 clip~ 0 1;
#X connect 0 0 9 0;
#X connect 1 0 13 0;
#X connect 1 0 15 0;
#X connect 2 0 1 0;
#X connect 3 0 4 0;
#X connect 3 0 5 0;
#X connect 6 0 3 1;
#X connect 7 0 12 0;
#X connect 8 0 3 0;
#X connect 9 0 4 0;
#X connect 10 0 11 0;
#X connect 11 0 5 0;
#X connect 12 0 2 0;
#X connect 13 0 6 1;
#X connect 14 0 6 0;
#X connect 15 0 11 1;
#X connect 15 0 9 1;
#X restore 289 426 pd dry/wet;
#X f 63;
#N canvas 1 50 450 300 softclip 0;
#X obj 145 39 inlet~;
#X obj 145 62 *~ 0.5;
#X obj 174 91 pow~ 2;
#X obj 174 114 +~ 1;
#X obj 174 137 sqrt~;
#X obj 146 161 /~;
#X obj 146 184 *~ 2;
#X obj 146 207 outlet~;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 0 5 0;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 4 0 5 1;
#X connect 5 0 6 0;
#X connect 6 0 7 0;
#X restore 289 327 pd softclip;
#N canvas 1 50 450 300 softclip 0;
#X obj 145 39 inlet~;
#X obj 145 62 *~ 0.5;
#X obj 174 91 pow~ 2;
#X obj 174 114 +~ 1;
#X obj 174 137 sqrt~;
#X obj 146 161 /~;
#X obj 146 184 *~ 2;
#X obj 146 207 outlet~;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 0 5 0;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 4 0 5 1;
#X connect 5 0 6 0;
#X connect 6 0 7 0;
#X restore 489 325 pd softclip;
#X connect 0 0 1 0;
#X connect 1 0 9 0;
#X connect 2 0 25 0;
#X connect 3 0 4 0;
#X connect 4 0 1 1;
#X connect 7 0 4 1;
#X connect 8 0 3 1;
#X connect 10 0 3 0;
#X connect 11 0 2 0;
#X connect 12 0 0 0;
#X connect 16 0 25 1;
#X connect 16 0 26 2;
#X connect 20 0 21 0;
#X connect 22 0 23 0;
#X connect 25 0 27 0;
#X connect 25 1 28 0;
#X connect 26 0 18 0;
#X connect 26 1 19 0;
#X connect 27 0 26 0;
#X connect 28 0 26 1;
#X coords 0 -1 1 1 155 33 1 100 100;