diff options
Diffstat (limited to 'wahwah~')
| -rw-r--r-- | wahwah~/INSTALL | 15 | ||||
| -rw-r--r-- | wahwah~/rs-wahwah~.pd | 348 | ||||
| -rw-r--r-- | wahwah~/wahwah~-help.pd | 48 | ||||
| -rw-r--r-- | wahwah~/wahwah~.c | 408 |
4 files changed, 0 insertions, 819 deletions
diff --git a/wahwah~/INSTALL b/wahwah~/INSTALL deleted file mode 100644 index 62ca7df..0000000 --- a/wahwah~/INSTALL +++ /dev/null @@ -1,15 +0,0 @@ -untar in /my/pd/dir/externs - -cd /my/pd/dir/externs/wahwah~ - -make clean - -make - -make install - -open help-wahwah~.pd - -Thanx for getting here. -Yves/ -comments and bugs @ ydegoyon@free.fr diff --git a/wahwah~/rs-wahwah~.pd b/wahwah~/rs-wahwah~.pd deleted file mode 100644 index af5c256..0000000 --- a/wahwah~/rs-wahwah~.pd +++ /dev/null @@ -1,348 +0,0 @@ -#N canvas 97 16 837 658 10; -#X obj 87 469 outlet~; -#X msg 149 24 preset 1; -#X msg 149 46 preset 2; -#X msg 149 71 preset 3; -#X msg 149 95 preset 4; -#X msg 149 118 preset 5; -#X text 216 25 fast change medium wah-wah; -#X text 217 46 slow change medium wah-wah; -#X text 219 71 fast wah-wah; -#X text 219 94 ranged wah-wah; -#X obj 53 307 inlet~; -#X text 220 117 wah-wah 400/2000 Hz; -#X obj 177 468 tabwrite~ owahwah; -#N canvas 0 0 450 300 graph1 0; -#X array owahwah 2000 float 1; -#A 0 -0.039093 -0.0409546 -0.0498657 -0.0647583 -0.0871887 -0.115601 --0.149658 -0.186188 -0.222839 -0.259918 -0.295898 -0.328308 -0.356567 --0.380859 -0.399689 -0.412933 -0.419983 -0.419434 -0.410675 -0.392517 --0.365753 -0.331726 -0.29129 -0.245361 -0.196503 -0.148499 -0.103546 --0.0623779 -0.0287476 -0.00424194 0.00881958 0.0116577 0.00469971 -0.0116577 --0.0361023 -0.0664978 -0.100555 -0.136414 -0.172302 -0.205841 -0.235596 --0.261932 -0.283508 -0.299713 -0.311584 -0.318848 -0.321991 -0.322968 --0.322998 -0.322662 -0.321503 -0.321228 -0.321503 -0.321747 -0.322876 --0.323883 -0.324463 -0.324066 -0.320892 -0.31308 -0.299133 -0.277191 --0.244019 -0.198334 -0.139526 -0.0670471 0.0205078 0.121002 0.230194 -0.344482 0.460846 0.573944 0.677521 0.765656 0.833282 0.876801 0.893036 -0.882629 0.846802 0.78891 0.714539 0.629425 0.539551 0.452789 0.374146 -0.307892 0.257263 0.222931 0.204132 0.19812 0.20163 0.210175 0.21933 -0.225739 0.22525 0.214874 0.194916 0.164948 0.12674 0.0838013 0.0399475 --0.00134277 -0.0376587 -0.0657654 -0.0814819 -0.0820007 -0.0656738 --0.0337219 0.0140381 0.0779724 0.156006 0.245911 0.346008 0.452057 -0.559235 0.663025 0.757202 0.837769 0.896179 0.925873 0.922516 0.882751 -0.806122 0.694183 0.55191 0.387329 0.210052 0.0307922 -0.138519 -0.286224 --0.401611 -0.480316 -0.519104 -0.516846 -0.47644 -0.40213 -0.299652 --0.175842 -0.0374451 0.108887 0.257507 0.401276 0.536102 0.658722 0.767181 -0.857239 0.927002 0.974548 0.99762 0.995697 0.969116 0.919312 0.852112 -0.772278 0.684723 0.5961 0.511749 0.437042 0.374969 0.326416 0.289948 -0.260529 0.233032 0.201965 0.157501 0.0927124 0.00149536 -0.120087 --0.272583 -0.452911 -0.653748 -0.863739 -1 -1 -1 -1 -1 -1 -1 -1 -1 --0.973389 -0.805054 -0.654327 -0.533722 -0.449554 -0.403442 -0.390808 --0.404175 -0.431488 -0.458344 -0.471954 -0.461639 -0.419342 -0.340942 --0.226868 -0.0821228 0.0829468 0.257294 0.426544 0.577087 0.695618 -0.771759 0.798157 0.771332 0.692352 0.566376 0.402252 0.209686 -0.00247192 --0.22171 -0.43985 -0.650452 -0.847473 -1 -1 -1 -1 -1 -1 -1 -1 -1 -0.739136 --0.431183 -0.0951538 0.245636 0.56543 0.838531 0.999969 0.999969 0.999969 -0.999969 0.999969 0.802216 0.559937 0.29715 0.0325623 -0.217773 -0.442688 --0.636414 -0.795715 -0.92099 -1 -1 -1 -1 -1 -1 -1 -0.950989 -0.852966 --0.744476 -0.634064 -0.530029 -0.443756 -0.384125 -0.356415 -0.362183 --0.400238 -0.46228 -0.535309 -0.604767 -0.653046 -0.661835 -0.615387 --0.499878 -0.308197 -0.0406799 0.294312 0.67923 0.999969 0.999969 0.999969 -0.999969 0.999969 0.999969 0.999969 0.999969 0.999969 0.999969 0.966919 -0.579712 0.242889 -0.0168762 -0.183319 -0.249573 -0.221954 -0.117706 -0.0397949 0.221771 0.399139 0.544708 0.6362 0.657806 0.601624 0.468964 -0.27002 0.0221863 -0.252197 -0.526459 -0.774719 -0.97522 -1 -1 -1 -1 --0.943573 -0.758942 -0.54248 -0.306366 -0.0611267 0.189514 0.443115 -0.697449 0.950439 0.999969 0.999969 0.999969 0.999969 0.964325 0.130615 --0.55246 -1 -1 -1 -1 -0.892181 -0.560394 -0.220734 0.0826416 0.317352 -0.468048 0.532959 0.52005 0.447357 0.337616 0.211273 0.0874939 -0.0170288 --0.0913391 -0.131683 -0.139923 -0.121124 -0.0817871 -0.0301208 0.024353 -0.0731506 0.110504 0.135773 0.148865 0.149841 0.140442 0.124298 0.106171 -0.0886841 0.0727234 0.059021 0.0523376 0.0513 0.0559692 0.0643921 0.0751648 -0.0877991 0.100708 0.112091 0.121948 0.129303 0.135132 0.138153 0.14032 -0.140869 0.138428 0.133514 0.126801 0.11853 0.109406 0.0989685 0.0881042 -0.0773621 0.0661926 0.0561829 0.0480652 0.0427246 0.0401917 0.0408325 -0.0447388 0.0513611 0.0603638 0.0705261 0.0811157 0.0899658 0.0986023 -0.109009 0.120209 0.129822 0.13736 0.143433 0.147369 0.147949 0.144257 -0.136719 0.125061 0.11264 0.098175 0.0823669 0.0648804 0.0462036 0.0277405 -0.0106812 -0.00558472 -0.0222473 -0.0386353 -0.0551147 -0.0707397 -0.0862732 --0.100494 -0.114716 -0.129669 -0.144409 -0.158783 -0.17392 -0.188385 --0.202057 -0.214661 -0.228119 -0.240845 -0.252014 -0.262207 -0.269958 --0.2742 -0.275787 -0.275604 -0.273346 -0.268707 -0.26062 -0.249481 --0.234894 -0.216797 -0.196503 -0.174866 -0.1521 -0.129639 -0.108246 --0.0873108 -0.0687561 -0.0557556 -0.0469055 -0.0423889 -0.0438843 -0.052002 --0.0664673 -0.0872803 -0.114227 -0.145477 -0.179688 -0.217499 -0.255646 --0.293396 -0.329254 -0.361755 -0.387848 -0.407257 -0.419189 -0.423859 --0.421204 -0.410278 -0.390991 -0.363373 -0.32843 -0.288849 -0.245178 --0.199188 -0.151886 -0.106201 -0.0655518 -0.0318909 -0.00665283 0.00817871 -0.0127258 0.00680542 -0.00918579 -0.0333862 -0.0639954 -0.0982666 -0.134338 --0.170715 -0.205658 -0.237183 -0.263855 -0.28479 -0.300812 -0.31189 --0.319458 -0.324249 -0.325256 -0.324219 -0.322723 -0.320953 -0.319489 --0.319427 -0.319794 -0.32132 -0.323334 -0.325684 -0.325531 -0.321503 --0.31308 -0.298218 -0.275696 -0.2435 -0.198578 -0.140106 -0.0680542 -0.0185242 0.117798 0.226654 0.342102 0.459686 0.574188 0.679474 0.769562 -0.838745 0.882385 0.899384 0.889221 0.853149 0.795837 0.721283 0.636169 -0.547119 0.459595 0.379211 0.31076 0.25708 0.219452 0.197266 0.188873 -0.192383 0.202209 0.213013 0.220642 0.221832 0.213165 0.19397 0.16626 -0.13089 0.088623 0.0440369 0.000915527 -0.0377197 -0.0675049 -0.0849304 --0.0869141 -0.0715332 -0.0384521 0.0113525 0.0761108 0.153351 0.243347 -0.34433 0.450195 0.559174 0.665131 0.762085 0.843048 0.900848 0.930298 -0.927399 0.887878 0.810791 0.698273 0.555084 0.390106 0.211395 0.0317383 --0.137634 -0.286163 -0.404236 -0.485474 -0.526031 -0.525208 -0.485352 --0.40918 -0.304932 -0.179535 -0.0396118 0.107544 0.255615 0.399872 -0.536102 0.660431 0.770782 0.86261 0.9328 0.980865 0.999969 0.999969 -0.974121 0.92453 0.856995 0.77594 0.6875 0.598267 0.51413 0.439209 -0.374847 0.322754 0.283844 0.25415 0.227539 0.196381 0.153137 0.0905762 -0.00128174 -0.119019 -0.271637 -0.452423 -0.653564 -0.863922 -1 -1 --1 -1 -1 -1 -1 -1 -1 -0.983398 -0.81308 -0.660461 -0.537537 -0.450836 --0.401978 -0.387848 -0.399719 -0.425385 -0.452332 -0.466919 -0.458435 --0.417389 -0.341614 -0.229828 -0.0864868 0.0791321 0.254517 0.425201 -0.577057 0.696777 0.775177 0.805115 0.779572 0.700653 0.57431 0.409943 -0.216797 0.00445557 -0.216492 -0.4375 -0.651215 -0.849945 -1 -1 -1 --1 -1 -1 -1 -1 -1 -0.74588 -0.435699 -0.0969238 0.246063 0.567993 0.84314 -0.999969 0.999969 0.999969 0.999969 0.999969 0.809875 0.567505 0.303864 -0.0378418 -0.21463 -0.440674 -0.63559 -0.796692 -0.923798 -1 -1 -1 --1 -1 -1 -1 -0.955811 -0.856628 -0.747009 -0.635651 -0.53183 -0.44516 --0.384369 -0.356354 -0.361908 -0.400787 -0.461456 -0.533783 -0.603088 --0.651306 -0.660767 -0.614563 -0.500214 -0.311096 -0.0456238 0.2883 -0.672974 0.999969 0.999969 0.999969 0.999969 0.999969 0.999969 0.999969 -0.999969 0.999969 0.999969 0.980499 0.590179 0.248199 -0.017334 -0.188782 --0.259674 -0.235291 -0.132233 0.0249329 0.207764 0.386719 0.536774 -0.632294 0.657349 0.604553 0.475098 0.278259 0.0308228 -0.243103 -0.517395 --0.768127 -0.973206 -1 -1 -1 -1 -0.959106 -0.774323 -0.556854 -0.318909 --0.0692749 0.185944 0.443298 0.699951 0.954834 0.999969 0.999969 0.999969 -0.999969 0.974457 0.143829 -0.53949 -1 -1 -1 -1 -0.903381 -0.576324 --0.239136 0.0640564 0.302643 0.458801 0.528595 0.521362 0.454559 0.34787 -0.223083 0.100708 -0.00384521 -0.0808716 -0.125244 -0.137299 -0.120941 --0.0837097 -0.034668 0.0179138 0.0670166 0.107178 0.134186 0.148346 -0.149567 0.141113 0.127106 0.109955 0.0914917 0.0743103 0.0613708 0.0543518 -0.0514832 0.055542 0.0632629 0.0738831 0.086853 0.099884 0.112457 0.124176 -0.133881 0.140839 0.144562 0.143829 0.141327 0.13858 0.13269 0.124756 -0.116364 0.106812 0.0970764 0.0872192 0.0769348 0.0671387 0.0580139 -0.0501099 0.0437927 0.0418701 0.042572 0.0460205 0.052002 0.0600281 -0.0696106 0.0800171 0.0906982 0.101837 0.113098 0.123444 0.132507 0.139282 -0.144073 0.146057 0.145508 0.142029 0.135498 0.126556 0.115082 0.100403 -0.0848389 0.0665894 0.0477295 0.028595 0.00961304 -0.00848389 -0.0257874 --0.0423584 -0.0579224 -0.0725403 -0.0869141 -0.101044 -0.115021 -0.129028 --0.143372 -0.157471 -0.171783 -0.185913 -0.200317 -0.21463 -0.227814 --0.240723 -0.25351 -0.263885 -0.272064 -0.27774 -0.278992 -0.277557 --0.274323 -0.269073 -0.261414 -0.250854 -0.237091 -0.220551 -0.20047 --0.177368 -0.153992 -0.131348 -0.108795 -0.0869141 -0.0672302 -0.0518494 --0.0414734 -0.0362549 -0.0380554 -0.0472107 -0.0631714 -0.0870361 -0.115936 --0.148407 -0.183716 -0.220856 -0.258362 -0.294525 -0.328491 -0.360291 --0.386597 -0.405731 -0.418732 -0.424011 -0.420502 -0.409485 -0.390564 --0.363495 -0.329498 -0.289948 -0.245575 -0.19812 -0.151825 -0.106964 --0.0662842 -0.0315247 -0.00631714 0.00808716 0.0121765 0.00619507 -0.00915527 --0.0331421 -0.0646973 -0.0995178 -0.135773 -0.170959 -0.204376 -0.234741 --0.261475 -0.283386 -0.300293 -0.312531 -0.320435 -0.325775 -0.328857 --0.328583 -0.327423 -0.324768 -0.321655 -0.320312 -0.320129 -0.321136 --0.323212 -0.325043 -0.325714 -0.324677 -0.317566 -0.303802 -0.280762 --0.246704 -0.200073 -0.140594 -0.0681763 0.0187073 0.119446 0.22998 -0.346741 0.465454 0.579559 0.684998 0.774353 0.843231 0.887451 0.903961 -0.892273 0.854736 0.795959 0.72168 0.636566 0.546875 0.457825 0.378052 -0.311493 0.258972 0.22226 0.201965 0.194702 0.195862 0.202515 0.211456 -0.21814 0.218964 0.211273 0.19342 0.165619 0.129242 0.0864563 0.0415344 --0.000946045 -0.0385132 -0.0675964; -#A 1000 -0.0828857 -0.0823669 -0.0689392 -0.0388794 0.00836182 0.0713806 -0.14975 0.241821 0.343811 0.451385 0.560455 0.666168 0.763092 0.844269 -0.90271 0.933441 0.93103 0.891785 0.815155 0.70285 0.559235 0.392944 -0.213409 0.0327759 -0.138458 -0.288544 -0.407806 -0.489197 -0.529602 --0.528931 -0.489471 -0.415192 -0.311523 -0.184967 -0.0444336 0.103973 -0.253021 0.398804 0.536804 0.662079 0.772064 0.864349 0.936188 0.985199 -0.999969 0.999969 0.978607 0.930573 0.862488 0.779633 0.689514 0.59845 -0.512878 0.437439 0.373901 0.32309 0.284149 0.25415 0.226807 0.195282 -0.150726 0.0862732 -0.00366211 -0.123627 -0.274872 -0.454132 -0.654205 --0.864258 -1 -1 -1 -1 -1 -1 -1 -1 -1 -0.991821 -0.820068 -0.665405 --0.541504 -0.453644 -0.403442 -0.386169 -0.39621 -0.42099 -0.446625 --0.461151 -0.453278 -0.413788 -0.338745 -0.227814 -0.0853882 0.0786133 -0.252533 0.423523 0.576965 0.698975 0.777679 0.805695 0.781158 0.704956 -0.580536 0.416809 0.222107 0.00863647 -0.21347 -0.435455 -0.649841 --0.850922 -1 -1 -1 -1 -1 -1 -1 -1 -1 -0.750519 -0.43869 -0.0991211 -0.245605 0.57016 0.846985 0.999969 0.999969 0.999969 0.999969 0.999969 -0.822144 0.578339 0.312134 0.0435181 -0.211853 -0.442688 -0.641357 --0.804596 -0.932831 -1 -1 -1 -1 -1 -1 -1 -0.957397 -0.857697 -0.746979 --0.63446 -0.530609 -0.444061 -0.383301 -0.354889 -0.360779 -0.397675 --0.457886 -0.530243 -0.599121 -0.648041 -0.658875 -0.614075 -0.501556 --0.313599 -0.0487061 0.285431 0.670898 0.999969 0.999969 0.999969 0.999969 -0.999969 0.999969 0.999969 0.999969 0.999969 0.999969 0.994263 0.600861 -0.254944 -0.0148621 -0.190338 -0.26413 -0.241058 -0.140289 0.015686 -0.198242 0.379211 0.530151 0.627045 0.654694 0.604462 0.477448 0.282654 -0.0371704 -0.236206 -0.513153 -0.76593 -0.973389 -1 -1 -1 -1 -0.967407 --0.781769 -0.56424 -0.324951 -0.0736084 0.183289 0.443054 0.702942 -0.960358 0.999969 0.999969 0.999969 0.999969 0.986908 0.159088 -0.523895 --1 -1 -1 -1 -0.918671 -0.595154 -0.258484 0.046814 0.289673 0.451355 -0.529297 0.52771 0.463898 0.358154 0.232758 0.108521 0.00115967 -0.078125 --0.124237 -0.138458 -0.124237 -0.089386 -0.0411987 0.0108032 0.0605774 -0.101654 0.130585 0.147491 0.152008 0.145264 0.131958 0.113983 0.0951233 -0.0777283 0.0628357 0.0530701 0.0495605 0.0513916 0.0587158 0.0714722 -0.0856323 0.0986938 0.110992 0.123718 0.133789 0.141266 0.145508 0.147034 -0.145386 0.140686 0.134216 0.125916 0.115723 0.105774 0.096283 0.0852051 -0.0751038 0.0665894 0.05896 0.0525513 0.0475464 0.0441895 0.0434875 -0.0458984 0.0515747 0.0593872 0.0674438 0.0768127 0.0877991 0.0993042 -0.110229 0.121124 0.131989 0.141052 0.147308 0.14975 0.148834 0.144836 -0.138489 0.129425 0.116486 0.100189 0.0821228 0.0637207 0.0458069 0.0279846 -0.0101318 -0.0088501 -0.0272217 -0.0437927 -0.0577393 -0.071228 -0.0854492 --0.0998535 -0.11377 -0.127319 -0.141632 -0.157898 -0.17337 -0.187744 --0.202179 -0.21701 -0.231873 -0.245453 -0.2565 -0.265259 -0.272217 --0.2771 -0.278839 -0.277008 -0.272583 -0.267853 -0.261444 -0.251007 --0.236786 -0.21933 -0.19931 -0.177551 -0.154633 -0.131104 -0.107788 --0.0860291 -0.0675659 -0.0513306 -0.0410767 -0.037262 -0.0393066 -0.0481873 --0.0643311 -0.0869446 -0.115143 -0.148315 -0.183868 -0.221497 -0.259308 --0.29538 -0.328888 -0.359314 -0.384674 -0.403748 -0.416901 -0.423584 --0.421875 -0.412445 -0.394135 -0.368683 -0.335114 -0.294617 -0.248718 --0.200012 -0.150696 -0.103271 -0.0614319 -0.0278015 -0.00195312 0.0123291 -0.0169067 0.00997925 -0.0055542 -0.0300903 -0.0625 -0.0991211 -0.136505 --0.172913 -0.207245 -0.238586 -0.265167 -0.287231 -0.30426 -0.316223 --0.323425 -0.326294 -0.326965 -0.326263 -0.324585 -0.323242 -0.321442 --0.32077 -0.320282 -0.322388 -0.323883 -0.32547 -0.326569 -0.324921 --0.31781 -0.303741 -0.281006 -0.246765 -0.201111 -0.141479 -0.0682983 -0.0192566 0.11969 0.230042 0.346985 0.466461 0.582428 0.687988 0.777466 -0.847107 0.891693 0.908142 0.895447 0.859131 0.801605 0.726562 0.639618 -0.548218 0.459473 0.378784 0.310516 0.256836 0.219971 0.200043 0.192505 -0.195129 0.203156 0.211853 0.217621 0.218018 0.210602 0.192932 0.165924 -0.130157 0.0880737 0.0436707 0.000183105 -0.0377197 -0.0673523 -0.0857544 --0.0892944 -0.0753784 -0.0438232 0.00436401 0.0688477 0.148773 0.241241 -0.343048 0.451538 0.561401 0.667877 0.76535 0.84613 0.903748 0.934753 -0.933105 0.895264 0.82016 0.707977 0.564514 0.39798 0.217407 0.0344543 --0.138824 -0.291412 -0.41217 -0.494598 -0.535889 -0.534729 -0.494141 --0.418274 -0.314331 -0.188263 -0.0472717 0.101135 0.25116 0.398132 -0.53775 0.665833 0.776978 0.870361 0.94281 0.990692 0.999969 0.999969 -0.980591 0.930176 0.862274 0.780884 0.691925 0.601074 0.516296 0.440979 -0.37616 0.324341 0.284668 0.253754 0.225769 0.192902 0.148743 0.0855713 --0.00421143 -0.124268 -0.275452 -0.454956 -0.65567 -0.866638 -1 -1 --1 -1 -1 -1 -1 -1 -1 -1 -0.828003 -0.672089 -0.544495 -0.453064 -0.400085 --0.382477 -0.391357 -0.4151 -0.441681 -0.458649 -0.452606 -0.414001 --0.339233 -0.228607 -0.0864258 0.078186 0.253143 0.424225 0.577881 -0.701019 0.781769 0.811951 0.789276 0.713867 0.589264 0.423553 0.227509 -0.0120239 -0.211914 -0.435303 -0.651703 -0.853729 -1 -1 -1 -1 -1 -1 --1 -1 -1 -0.756287 -0.444092 -0.102905 0.243561 0.569672 0.849365 0.999969 -0.999969 0.999969 0.999969 0.999969 0.833405 0.590118 0.322998 0.0515442 --0.206573 -0.438843 -0.638672 -0.804199 -0.935913 -1 -1 -1 -1 -1 -1 --1 -0.96283 -0.861115 -0.749207 -0.636108 -0.531036 -0.444672 0.554535 -0.999969 0.999969 0.999969 0.999969 0.999969 0.999969 0.57547 0.100037 --0.290497 -0.564453 -0.710022 -0.732971 -0.656952 -0.510254 -0.323334 --0.128326 0.0491943 0.191101 0.28653 0.333221 0.336029 0.302673 0.245667 -0.17749 0.108307 0.0475159 0.00280762 -0.0238342 -0.0334473 -0.0276794 --0.00997925 0.0147095 0.0418701 0.0684509 0.0918579 0.109528 0.120117 -0.124176 0.123077 0.118225 0.111725 0.105469 0.100128 0.0970154 0.0969849 -0.0992432 0.105286 0.112579 0.120056 0.12735 0.133453 0.136932 0.136902 -0.133301 0.126068 0.116638 0.105255 0.0941467 0.0830078 0.0715942 0.0602722 -0.0501099 0.0424805 0.0380859 0.0365295 0.0378418 0.0431519 0.0505371 -0.0605164 0.0729065 0.0870056 0.100586 0.114044 0.126099 0.136108 0.144623 -0.150208 0.151245 0.149628 0.145538 0.13916 0.1297 0.11673 0.101257 -0.0846252 0.0667725 0.0483398 0.0305786 0.0133057 -0.00411987 -0.0206909 --0.0389404 -0.0566406 -0.0726929 -0.0880432 -0.102997 -0.11734 -0.131409 --0.145782 -0.159973 -0.174347 -0.189453 -0.204712 -0.218262 -0.231842 --0.243958 -0.254822 -0.264679 -0.272614 -0.278137 -0.280457 -0.277985 --0.274139 -0.26651 -0.255615 -0.242767 -0.227753 -0.210876 -0.192017 --0.171631 -0.150085 -0.12796 -0.106537 -0.0864563 -0.0697632 -0.0567932 --0.0470886 -0.0434875 -0.0454712 -0.0533142 -0.0669861 -0.0858154 -0.109589 --0.138916 -0.174042 -0.212128 -0.25116 -0.289917 -0.327362 -0.36142 --0.389282 -0.410004 -0.423279 -0.428436 -0.42514 -0.413666 -0.39328 --0.365875 -0.330109 -0.287811 -0.241241 -0.193298 -0.146057 -0.101135 --0.0602417 -0.0259705 -0.00109863 0.0117798 0.0144653 0.00726318 -0.00985718 --0.033844 -0.062439 -0.0951843 -0.13028 -0.165527 -0.199432 -0.230042 --0.256622 -0.279663 -0.296783 -0.30954 -0.317444 -0.32251 -0.324615 --0.324493 -0.323944 -0.323425 -0.322845 -0.324738 -0.325836 -0.326599 --0.327118 -0.327057 -0.325226 -0.320679 -0.311951 -0.296753 -0.273376 --0.240204 -0.194733 -0.136108 -0.0620117 0.0262451 0.125214 0.233795 -0.349182 0.466644 0.580963 0.68634 0.776581 0.846069 0.890045 0.907074 -0.899292 0.865997 0.809326 0.734558 0.647552 0.554962 0.463654 0.380096 -0.30957 0.255005 0.218353 0.196045 0.187775 0.189697 0.198151 0.208984 -0.216583 0.217407 0.209686 0.192047 0.165222 0.12973 0.0860291 0.0411072 --0.00177002 -0.0402222 -0.0692444 -0.0855408 -0.087616 -0.0743713 -0.04422 -0.00427246 0.0694275 0.149475 0.241608 0.343414 0.451263 0.561371 0.667389 -0.764069 0.845642 0.905365 0.937836 0.937012 0.899841 0.82428 0.711792 -0.567657 0.39978 0.217377 0.0335083 -0.139648 -0.292023 -0.41394 -0.498688 --0.541809 -0.54184 -0.500946 -0.424866 -0.320526 -0.195007 -0.0548401 -0.0941772 0.246277 0.395569 0.536713 0.665955 0.779266 0.873901 0.947601 -0.99646 0.999969 0.999969 0.985901 0.934845 0.865417 0.782837 0.693024 -0.601807 0.516235 0.439514 0.374481 0.323212 0.284424 0.253693 0.225494 -0.193054 0.148132 0.0826416 -0.00842285 -0.127563 -0.278015 -0.457214 --0.657013 -0.867767 -1 -1 -1 -1 -1 -1 -1 -1 -1 -1 -0.832947 -0.674957 --0.546509 -0.455109 -0.401459 -0.381561 -0.38913 -0.413025 -0.43924 --0.454773 -0.44754 -0.410187 -0.338013 -0.229919 -0.0897827 0.0737915 -0.248657 0.420746 0.575073 0.701202 0.783661 0.81601 0.795135 0.720795 -0.597382 0.432526 0.236237 0.0197754 -0.20636 -0.433411 -0.651581 -0.85675 --1 -1 -1 -1 -1 -1 -1 -1 -1 -0.761597 -0.449127 -0.10733 0.240723 0.567749 -0.849518 0.999969 0.999969 0.999969 0.999969 0.999969 0.846893 0.602264 -0.333496 0.0600586 -0.202484 -0.440704 -0.646301 -0.815704 -0.948914 --1 -1 -1 -1 -1 -1 -1 -0.964539 -0.862732 -0.751526 -0.638733 -0.534088 --0.447662 -0.387573 -0.358978 -0.362793 -0.397034 -0.4552 -0.525391 --0.592346 -0.640137 -0.651886 -0.610596 -0.502045 -0.315704 -0.0520325 -0.280945 0.666718 0.999969; -#X coords 0 2 1999 -2 200 140 1; -#X restore 596 461 graph; -#X msg 177 446 bang; -#X obj 602 315 hsl 128 15 0 100 0 0 empty empty empty 20 8 0 8 -262144 --1 -1 1270 0; -#X text 607 295 The pedal (step); -#X obj 601 216 f; -#X obj 632 216 + 1; -#X msg 599 158 bang; -#X obj 645 242 > 100; -#X obj 688 241 route 1; -#X msg 685 215 -1; -#X msg 559 216 0; -#X obj 693 185 route 1; -#X obj 664 186 < 0; -#X msg 690 159 1; -#X msg 555 160 stop; -#X obj 161 187 hsl 128 15 0 3000 0 0 empty empty empty 20 8 0 8 -262144 --1 -1 5600 0; -#X text 162 166 Minimum freq [ 0 - 3000 ]; -#X obj 212 221 hsl 128 15 0 3000 0 0 empty empty empty 20 8 0 8 -262144 --1 -1 3300 0; -#X text 207 205 Maximum freq [ 0 - 3000 ]; -#X obj 237 259 hsl 128 15 0 1000 0 0 empty empty empty 20 8 0 8 -262144 --1 -1 4200 0; -#X text 234 241 Sensibility [ 0 - 1000 ]; -#X obj 285 292 hsl 128 15 0 100 0 0 empty empty empty 20 8 0 8 -262144 --1 -1 1100 0; -#X text 280 275 Maxstep [ 0 - 100 ]; -#X obj 340 327 hsl 128 15 -15 15 0 0 empty empty empty 20 8 0 8 -262144 --1 -1 12400 0; -#X text 335 310 Gain [ -15 - 15 ]; -#X obj 408 369 hsl 128 15 0 10 0 0 empty empty empty 20 8 0 8 -262144 --1 -1 5000 0; -#X text 403 351 Bandwidth [ 0 - 10 ]; -#X text 597 126 Auto; -#X text 164 148 Note : setting a parameter overrides presets; -#X obj 87 414 wahwah~ -------------------------------------------------- -; -#X text 133 543 Note : interesting to set bandwith close to 10; -#X obj 600 185 metro 10; -#X obj 648 127 loadbang; -#X connect 1 0 42 0; -#X connect 2 0 42 0; -#X connect 3 0 42 0; -#X connect 4 0 42 0; -#X connect 5 0 42 0; -#X connect 10 0 42 0; -#X connect 14 0 12 0; -#X connect 15 0 42 7; -#X connect 17 0 18 0; -#X connect 17 0 20 0; -#X connect 17 0 25 0; -#X connect 17 0 15 0; -#X connect 18 0 17 1; -#X connect 19 0 44 0; -#X connect 20 0 21 0; -#X connect 21 0 22 0; -#X connect 22 0 18 1; -#X connect 23 0 17 0; -#X connect 24 0 26 0; -#X connect 25 0 24 0; -#X connect 26 0 18 1; -#X connect 27 0 44 0; -#X connect 28 0 42 1; -#X connect 30 0 42 2; -#X connect 32 0 42 3; -#X connect 34 0 42 4; -#X connect 36 0 42 5; -#X connect 38 0 42 6; -#X connect 42 0 0 0; -#X connect 42 0 12 0; -#X connect 44 0 17 0; -#X connect 45 0 19 0; diff --git a/wahwah~/wahwah~-help.pd b/wahwah~/wahwah~-help.pd deleted file mode 100644 index 8afeb3c..0000000 --- a/wahwah~/wahwah~-help.pd +++ /dev/null @@ -1,48 +0,0 @@ -#N canvas 45 57 817 573 10; -#X text 319 534 comments & bugs @ ydegoyon.free.fr; -#X text 431 111 Wahwah~ : used in psychedelic music; -#X obj 144 411 dac~; -#X obj 148 377 rs-wahwah~; -#X msg 94 62 bang; -#X obj 93 84 openpanel; -#X obj 93 104 t s b; -#X obj 150 106 float \$0; -#X text 101 39 Step 1 : Load a sound file; -#X obj 93 127 route float; -#X obj 94 219 soundfiler; -#X text 151 55 ( maybe \, a guitar sound ? ); -#X obj 93 150 makefilename %d-sample; -#X obj 582 374 table \$0-sample; -#X msg 94 197 read -resize \$1 \$2; -#X obj 95 176 pack s s; -#X msg 146 307 bang; -#X text 191 307 Step 2 : Start playing; -#X obj 59 288 adc~; -#X text 229 379 Step 3 : Modify parameters; -#X text 487 483 ( http://st.karelia.ru/~smlalx ); -#X text 320 470 a DOS guitar effects software that rocks; -#X text 321 484 written by Alexei Smoli; -#X obj 606 263 loadbang; -#X msg 608 293 \; pd dsp 1; -#X text 319 456 the algorithm is borrowed from Digital Effects \,; -#X obj 146 354 tabplay~ \$0-sample; -#X text 35 266 Plug a guitar ??; -#X msg 228 330 stop; -#X obj 146 330 metro 250; -#X connect 3 0 2 0; -#X connect 3 0 2 1; -#X connect 4 0 5 0; -#X connect 5 0 6 0; -#X connect 6 0 15 0; -#X connect 6 1 7 0; -#X connect 7 0 9 0; -#X connect 9 0 12 0; -#X connect 12 0 15 1; -#X connect 14 0 10 0; -#X connect 15 0 14 0; -#X connect 16 0 29 0; -#X connect 18 0 3 0; -#X connect 23 0 24 0; -#X connect 26 0 3 0; -#X connect 28 0 29 0; -#X connect 29 0 26 0; diff --git a/wahwah~/wahwah~.c b/wahwah~/wahwah~.c deleted file mode 100644 index 7f9a9ed..0000000 --- a/wahwah~/wahwah~.c +++ /dev/null @@ -1,408 +0,0 @@ -/* Copyright (c) 2002 Yves Degoyon. */ -/* For information on usage and redistribution, and for a DISCLAIMER OF ALL */ -/* WARRANTIES, see the file, "COPYING" in this distribution. */ -/* */ -/* wahwah~ -- a kind of effect used in psychedelic music */ -/* the algorithm was taken from Digital Effects, */ -/* a guitar effects software for DOS which rocks, written by Alexey Smoli */ -/* ( http://st.karelia.ru/~smlalx/ ) */ -/* */ -/* This program is free software; you can redistribute it and/or */ -/* modify it under the terms of the GNU General Public License */ -/* as published by the Free Software Foundation; either version 2 */ -/* of the License, or (at your option) any later version. */ -/* */ -/* See file LICENSE for further informations on licensing terms. */ -/* */ -/* This program is distributed in the hope that it will be useful, */ -/* but WITHOUT ANY WARRANTY; without even the implied warranty of */ -/* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the */ -/* GNU General Public License for more details. */ -/* */ -/* You should have received a copy of the GNU General Public License */ -/* along with this program; if not, write to the Free Software */ -/* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ -/* */ -/* Based on PureData by Miller Puckette and others. */ -/* */ -/* Made while listening to : */ -/* */ -/* Crass -- "Shaved Women ( Collaborators )" */ -/* Zounds -- "Can't Cheat Karma" */ -/* */ -/* Special message for the french : */ -/* "Delay all your work...and go vote against national front" */ -/* ---------------------------------------------------------------------------- */ - -#include "m_pd.h" -#include <stdlib.h> -#include <math.h> - -#ifdef NT -#define M_PI 3.14159265358979323846 -#endif - -#define BFSZ 4096 /* main delay buffer */ -#define BLOCK_DELAY 10 /* number of blocks to delay */ -#define NA 0.0 /* param not applicable */ -#define COEFFSIZE 3000 /* coefficients size */ -#define NBCOEFFS 5 /* number of coefficients */ - -static char *wahwah_version = "wahwah~: an audio wahwah, version 0.1 (ydegoyon@free.fr)"; - -typedef struct _wahwah -{ - t_object x_obj; - double *x_buf; - t_int x_samplerate; - t_float *x_coeffs; - double x_minfc; /* min frequency Hz */ /* 0< <3000 */ - double x_maxfc; /* max frequency Hz */ /* 0< <3000 */ - double x_sense; /* increase/decrease frequency change by one mouse movement Hz */ /* 0< <=1000 */ - double x_maxstep; /* maximum frequency change step KHz */ /* 0< <=100 */ - double x_dbgain; /* peaking filter gain dB */ /* -15<= <=15 */ - double x_bandwidth; /* bandwidth in octaves (between midpoint (dBgain/2) - gain frequencies) or */ /* 0< <10 */ - double x_Q; /* the EE kinda definition */ /* 0< <=1 */ - - /* variables for audio computation */ - double min_coef,max_coef,cur_coef,step,maxstep; - t_int down; - /* amplitudes */ - short x0,x1,x2; - t_int y0,y1,y2; - - t_float x_f; -} t_wahwah; - -static t_class *wahwah_class; - -static void wahwah_set_coeffs (t_wahwah *x) -{ - t_int i; - double omega; - double sn,cs; - double alpha = 0.0; - /* filter coefficients */ - double a0,a1,a2,b0,b1,b2; - double A; - - A = exp(x->x_dbgain/40.0)*log(10.0); - for (i = 0; i < COEFFSIZE; i++) - { - omega = 2.0*M_PI*(double)i/(double)x->x_samplerate; - sn = sin(omega); - cs = cos(omega); - if (x->x_bandwidth) - alpha = sn*sin(log(2.0)/2.0*x->x_bandwidth*omega/sn); - else - /* if Q is specified instead of bandwidth */ - if (x->x_Q) - alpha = sn/(2.0*x->x_Q); - - /* then compute the coefs for whichever filter type you want */ - b0 = 1.0 + alpha*A; - b1 = -2.0*cs ; - b2 = 1.0 - alpha*A; - a0 = 1.0 + alpha/A; - a1 = -2.0*cs ; - a2 = 1.0 - alpha/A; - - *(x->x_coeffs+i*NBCOEFFS) = (b0/a0); - *(x->x_coeffs+i*NBCOEFFS+1) = (b1/a0); - *(x->x_coeffs+i*NBCOEFFS+2) = (b2/a0); - *(x->x_coeffs+i*NBCOEFFS+3) = (a1/a0); - *(x->x_coeffs+i*NBCOEFFS+4) = (a2/a0); - // post( "wahwah~ : coeff : %f", *(x->x_coeffs+i*NBCOEFFS+4) ); - } - x->min_coef = x->x_minfc; - x->max_coef = x->x_maxfc; - x->cur_coef = x->min_coef; - x->down = 1; - x->step = 0; - x->maxstep = x->x_maxstep/(double)x->x_samplerate*1000.0; -} - -static void wahwah_bandwidth(t_wahwah *x, t_floatarg fbandwidth ) -{ - if ( fbandwidth > 10.0 ) - { - fbandwidth = 10.0; - } - if ( fbandwidth < 0.0 ) - { - fbandwidth = 0.0; - } - x->x_bandwidth = fbandwidth; - // post( "wahwah~ : bandwidth: %f", x->x_bandwidth ); - wahwah_set_coeffs( x ); -} - -static void wahwah_dbgain(t_wahwah *x, t_floatarg fdbgain ) -{ - if ( fdbgain > 15.0 ) - { - fdbgain = 15.0; - } - if ( fdbgain < -15.0 ) - { - fdbgain = -15.0; - } - x->x_dbgain = fdbgain; - // post( "wahwah~ : dbgain: %f", x->x_dbgain ); - wahwah_set_coeffs( x ); -} - -static void wahwah_maxstep(t_wahwah *x, t_floatarg fmaxstep ) -{ - if ( fmaxstep > 100.0 ) - { - fmaxstep = 100.0; - } - if ( fmaxstep < 0.0 ) - { - fmaxstep = 0.0; - } - x->x_maxstep = fmaxstep; - // post( "wahwah~ : maxstep: %f", x->x_maxstep ); - wahwah_set_coeffs( x ); -} - -static void wahwah_sensibility(t_wahwah *x, t_floatarg fsensibility ) -{ - if ( fsensibility > 1000.0 ) - { - fsensibility = 1000.0; - } - if ( fsensibility < 0.0 ) - { - fsensibility = 0.0; - } - x->x_sense = fsensibility; - // post( "wahwah~ : sensibility: %f", x->x_sense ); - wahwah_set_coeffs( x ); -} - -static void wahwah_maxfreq(t_wahwah *x, t_floatarg fmaxfreq ) -{ - if ( fmaxfreq > 3000.0 ) - { - fmaxfreq = 3000.0; - } - if ( fmaxfreq < 0.0 ) - { - fmaxfreq = 0.0; - } - x->x_maxfc = fmaxfreq; - // post( "wahwah~ : maxfreq: %f", x->x_maxfc ); - wahwah_set_coeffs( x ); -} - -static void wahwah_minfreq(t_wahwah *x, t_floatarg fminfreq ) -{ - if ( fminfreq > 3000.0 ) - { - fminfreq = 3000.0; - } - if ( fminfreq < 0.0 ) - { - fminfreq = 0.0; - } - x->x_minfc = fminfreq; - // post( "wahwah~ : minfreq: %f", x->x_minfc ); - wahwah_set_coeffs( x ); -} - -static void wahwah_step(t_wahwah *x, t_floatarg fstep ) -{ - if ( fstep > x->x_maxstep ) - { - fstep = x->x_maxstep; - } - if ( fstep < 0 ) - { - fstep = 0; - } - x->step = fstep*x->x_sense/x->x_samplerate; -} - -static t_int *wahwah_perform(t_int *w) -{ - t_float *in = (t_float *)(w[1]); - t_float *out = (t_float *)(w[2]); - t_int n = (int)(w[3]); - t_wahwah *x = (t_wahwah*)(w[4]); - t_int i; - - for (i=0; i<n; i++) - { - /* read input */ - x->x0 = (int)((*(in+i))*32768); - - x->y0 = (*(x->x_coeffs+(int)x->cur_coef*NBCOEFFS))*x->x0 - + (*(x->x_coeffs+(int)x->cur_coef*NBCOEFFS+1))*x->x1 - + (*(x->x_coeffs+(int)x->cur_coef*NBCOEFFS+2))*x->x2 - - (*(x->x_coeffs+(int)x->cur_coef*NBCOEFFS+3))*x->y1 - - (*(x->x_coeffs+(int)x->cur_coef*NBCOEFFS+4))*x->y2; - - x->y2 = x->y1; - x->y1 = x->y0; - x->x2 = x->x1; - x->x1 = x->x0; - - if(x->y0 > 32767.0) - x->y0 = 32767.0; - else if(x->y0 < -32768.0) - x->y0 = -32768.0; - - *(out+i) = (t_float)(x->y0) / 32768.0; - - x->cur_coef = x->cur_coef+x->down*x->step*(abs(x->x0)/(0.5*32768.0)); - // post ( "wahwah~ : cur coeff : %f", x->cur_coef ); - if(x->cur_coef > x->max_coef) - { - x->cur_coef = x->max_coef; - x->down = -1; - } - else if(x->cur_coef < x->min_coef) - { - x->cur_coef = x->min_coef; - x->down = 1; - } - - } - - return (w+5); -} - -static void wahwah_preset(t_wahwah *x, t_float pnumber) -{ - switch ( (int)pnumber ) - { - /* fast change medium wah wah */ - case 1: - x->x_minfc = 100.0; - x->x_maxfc = 1600.0; - x->x_sense = 100.0; - x->x_maxstep = 60.0; - x->x_dbgain = 15.0; - x->x_Q = 1.0; - break; - - /* slow change medium wah wah */ - case 2: - x->x_minfc = 100.0; - x->x_maxfc = 1600.0; - x->x_sense = 50.0; - x->x_maxstep = 36.0; - x->x_dbgain = 15.0; - x->x_Q = 1.0; - break; - - /* fast wah wah */ - case 3: - x->x_minfc = 100.0; - x->x_maxfc = 600.0; - x->x_sense = 100.0; - x->x_maxstep = 66.0; - x->x_dbgain = 15.0; - x->x_Q = 1.0; - break; - - /* ranged wah wah */ - case 4: - x->x_minfc = 10.0; - x->x_maxfc = 2900.0; - x->x_sense = 100.0; - x->x_maxstep = 66.0; - x->x_dbgain = 15.0; - x->x_Q = 1.0; - break; - - /* wah wah 400 - 2000 */ - case 5: - x->x_minfc = 400.0; - x->x_maxfc = 2000.0; - x->x_sense = 100.0; - x->x_maxstep = 66.0; - x->x_dbgain = 15.0; - x->x_Q = 1.0; - break; - - default: - post( "wahwah~ : unknown preset requested : %d", pnumber ); - return; - break; - } - wahwah_set_coeffs( x ); -} - -static void wahwah_dsp(t_wahwah *x, t_signal **sp) -{ - dsp_add(wahwah_perform, 4, sp[0]->s_vec, sp[1]->s_vec, sp[0]->s_n, x ); -} - - /* clean up */ -static void wahwah_free(t_wahwah *x) -{ - if ( x->x_buf != NULL ) { - freebytes(x->x_buf, BFSZ*sizeof( double ) ); - post( "Freed %d bytes", BFSZ*sizeof( double ) ); - x->x_buf = NULL; - } - if ( x->x_coeffs != NULL ) { - freebytes(x->x_coeffs, COEFFSIZE*NBCOEFFS*sizeof( t_float ) ); - post( "Freed %d bytes", COEFFSIZE*NBCOEFFS*sizeof( t_float )); - x->x_coeffs = NULL; - } -} - -static void *wahwah_new(void) -{ - t_wahwah *x = (t_wahwah *)pd_new(wahwah_class); - outlet_new(&x->x_obj, &s_signal); - inlet_new(&x->x_obj, &x->x_obj.ob_pd, &s_float, gensym("minfreq")); - inlet_new(&x->x_obj, &x->x_obj.ob_pd, &s_float, gensym("maxfreq")); - inlet_new(&x->x_obj, &x->x_obj.ob_pd, &s_float, gensym("sensibility")); - inlet_new(&x->x_obj, &x->x_obj.ob_pd, &s_float, gensym("maxstep")); - inlet_new(&x->x_obj, &x->x_obj.ob_pd, &s_float, gensym("dbgain")); - inlet_new(&x->x_obj, &x->x_obj.ob_pd, &s_float, gensym("bandwidth")); - inlet_new(&x->x_obj, &x->x_obj.ob_pd, &s_float, gensym("step")); - - x->x_samplerate = (int)sys_getsr(); - - if ( !( x->x_buf = ( double* ) getbytes( BFSZ*sizeof( double ) ) ) ) - { - post ("wahwah~ : could not allocate buffer" ); - return NULL; - } - if ( !( x->x_coeffs = ( t_float* ) getbytes( COEFFSIZE*NBCOEFFS*sizeof( t_float ) ) ) ) - { - post ("wahwah~ : could not allocate coeffs" ); - return NULL; - } - - // set default parameters - wahwah_preset( x, 1 ); - wahwah_set_coeffs( x ); - - return (x); -} - -void wahwah_tilde_setup(void) -{ - post( wahwah_version ); - wahwah_class = class_new(gensym("wahwah~"), (t_newmethod)wahwah_new, (t_method)wahwah_free, - sizeof(t_wahwah), 0, 0); - - CLASS_MAINSIGNALIN( wahwah_class, t_wahwah, x_f ); - class_addmethod(wahwah_class, (t_method)wahwah_step, gensym("step"), A_FLOAT, 0); - class_addmethod(wahwah_class, (t_method)wahwah_minfreq, gensym("minfreq"), A_FLOAT, 0); - class_addmethod(wahwah_class, (t_method)wahwah_maxfreq, gensym("maxfreq"), A_FLOAT, 0); - class_addmethod(wahwah_class, (t_method)wahwah_sensibility, gensym("sensibility"), A_FLOAT, 0); - class_addmethod(wahwah_class, (t_method)wahwah_maxstep, gensym("maxstep"), A_FLOAT, 0); - class_addmethod(wahwah_class, (t_method)wahwah_dbgain, gensym("dbgain"), A_FLOAT, 0); - class_addmethod(wahwah_class, (t_method)wahwah_bandwidth, gensym("bandwidth"), A_FLOAT, 0); - class_addmethod(wahwah_class, (t_method)wahwah_dsp, gensym("dsp"), 0); - class_addmethod(wahwah_class, (t_method)wahwah_preset, gensym("preset"), A_FLOAT, 0); -} |