diff options
author | Georg Holzmann <grholzi@users.sourceforge.net> | 2007-01-25 19:44:57 +0000 |
---|---|---|
committer | Georg Holzmann <grholzi@users.sourceforge.net> | 2007-01-25 19:44:57 +0000 |
commit | 3d12d40c0698f75583efe9c8986bc1259e1a76ba (patch) | |
tree | 74c19dbc33673e06e649e35da9a324aad079ab0d /tools |
initial commit of PureMeasurementHEADsvn2git-rootsvn2git-headabstractions/puremeasurement
svn path=/trunk/abstractions/puremeasurement/; revision=7382
Diffstat (limited to 'tools')
-rw-r--r-- | tools/pm_filters_44100Hz.pd | 1731 | ||||
-rw-r--r-- | tools/pm_scope.pd | 229 |
2 files changed, 1960 insertions, 0 deletions
diff --git a/tools/pm_filters_44100Hz.pd b/tools/pm_filters_44100Hz.pd new file mode 100644 index 0000000..f5069cb --- /dev/null +++ b/tools/pm_filters_44100Hz.pd @@ -0,0 +1,1731 @@ +#N canvas 526 235 729 701 10; +#X obj 171 34 hradio 20 1 1 26 empty empty empty 0 -6 0 8 -262144 -1 +-1 1; +#X text 668 17 16k; +#X text 630 17 10k; +#X text 553 17 4k; +#X text 613 56 8k; +#X text 495 56 2k; +#X text 433 17 1k; +#X text 410 56 800; +#X text 445 56 1.25k; +#X text 468 17 1.6k; +#X text 508 17 2.5k; +#X text 524 56 3.15k; +#X text 589 17 6.3k; +#X text 644 56 12.5k; +#X text 389 17 630; +#X text 370 56 500; +#X text 349 17 400; +#X text 331 56 315; +#X text 309 17 250; +#X text 290 56 200; +#X text 269 17 160; +#X text 252 56 125; +#X text 229 17 100; +#X text 213 56 80; +#X text 192 17 63; +#X text 173 56 50; +#X text 574 56 5k; +#N canvas 201 60 954 942 thirdoctfilt_44100Hz 0; +#X obj 28 -320 inlet~; +#X obj 147 347 outlet~; +#X obj 135 -320 inlet; +#X obj 163 -124 line~; +#X obj 148 289 *~; +#X msg 183 -238 set \$1; +#X floatatom 183 -212 5 0 0 0 - - -; +#X obj 183 -194 t b f; +#X text 18 308 ------------------------------------------------------------ +; +#X obj 331 -130 select 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 +18 19 20 21 22 23 24 25; +#X obj 178 -63 t b b; +#X obj 217 -63 t b b; +#X obj 256 -63 t b b; +#X obj 335 -50 t b b; +#X obj 374 -50 t b b; +#X obj 413 -50 t b b; +#X obj 495 -42 t b b; +#X obj 534 -42 t b b; +#X obj 573 -42 t b b; +#X obj 613 -42 t b b; +#X obj 652 -42 t b b; +#X obj 691 -42 t b b; +#X obj 731 -42 t b b; +#X obj 770 -42 t b b; +#X obj 809 -42 t b b; +#X obj 849 -42 t b b; +#X obj 496 13 t b b; +#X obj 535 13 t b b; +#X obj 574 13 t b b; +#X obj 614 13 t b b; +#X obj 653 13 t b b; +#X obj 692 13 t b b; +#X obj 731 13 t b b; +#X obj 770 13 t b b; +#X obj 809 13 t b b; +#X obj 849 13 t b b; +#X obj 208 -40 t b b; +#X obj 247 -40 t b b; +#X obj 286 -40 t b b; +#X obj 365 -27 t b b; +#X obj 404 -27 t b b; +#X obj 443 -27 t b b; +#X obj 525 -18 t b b; +#X obj 564 -18 t b b; +#X obj 603 -18 t b b; +#X obj 643 -18 t b b; +#X obj 682 -18 t b b; +#X obj 721 -18 t b b; +#X obj 761 -18 t b b; +#X obj 800 -18 t b b; +#X obj 839 -18 t b b; +#X obj 879 -18 t b b; +#X obj 525 37 t b b; +#X obj 564 37 t b b; +#X obj 603 37 t b b; +#X obj 643 37 t b b; +#X obj 682 37 t b b; +#X obj 721 37 t b b; +#X obj 761 37 t b b; +#X obj 800 37 t b b; +#X obj 839 37 t b b; +#X obj 879 37 t b b; +#X text 18 -297 ------------------------------------------------------------ +; +#X text 438 -297 ------------------------------------------------------------ +; +#X text 438 308 ------------------------------------------------------------ +; +#X msg 238 -4 0; +#X msg 275 -4 1; +#X msg 391 9 0; +#X msg 423 9 1; +#X msg 698 116 0; +#X msg 737 116 1; +#X obj 135 -283 t b f; +#X obj 135 -260 t b b; +#X obj 183 -172 delay 10; +#X obj 120 -238 delay 100; +#X msg 138 -151 0 100; +#X obj 19 -419 cnv 15 260 24 empty empty thirdoctfilt_44100Hz 20 12 +1 18 -233017 -1109 0; +#X obj 279 -419 cnv 15 120 24 empty empty subpatch 0 12 1 18 -233017 +-1109 0; +#X obj 421 223 cnv 15 200 25 empty empty empty 20 12 0 14 -225271 -66577 +0; +#N canvas 184 31 737 743 thirdoct_200to16000_44100Hz 0; +#X obj 170 133 biquad~ 1.97934 -0.984368 1 0 -1; +#X obj 170 155 biquad~ 1.98529 -0.99141 1 0 -1; +#X obj 170 177 biquad~ 1.99164 -0.994317 1 0 -1; +#X obj 170 200 /~ 2.07896e+06; +#X obj 169 342 *~ 0; +#X obj 204 237 hp2_crit~ 4500; +#X obj 310 237 hp2_butt~ 8000; +#X obj 310 258 hp2_butt~ 7000; +#X obj 310 279 hp2_butt~ 6000; +#X obj 309 342 *~ 0; +#X obj 205 342 *~ 0; +#X obj 41 -19 inlet~; +#X obj 119 -19 inlet; +#X obj 159 -19 inlet; +#X obj 199 -19 inlet; +#X obj 239 -19 inlet; +#X obj 279 -19 inlet; +#X obj 319 -19 inlet; +#X obj 359 -19 inlet; +#X obj 399 -19 inlet; +#X obj 439 -19 inlet; +#X obj 459 -42 inlet; +#X obj 479 -19 inlet; +#X obj 583 -19 inlet; +#X obj 139 -42 inlet; +#X obj 179 -42 inlet; +#X obj 219 -42 inlet; +#X obj 259 -42 inlet; +#X obj 299 -42 inlet; +#X obj 339 -42 inlet; +#X obj 379 -42 inlet; +#X obj 419 -42 inlet; +#X obj 499 -42 inlet; +#X obj 168 411 outlet~; +#X msg 504 51 1; +#X msg 473 51 0; +#X msg 434 51 1; +#X msg 403 51 0; +#X msg 311 51 1; +#X msg 280 51 0; +#X text 12 7 ------------------------------------------------------------ +; +#X text 432 7 ------------------------------------; +#X text 12 367 ------------------------------------------------------------ +; +#X text 432 367 ------------------------------------; +#X obj 583 51 switch~; +#X obj 192 93 cnv 15 270 25 empty empty empty 20 12 0 14 -225271 -66577 +0; +#X obj 19 -169 cnv 15 370 24 empty empty thirdoct_200to16000_44100Hz +20 12 1 18 -233017 -1109 0; +#X obj 389 -169 cnv 15 120 24 empty empty subpatch 0 12 1 18 -233017 +-1109 0; +#N canvas 252 90 884 854 filtcoeffs_thirdoct_200to16000_44100Hz 0; +#X text 86 -258 200Hz; +#X text 425 -258 250Hz; +#X text 761 -257 315Hz; +#X text 98 -147 400Hz; +#X text 118 -37 800Hz; +#X text 445 -148 500Hz; +#X text 782 -147 630Hz; +#X text 465 -38 1000Hz; +#X text 802 -37 1250Hz; +#X msg 375 -126 1.97934 -0.984368 1 0 -1; +#X msg 385 -105 1.98529 -0.99141 1 0 -1; +#X msg 405 -64 2.07896e+06; +#X msg 395 -15 1.94903 -0.968981 1 0 -1; +#X msg 405 5 1.95858 -0.982903 1 0 -1; +#X msg 415 26 1.96922 -0.985843 1 0 -1; +#X msg 425 46 263948; +#X text 138 73 1600Hz; +#X text 485 72 2000Hz; +#X text 822 73 2500Hz; +#X text 503 182 4000Hz; +#X text 840 183 5000Hz; +#X text 858 293 10000Hz; +#X text 521 292 8000Hz; +#X text 156 183 3150Hz; +#X text 172 293 6300Hz; +#X text 203 402 12500Hz; +#X text 544 402 16000Hz; +#X msg 415 95 1.86068 -0.938895 1 0 -1; +#X msg 425 115 1.87027 -0.966166 1 0 -1; +#X msg 435 136 1.9061 -0.971835 1 0 -1; +#X msg 445 156 34024.4; +#X msg 433 205 1.58358 -0.881301 1 0 -1; +#X msg 443 225 1.56581 -0.934006 1 0 -1; +#X msg 453 246 1.68907 -0.944046 1 0 -1; +#X msg 463 266 4516.51; +#X msg 451 315 0.736206 -0.775108 1 0 -1; +#X msg 461 335 0.582116 -0.876694 1 0 -1; +#X msg 471 356 0.961576 -0.887729 1 0 -1; +#X msg 481 376 633.146; +#X msg 471 425 -1.08626 -0.590435 1 0 -1; +#X msg 481 445 -0.845786 -0.743311 1 0 -1; +#X msg 491 466 -1.48363 -0.821932 1 0 -1; +#X obj 166 401 t b; +#X obj 146 291 t b; +#X obj 126 181 t b; +#X obj 106 71 t b; +#X obj 86 -39 t b; +#X obj 66 -149 t b; +#X obj 46 -259 t b; +#X obj 506 401 t b; +#X obj 486 291 t b; +#X obj 466 181 t b; +#X obj 446 71 t b; +#X obj 426 -39 t b; +#X obj 406 -149 t b; +#X obj 386 -259 t b; +#X obj 822 292 t b; +#X obj 802 182 t b; +#X obj 782 72 t b; +#X obj 762 -38 t b; +#X obj 742 -148 t b; +#X obj 722 -258 t b; +#X msg 355 -235 1.99091 -0.992174 1 0 -1; +#X msg 365 -215 1.99418 -0.995714 1 0 -1; +#X msg 375 -194 1.99536 -0.996406 1 0 -1; +#X msg 385 -174 1.6502e+07; +#X msg 395 -84 1.98873 -0.992902 1 0 -1; +#X text -38 575 biquad1; +#X text 17 575 biquad2; +#X text 73 575 biquad3; +#X text -88 521 ------------------------------------------------------------ +; +#X text 332 521 ------------------------------------------------------------ +; +#X text -48 -289 ------------------------------------------------------------ +; +#X text 372 -289 ------------------------------------------------------------ +; +#X obj 766 -314 inlet; +#X obj 806 -314 inlet; +#X obj 646 -314 inlet; +#X obj 686 -314 inlet; +#X obj 726 -314 inlet; +#X obj 526 -314 inlet; +#X obj 566 -314 inlet; +#X obj 606 -314 inlet; +#X obj 406 -314 inlet; +#X obj 446 -314 inlet; +#X obj 486 -314 inlet; +#X obj 286 -314 inlet; +#X obj 326 -314 inlet; +#X obj 366 -314 inlet; +#X obj 166 -314 inlet; +#X obj 206 -314 inlet; +#X obj 246 -314 inlet; +#X obj 46 -314 inlet; +#X obj 86 -314 inlet; +#X obj 126 -314 inlet; +#X msg 501 486 95.5325; +#X msg 35 -125 1.9844 -0.987574 1 0 -1; +#X msg 45 -105 1.98932 -0.993176 1 0 -1; +#X msg 55 -85 1.99173 -0.994362 1 0 -1; +#X msg 65 -65 4.14453e+06; +#X msg 55 -15 1.96268 -0.975302 1 0 -1; +#X msg 65 5 1.97104 -0.986403 1 0 -1; +#X msg 75 25 1.97826 -0.98875 1 0 -1; +#X msg 85 45 524523; +#X msg 691 -234 1.98812 -0.990125 1 0 -1; +#X msg 701 -214 1.99215 -0.99458 1 0 -1; +#X msg 711 -194 1.99386 -0.995522 1 0 -1; +#X msg 721 -174 8.26783e+06; +#X msg 711 -124 1.97238 -0.980347 1 0 -1; +#X msg 721 -104 1.9795 -0.989191 1 0 -1; +#X msg 731 -84 1.98444 -0.991062 1 0 -1; +#X msg 741 -64 1.04371e+06; +#X msg 731 -14 1.92956 -0.961073 1 0 -1; +#X msg 741 6 1.94003 -0.978516 1 0 -1; +#X msg 751 26 1.95588 -0.98219 1 0 -1; +#X msg 761 46 133040; +#X msg 75 95 1.9015 -0.951199 1 0 -1; +#X msg 85 115 1.91222 -0.973024 1 0 -1; +#X msg 95 135 1.93598 -0.9776 1 0 -1; +#X msg 105 155 67194.4; +#X msg 751 96 1.8009 -0.923604 1 0 -1; +#X msg 761 116 1.80679 -0.957626 1 0 -1; +#X msg 771 136 1.86096 -0.964593 1 0 -1; +#X msg 781 156 17283.2; +#X msg 769 206 1.39425 -0.852615 1 0 -1; +#X msg 779 226 1.34945 -0.918106 1 0 -1; +#X msg 789 246 1.53307 -0.929602 1 0 -1; +#X msg 799 266 2328.2; +#X msg 109 315 1.12089 -0.817591 1 0 -1; +#X msg 119 334 1.03229 -0.899014 1 0 -1; +#X msg 129 355 1.30062 -0.911271 1 0 -1; +#X msg 139 375 1208.85; +#X msg 787 316 0.219367 -0.723953 1 0 -1; +#X msg 797 336 -0.0219653 -0.851972 1 0 -1; +#X msg 807 356 0.485579 -0.856745 1 0 -1; +#X msg 817 376 335.067; +#X msg 131 425 -0.75474 -0.828373 1 0 -1; +#X msg 141 445 -0.419042 -0.662845 1 0 -1; +#X msg 151 465 -0.137799 -0.813629 1 0 -1; +#X msg 161 485 174.098; +#X msg 93 205 1.71264 -0.904603 1 0 -1; +#X msg 103 225 1.71034 -0.947007 1 0 -1; +#X msg 113 245 1.79234 -0.955463 1 0 -1; +#X msg 123 265 8796.1; +#X msg 15 -235 1.99298 -0.99378 1 0 -1; +#X msg 25 -215 1.99563 -0.996592 1 0 -1; +#X msg 35 -195 1.9965 -0.997155 1 0 -1; +#X msg 45 -175 3.29506e+07; +#X obj -37 552 outlet; +#X obj 19 552 outlet; +#X obj 75 552 outlet; +#X obj 169 552 outlet; +#X text 792 -289 -----------------; +#X text 752 521 --------------------------; +#X obj -38 115 t l; +#X obj -30 147 t l; +#X obj -15 188 t l; +#X obj -3 222 t l; +#X obj 302 115 t l; +#X obj 310 147 t l; +#X obj 325 188 t l; +#X obj 337 222 t l; +#X obj 642 115 t l; +#X obj 650 147 t l; +#X obj 665 188 t l; +#X obj 677 222 t l; +#X obj -46 -391 cnv 15 510 24 empty empty filtcoeffs_thirdoct_200to16000_44100Hz +20 12 1 18 -233017 -1109 0; +#X obj 459 -391 cnv 15 120 24 empty empty subpatch 0 12 1 18 -233017 +-1109 0; +#X text -46 -360 outputs coefficients for 3 biquads + one overall normalization +factor; +#X text 132 575 normalization factor; +#X connect 9 0 157 0; +#X connect 10 0 158 0; +#X connect 11 0 160 0; +#X connect 12 0 157 0; +#X connect 13 0 158 0; +#X connect 14 0 159 0; +#X connect 15 0 160 0; +#X connect 27 0 157 0; +#X connect 28 0 158 0; +#X connect 29 0 159 0; +#X connect 30 0 160 0; +#X connect 31 0 157 0; +#X connect 32 0 158 0; +#X connect 33 0 159 0; +#X connect 34 0 160 0; +#X connect 35 0 157 0; +#X connect 36 0 158 0; +#X connect 37 0 159 0; +#X connect 38 0 160 0; +#X connect 39 0 157 0; +#X connect 40 0 158 0; +#X connect 41 0 159 0; +#X connect 42 0 135 0; +#X connect 42 0 136 0; +#X connect 42 0 137 0; +#X connect 42 0 138 0; +#X connect 43 0 130 0; +#X connect 43 0 127 0; +#X connect 43 0 128 0; +#X connect 43 0 129 0; +#X connect 44 0 142 0; +#X connect 44 0 139 0; +#X connect 44 0 140 0; +#X connect 44 0 141 0; +#X connect 45 0 118 0; +#X connect 45 0 115 0; +#X connect 45 0 116 0; +#X connect 45 0 117 0; +#X connect 46 0 102 0; +#X connect 46 0 99 0; +#X connect 46 0 100 0; +#X connect 46 0 101 0; +#X connect 47 0 98 0; +#X connect 47 0 95 0; +#X connect 47 0 96 0; +#X connect 47 0 97 0; +#X connect 48 0 146 0; +#X connect 48 0 143 0; +#X connect 48 0 144 0; +#X connect 48 0 145 0; +#X connect 49 0 94 0; +#X connect 49 0 39 0; +#X connect 49 0 40 0; +#X connect 49 0 41 0; +#X connect 50 0 38 0; +#X connect 50 0 37 0; +#X connect 50 0 36 0; +#X connect 50 0 35 0; +#X connect 51 0 34 0; +#X connect 51 0 33 0; +#X connect 51 0 32 0; +#X connect 51 0 31 0; +#X connect 52 0 30 0; +#X connect 52 0 29 0; +#X connect 52 0 28 0; +#X connect 52 0 27 0; +#X connect 53 0 15 0; +#X connect 53 0 14 0; +#X connect 53 0 13 0; +#X connect 53 0 12 0; +#X connect 54 0 11 0; +#X connect 54 0 66 0; +#X connect 54 0 10 0; +#X connect 54 0 9 0; +#X connect 55 0 65 0; +#X connect 55 0 64 0; +#X connect 55 0 63 0; +#X connect 55 0 62 0; +#X connect 56 0 134 0; +#X connect 56 0 133 0; +#X connect 56 0 132 0; +#X connect 56 0 131 0; +#X connect 57 0 126 0; +#X connect 57 0 125 0; +#X connect 57 0 124 0; +#X connect 57 0 123 0; +#X connect 58 0 122 0; +#X connect 58 0 121 0; +#X connect 58 0 120 0; +#X connect 58 0 119 0; +#X connect 59 0 114 0; +#X connect 59 0 113 0; +#X connect 59 0 112 0; +#X connect 59 0 111 0; +#X connect 60 0 110 0; +#X connect 60 0 109 0; +#X connect 60 0 108 0; +#X connect 60 0 107 0; +#X connect 61 0 106 0; +#X connect 61 0 105 0; +#X connect 61 0 104 0; +#X connect 61 0 103 0; +#X connect 62 0 157 0; +#X connect 63 0 158 0; +#X connect 64 0 159 0; +#X connect 65 0 160 0; +#X connect 66 0 159 0; +#X connect 74 0 42 0; +#X connect 75 0 49 0; +#X connect 76 0 43 0; +#X connect 77 0 50 0; +#X connect 78 0 56 0; +#X connect 79 0 44 0; +#X connect 80 0 51 0; +#X connect 81 0 57 0; +#X connect 82 0 45 0; +#X connect 83 0 52 0; +#X connect 84 0 58 0; +#X connect 85 0 46 0; +#X connect 86 0 53 0; +#X connect 87 0 59 0; +#X connect 88 0 47 0; +#X connect 89 0 54 0; +#X connect 90 0 60 0; +#X connect 91 0 48 0; +#X connect 92 0 55 0; +#X connect 93 0 61 0; +#X connect 94 0 160 0; +#X connect 95 0 153 0; +#X connect 96 0 154 0; +#X connect 97 0 155 0; +#X connect 98 0 156 0; +#X connect 99 0 153 0; +#X connect 100 0 154 0; +#X connect 101 0 155 0; +#X connect 102 0 156 0; +#X connect 103 0 161 0; +#X connect 104 0 162 0; +#X connect 105 0 163 0; +#X connect 106 0 164 0; +#X connect 107 0 161 0; +#X connect 108 0 162 0; +#X connect 109 0 163 0; +#X connect 110 0 164 0; +#X connect 111 0 161 0; +#X connect 112 0 162 0; +#X connect 113 0 163 0; +#X connect 114 0 164 0; +#X connect 115 0 153 0; +#X connect 116 0 154 0; +#X connect 117 0 155 0; +#X connect 118 0 156 0; +#X connect 119 0 161 0; +#X connect 120 0 162 0; +#X connect 121 0 163 0; +#X connect 122 0 164 0; +#X connect 123 0 161 0; +#X connect 124 0 162 0; +#X connect 125 0 163 0; +#X connect 126 0 164 0; +#X connect 127 0 153 0; +#X connect 128 0 154 0; +#X connect 129 0 155 0; +#X connect 130 0 156 0; +#X connect 131 0 161 0; +#X connect 132 0 162 0; +#X connect 133 0 163 0; +#X connect 134 0 164 0; +#X connect 135 0 153 0; +#X connect 136 0 154 0; +#X connect 137 0 155 0; +#X connect 138 0 156 0; +#X connect 139 0 153 0; +#X connect 140 0 154 0; +#X connect 141 0 155 0; +#X connect 142 0 156 0; +#X connect 143 0 153 0; +#X connect 144 0 154 0; +#X connect 145 0 155 0; +#X connect 146 0 156 0; +#X connect 153 0 147 0; +#X connect 154 0 148 0; +#X connect 155 0 149 0; +#X connect 156 0 150 0; +#X connect 157 0 147 0; +#X connect 158 0 148 0; +#X connect 159 0 149 0; +#X connect 160 0 150 0; +#X connect 161 0 147 0; +#X connect 162 0 148 0; +#X connect 163 0 149 0; +#X connect 164 0 150 0; +#X restore 170 97 pd filtcoeffs_thirdoct_200to16000_44100Hz; +#X text 596 -47 |; +#X text 596 -37 V; +#X text 171 465 signal; +#X text 580 -88 bang to; +#X text 568 -75 switch this; +#X text 569 -62 subpatch on; +#X text 42 -75 input; +#X text 40 -62 signal; +#X text 187 429 |; +#X text 187 439 V; +#X text 56 -47 |; +#X text 56 -37 V; +#X text 170 452 output; +#X text 328 -75 |; +#X text 328 -65 V; +#X text 293 -128 a bang to; +#X text 261 -115 one of these inlets; +#X text 242 -102 selects the corresponding; +#X text 282 -89 mid frequency; +#X connect 0 0 1 0; +#X connect 1 0 2 0; +#X connect 2 0 3 0; +#X connect 3 0 4 0; +#X connect 3 0 5 0; +#X connect 3 0 6 0; +#X connect 4 0 33 0; +#X connect 5 0 10 0; +#X connect 6 0 7 0; +#X connect 7 0 8 0; +#X connect 8 0 9 0; +#X connect 9 0 33 0; +#X connect 10 0 33 0; +#X connect 11 0 0 0; +#X connect 12 0 38 0; +#X connect 12 0 39 0; +#X connect 12 0 48 0; +#X connect 13 0 38 0; +#X connect 13 0 39 0; +#X connect 13 0 48 2; +#X connect 14 0 38 0; +#X connect 14 0 39 0; +#X connect 14 0 48 4; +#X connect 15 0 38 0; +#X connect 15 0 39 0; +#X connect 15 0 48 6; +#X connect 16 0 38 0; +#X connect 16 0 39 0; +#X connect 16 0 48 8; +#X connect 17 0 38 0; +#X connect 17 0 39 0; +#X connect 17 0 48 10; +#X connect 18 0 38 0; +#X connect 18 0 39 0; +#X connect 18 0 48 12; +#X connect 19 0 38 0; +#X connect 19 0 39 0; +#X connect 19 0 48 14; +#X connect 20 0 38 0; +#X connect 20 0 39 0; +#X connect 20 0 48 16; +#X connect 21 0 38 0; +#X connect 21 0 39 0; +#X connect 21 0 48 17; +#X connect 22 0 36 0; +#X connect 22 0 37 0; +#X connect 22 0 48 18; +#X connect 23 0 44 0; +#X connect 24 0 38 0; +#X connect 24 0 39 0; +#X connect 24 0 48 1; +#X connect 25 0 38 0; +#X connect 25 0 39 0; +#X connect 25 0 48 3; +#X connect 26 0 38 0; +#X connect 26 0 39 0; +#X connect 26 0 48 5; +#X connect 27 0 38 0; +#X connect 27 0 39 0; +#X connect 27 0 48 7; +#X connect 28 0 38 0; +#X connect 28 0 39 0; +#X connect 28 0 48 9; +#X connect 29 0 38 0; +#X connect 29 0 39 0; +#X connect 29 0 48 11; +#X connect 30 0 38 0; +#X connect 30 0 39 0; +#X connect 30 0 48 13; +#X connect 31 0 38 0; +#X connect 31 0 39 0; +#X connect 31 0 48 15; +#X connect 32 0 34 0; +#X connect 32 0 35 0; +#X connect 32 0 48 19; +#X connect 34 0 9 1; +#X connect 35 0 4 1; +#X connect 35 0 10 1; +#X connect 36 0 10 1; +#X connect 37 0 4 1; +#X connect 37 0 9 1; +#X connect 38 0 4 1; +#X connect 39 0 10 1; +#X connect 39 0 9 1; +#X connect 48 0 0 0; +#X connect 48 1 1 0; +#X connect 48 2 2 0; +#X connect 48 3 3 1; +#X restore 402 227 pd thirdoct_200to16000_44100Hz; +#X obj 161 181 cnv 15 180 25 empty empty empty 20 12 0 14 -225271 -66577 +0; +#N canvas 572 25 569 485 thirdoct_100to160_44100Hz 0; +#X obj 85 21 inlet; +#X obj 149 21 inlet; +#X obj 213 21 inlet; +#X obj 311 21 inlet; +#X obj 23 21 inlet~; +#X text 8 45 ------------------------------------------------------------ +; +#X text 8 140 ------------------------------------------------------------ +; +#X obj 23 160 outlet~; +#X obj 311 74 switch~; +#X obj 23 71 lp6_butt~ 2000; +#X obj 23 121 lp6_butt~ 2000; +#X obj 19 -129 cnv 15 350 24 empty empty thirdoct_100to160_44100Hz +20 12 1 18 -233017 -1109 0; +#X obj 369 -129 cnv 15 120 24 empty empty subpatch 0 12 1 18 -233017 +-1109 0; +#X text 168 -15 V; +#X text 168 -25 |; +#X text 133 -78 a bang to; +#X text 101 -65 one of these inlets; +#X text 82 -52 selects the corresponding; +#X text 122 -39 mid frequency; +#X text 26 -36 input; +#X text 24 -23 signal; +#X text 40 -8 |; +#X text 40 2 V; +#X text 326 -7 |; +#X text 326 3 V; +#X text 310 -48 bang to; +#X text 298 -35 switch this; +#X text 299 -22 subpatch on; +#X text 26 214 signal; +#X text 42 178 |; +#X text 42 188 V; +#X text 25 201 output; +#X obj 43 92 cnv 15 180 25 empty empty empty 20 12 0 14 -225271 -66577 +0; +#N canvas 255 126 917 744 thirdoct_100to160_22050Hz 0; +#X obj 94 31 inlet; +#X obj 228 31 inlet; +#X obj 362 31 inlet; +#X obj 23 31 inlet~; +#X text 8 55 ------------------------------------------------------------ +; +#X text 428 55 -------------------------; +#X text 8 295 ------------------------------------------------------------ +; +#X text 428 295 -------------------------; +#X obj 268 332 outlet~; +#X obj 269 276 *~ 2; +#X obj 471 124 block~ 64 1 0.5; +#X obj 94 154 biquad~ 1.99292 -0.993731 1 0 -1; +#X obj 183 186 biquad~ 1.99558 -0.996565 1 0 -1; +#X obj 272 218 biquad~ 1.99646 -0.997131 1 0 -1; +#X obj 269 251 /~ 3.21799e+07; +#X obj 19 -109 cnv 15 350 24 empty empty thirdoct_100to160_22050Hz +20 12 1 18 -233017 -1109 0; +#X obj 369 -109 cnv 15 120 24 empty empty subpatch 0 12 1 18 -233017 +-1109 0; +#X text 238 -3 V; +#X text 238 -13 |; +#X text 203 -66 a bang to; +#X text 171 -53 one of these inlets; +#X text 152 -40 selects the corresponding; +#X text 192 -27 mid frequency; +#X text 26 -24 input; +#X text 24 -11 signal; +#X text 40 4 |; +#X text 40 14 V; +#X text 272 386 signal; +#X text 288 350 |; +#X text 288 360 V; +#X text 271 373 output; +#X obj 114 95 cnv 15 260 25 empty empty empty 20 12 0 14 -225271 -66577 +0; +#N canvas 109 30 733 516 filtcoeffs_thirdoct_200to315_44100Hz 0; +#X text 117 -23 200Hz; +#X text 222 75 250Hz; +#X text 12 -39 ------------------------------------------------------------ +; +#X obj 176 -64 inlet; +#X obj 328 -64 inlet; +#X obj 482 -64 inlet; +#X obj 46 314 outlet; +#X obj 106 314 outlet; +#X obj 166 314 outlet; +#X obj 264 314 outlet; +#X text 43 340 biquad1; +#X text 103 340 biquad2; +#X text 163 340 biquad3; +#X text 15 285 ------------------------------------------------------------ +; +#X text 432 -39 ------------------------; +#X text 435 285 ------------------------; +#X text 315 174 315Hz; +#X msg 46 0 1.99298 -0.99378 1 0 -1; +#X msg 66 20 1.99563 -0.996592 1 0 -1; +#X msg 86 40 1.9965 -0.997155 1 0 -1; +#X msg 106 60 3.29506e+07; +#X msg 152 98 1.99091 -0.992174 1 0 -1; +#X msg 172 118 1.99418 -0.995714 1 0 -1; +#X msg 192 139 1.99536 -0.996406 1 0 -1; +#X msg 212 159 1.6502e+07; +#X msg 245 197 1.98812 -0.990125 1 0 -1; +#X msg 265 217 1.99215 -0.99458 1 0 -1; +#X msg 285 237 1.99386 -0.995522 1 0 -1; +#X msg 305 257 8.26783e+06; +#X obj 14 -151 cnv 15 470 24 empty empty filtcoeffs_thirdoct_200to315_44100Hz +20 12 1 18 -233017 -1109 0; +#X obj 479 -151 cnv 15 120 24 empty empty subpatch 0 12 1 18 -233017 +-1109 0; +#X text 14 -120 outputs coefficients for 3 biquads + one overall normalization +factor; +#X text 228 340 normalization factor; +#X connect 3 0 17 0; +#X connect 3 0 18 0; +#X connect 3 0 19 0; +#X connect 3 0 20 0; +#X connect 4 0 21 0; +#X connect 4 0 22 0; +#X connect 4 0 23 0; +#X connect 4 0 24 0; +#X connect 5 0 25 0; +#X connect 5 0 26 0; +#X connect 5 0 27 0; +#X connect 5 0 28 0; +#X connect 17 0 6 0; +#X connect 18 0 7 0; +#X connect 19 0 8 0; +#X connect 20 0 9 0; +#X connect 21 0 6 0; +#X connect 22 0 7 0; +#X connect 23 0 8 0; +#X connect 24 0 9 0; +#X connect 25 0 6 0; +#X connect 26 0 7 0; +#X connect 27 0 8 0; +#X connect 28 0 9 0; +#X restore 94 99 pd filtcoeffs_thirdoct_200to315_44100Hz; +#X connect 0 0 32 0; +#X connect 1 0 32 1; +#X connect 2 0 32 2; +#X connect 3 0 11 0; +#X connect 9 0 8 0; +#X connect 11 0 12 0; +#X connect 12 0 13 0; +#X connect 13 0 14 0; +#X connect 14 0 9 0; +#X connect 32 0 11 0; +#X connect 32 1 12 0; +#X connect 32 2 13 0; +#X connect 32 3 14 1; +#X restore 22 96 pd thirdoct_100to160_22050Hz; +#X connect 0 0 33 1; +#X connect 1 0 33 2; +#X connect 2 0 33 3; +#X connect 3 0 8 0; +#X connect 4 0 9 0; +#X connect 9 0 33 0; +#X connect 10 0 7 0; +#X connect 33 0 10 0; +#X restore 140 185 pd thirdoct_100to160_44100Hz; +#X obj 50 112 cnv 15 170 25 empty empty empty 20 12 0 14 -225271 -66577 +0; +#N canvas 27 206 669 536 thirdoct_50to80_44100Hz 0; +#X obj 101 21 inlet; +#X obj 160 21 inlet; +#X obj 219 21 inlet; +#X obj 323 21 inlet; +#X obj 43 21 inlet~; +#X text 28 45 ------------------------------------------------------------ +; +#X text 28 162 ------------------------------------------------------------ +; +#X obj 44 187 outlet~; +#X obj 323 71 switch~; +#X obj 43 72 lp6_butt~ 1000; +#X obj 43 132 lp6_butt~ 1000; +#X obj 31 -127 cnv 15 330 24 empty empty thirdoct_50to80_44100Hz 20 +12 1 18 -233017 -1109 0; +#X obj 361 -127 cnv 15 120 24 empty empty subpatch 0 12 1 18 -233017 +-1109 0; +#X text 180 -13 V; +#X text 180 -23 |; +#X text 145 -76 a bang to; +#X text 113 -63 one of these inlets; +#X text 94 -50 selects the corresponding; +#X text 134 -37 mid frequency; +#X text 48 -34 input; +#X text 46 -21 signal; +#X text 62 -6 |; +#X text 62 4 V; +#X text 338 -5 |; +#X text 338 5 V; +#X text 322 -46 bang to; +#X text 310 -33 switch this; +#X text 311 -20 subpatch on; +#X text 47 241 signal; +#X text 63 205 |; +#X text 63 215 V; +#X text 46 228 output; +#X obj 63 98 cnv 15 170 25 empty empty empty 20 12 0 14 -225271 -66577 +0; +#N canvas 0 0 886 687 thirdoct_50to80_11025Hz 0; +#X text 8 405 ------------------------------------------------------------ +; +#X text 428 405 -------------------------; +#X obj 268 442 outlet~; +#X obj 94 264 biquad~ 1.99292 -0.993731 1 0 -1; +#X obj 183 296 biquad~ 1.99558 -0.996565 1 0 -1; +#X obj 272 328 biquad~ 1.99646 -0.997131 1 0 -1; +#X obj 269 361 /~ 3.21799e+07; +#X obj 471 234 block~ 64 1 0.25; +#X obj 269 386 *~ 4; +#X obj 94 151 inlet; +#X obj 228 151 inlet; +#X obj 362 151 inlet; +#X obj 23 151 inlet~; +#X text 8 175 ------------------------------------------------------------ +; +#X text 428 175 -------------------------; +#X obj 19 11 cnv 15 320 24 empty empty thirdoct_50to80_11025Hz 20 12 +1 18 -233017 -1109 0; +#X obj 339 11 cnv 15 120 24 empty empty subpatch 0 12 1 18 -233017 +-1109 0; +#X text 238 117 V; +#X text 238 107 |; +#X text 203 54 a bang to; +#X text 171 67 one of these inlets; +#X text 152 80 selects the corresponding; +#X text 192 93 mid frequency; +#X text 26 96 input; +#X text 24 109 signal; +#X text 40 124 |; +#X text 40 134 V; +#X obj 114 215 cnv 15 260 25 empty empty empty 20 12 0 14 -225271 -66577 +0; +#N canvas 109 30 733 516 filtcoeffs_thirdoct_200to315_44100Hz 0; +#X text 117 -23 200Hz; +#X text 222 75 250Hz; +#X text 12 -39 ------------------------------------------------------------ +; +#X obj 176 -64 inlet; +#X obj 328 -64 inlet; +#X obj 482 -64 inlet; +#X obj 46 314 outlet; +#X obj 106 314 outlet; +#X obj 166 314 outlet; +#X obj 264 314 outlet; +#X text 43 340 biquad1; +#X text 103 340 biquad2; +#X text 163 340 biquad3; +#X text 15 285 ------------------------------------------------------------ +; +#X text 432 -39 ------------------------; +#X text 435 285 ------------------------; +#X text 315 174 315Hz; +#X msg 46 0 1.99298 -0.99378 1 0 -1; +#X msg 66 20 1.99563 -0.996592 1 0 -1; +#X msg 86 40 1.9965 -0.997155 1 0 -1; +#X msg 106 60 3.29506e+07; +#X msg 152 98 1.99091 -0.992174 1 0 -1; +#X msg 172 118 1.99418 -0.995714 1 0 -1; +#X msg 192 139 1.99536 -0.996406 1 0 -1; +#X msg 212 159 1.6502e+07; +#X msg 245 197 1.98812 -0.990125 1 0 -1; +#X msg 265 217 1.99215 -0.99458 1 0 -1; +#X msg 285 237 1.99386 -0.995522 1 0 -1; +#X msg 305 257 8.26783e+06; +#X obj 14 -151 cnv 15 470 24 empty empty filtcoeffs_thirdoct_200to315_44100Hz +20 12 1 18 -233017 -1109 0; +#X obj 479 -151 cnv 15 120 24 empty empty subpatch 0 12 1 18 -233017 +-1109 0; +#X text 14 -120 outputs coefficients for 3 biquads + one overall normalization +factor; +#X text 228 340 normalization factor; +#X connect 3 0 17 0; +#X connect 3 0 18 0; +#X connect 3 0 19 0; +#X connect 3 0 20 0; +#X connect 4 0 21 0; +#X connect 4 0 22 0; +#X connect 4 0 23 0; +#X connect 4 0 24 0; +#X connect 5 0 25 0; +#X connect 5 0 26 0; +#X connect 5 0 27 0; +#X connect 5 0 28 0; +#X connect 17 0 6 0; +#X connect 18 0 7 0; +#X connect 19 0 8 0; +#X connect 20 0 9 0; +#X connect 21 0 6 0; +#X connect 22 0 7 0; +#X connect 23 0 8 0; +#X connect 24 0 9 0; +#X connect 25 0 6 0; +#X connect 26 0 7 0; +#X connect 27 0 8 0; +#X connect 28 0 9 0; +#X restore 94 219 pd filtcoeffs_thirdoct_200to315_44100Hz; +#X text 272 496 signal; +#X text 288 460 |; +#X text 288 470 V; +#X text 271 483 output; +#X connect 3 0 4 0; +#X connect 4 0 5 0; +#X connect 5 0 6 0; +#X connect 6 0 8 0; +#X connect 8 0 2 0; +#X connect 9 0 28 0; +#X connect 10 0 28 1; +#X connect 11 0 28 2; +#X connect 12 0 3 0; +#X connect 28 0 3 0; +#X connect 28 1 4 0; +#X connect 28 2 5 0; +#X connect 28 3 6 1; +#X restore 42 102 pd thirdoct_50to80_11025Hz; +#X connect 0 0 33 1; +#X connect 1 0 33 2; +#X connect 2 0 33 3; +#X connect 3 0 8 0; +#X connect 4 0 9 0; +#X connect 9 0 33 0; +#X connect 10 0 7 0; +#X connect 33 0 10 0; +#X restore 29 116 pd thirdoct_50to80_44100Hz; +#X text 33 -374 input; +#X text 31 -361 signal; +#X text 47 -346 |; +#X text 47 -336 V; +#X text 151 402 signal; +#X text 167 366 |; +#X text 167 376 V; +#X text 150 389 output; +#X text 133 -375 number sets the mid-frequency:; +#X text 133 -361 0=50Hz to 25=16kHz; +#X text 150 -346 |; +#X text 150 -336 V; +#X msg 183 -151 1 100; +#X connect 0 0 79 0; +#X connect 0 0 81 0; +#X connect 0 0 83 0; +#X connect 2 0 71 0; +#X connect 3 0 4 1; +#X connect 4 0 1 0; +#X connect 5 0 6 0; +#X connect 6 0 7 0; +#X connect 7 0 73 0; +#X connect 7 1 9 0; +#X connect 9 0 10 0; +#X connect 9 1 11 0; +#X connect 9 2 12 0; +#X connect 9 3 13 0; +#X connect 9 4 14 0; +#X connect 9 5 15 0; +#X connect 9 6 26 0; +#X connect 9 7 16 0; +#X connect 9 8 27 0; +#X connect 9 9 17 0; +#X connect 9 10 28 0; +#X connect 9 11 18 0; +#X connect 9 12 29 0; +#X connect 9 13 19 0; +#X connect 9 14 30 0; +#X connect 9 15 20 0; +#X connect 9 16 31 0; +#X connect 9 17 21 0; +#X connect 9 18 32 0; +#X connect 9 19 22 0; +#X connect 9 20 33 0; +#X connect 9 21 23 0; +#X connect 9 22 34 0; +#X connect 9 23 24 0; +#X connect 9 24 35 0; +#X connect 9 25 25 0; +#X connect 10 0 83 1; +#X connect 10 1 36 0; +#X connect 11 0 83 2; +#X connect 11 1 37 0; +#X connect 12 0 83 3; +#X connect 12 1 38 0; +#X connect 13 0 81 1; +#X connect 13 1 39 0; +#X connect 14 0 81 2; +#X connect 14 1 40 0; +#X connect 15 0 81 3; +#X connect 15 1 41 0; +#X connect 16 0 79 2; +#X connect 16 1 42 0; +#X connect 17 0 79 4; +#X connect 17 1 43 0; +#X connect 18 0 79 6; +#X connect 18 1 44 0; +#X connect 19 0 79 8; +#X connect 19 1 45 0; +#X connect 20 0 79 10; +#X connect 20 1 46 0; +#X connect 21 0 79 12; +#X connect 21 1 47 0; +#X connect 22 0 79 14; +#X connect 22 1 48 0; +#X connect 23 0 79 16; +#X connect 23 1 49 0; +#X connect 24 0 79 18; +#X connect 24 1 50 0; +#X connect 25 0 79 20; +#X connect 25 1 51 0; +#X connect 26 0 79 1; +#X connect 26 1 52 0; +#X connect 27 0 79 3; +#X connect 27 1 53 0; +#X connect 28 0 79 5; +#X connect 28 1 54 0; +#X connect 29 0 79 7; +#X connect 29 1 55 0; +#X connect 30 0 79 9; +#X connect 30 1 56 0; +#X connect 31 0 79 11; +#X connect 31 1 57 0; +#X connect 32 0 79 13; +#X connect 32 1 58 0; +#X connect 33 0 79 15; +#X connect 33 1 59 0; +#X connect 34 0 79 17; +#X connect 34 1 60 0; +#X connect 35 0 79 19; +#X connect 35 1 61 0; +#X connect 36 0 65 0; +#X connect 36 1 66 0; +#X connect 37 0 65 0; +#X connect 37 1 66 0; +#X connect 38 0 65 0; +#X connect 38 1 66 0; +#X connect 39 0 67 0; +#X connect 39 1 68 0; +#X connect 40 0 67 0; +#X connect 40 1 68 0; +#X connect 41 0 67 0; +#X connect 41 1 68 0; +#X connect 42 0 69 0; +#X connect 42 1 70 0; +#X connect 43 0 69 0; +#X connect 43 1 70 0; +#X connect 44 0 69 0; +#X connect 44 1 70 0; +#X connect 45 0 69 0; +#X connect 45 1 70 0; +#X connect 46 0 69 0; +#X connect 46 1 70 0; +#X connect 47 0 69 0; +#X connect 47 1 70 0; +#X connect 48 0 69 0; +#X connect 48 1 70 0; +#X connect 49 0 69 0; +#X connect 49 1 70 0; +#X connect 50 0 69 0; +#X connect 50 1 70 0; +#X connect 51 0 69 0; +#X connect 51 1 70 0; +#X connect 52 0 69 0; +#X connect 52 1 70 0; +#X connect 53 0 69 0; +#X connect 53 1 70 0; +#X connect 54 0 69 0; +#X connect 54 1 70 0; +#X connect 55 0 69 0; +#X connect 55 1 70 0; +#X connect 56 0 69 0; +#X connect 56 1 70 0; +#X connect 57 0 69 0; +#X connect 57 1 70 0; +#X connect 58 0 69 0; +#X connect 58 1 70 0; +#X connect 59 0 69 0; +#X connect 59 1 70 0; +#X connect 60 0 69 0; +#X connect 60 1 70 0; +#X connect 61 0 69 0; +#X connect 61 1 70 0; +#X connect 65 0 79 21; +#X connect 65 0 81 4; +#X connect 66 0 83 4; +#X connect 67 0 79 21; +#X connect 67 0 83 4; +#X connect 68 0 81 4; +#X connect 69 0 81 4; +#X connect 69 0 83 4; +#X connect 70 0 79 21; +#X connect 71 0 72 0; +#X connect 71 1 5 0; +#X connect 72 0 74 0; +#X connect 72 1 75 0; +#X connect 73 0 96 0; +#X connect 74 0 6 0; +#X connect 75 0 3 0; +#X connect 79 0 4 0; +#X connect 81 0 4 0; +#X connect 83 0 4 0; +#X connect 96 0 3 0; +#X restore 15 77 pd thirdoctfilt_44100Hz; +#X obj 136 118 hradio 20 1 1 9 empty empty empty 0 -6 0 8 -262144 -1 +-1 1; +#X text 278 102 4k; +#X text 298 140 8k; +#X text 258 140 2k; +#X text 238 102 1k; +#X text 174 140 125; +#X text 215 140 500; +#X text 158 102 63; +#X text 195 102 250; +#N canvas 227 1 954 931 octfilt_44100Hz 0; +#X obj 49 -330 inlet~; +#X obj 178 337 outlet~; +#X obj 165 -332 inlet; +#X obj 193 -134 line~; +#X obj 179 279 *~; +#X msg 213 -248 set \$1; +#X floatatom 213 -222 5 0 0 0 - - -; +#X obj 213 -204 t b f; +#X text 18 298 ------------------------------------------------------------ +; +#X obj 494 13 t b b; +#X obj 573 13 t b b; +#X obj 652 13 t b b; +#X obj 455 13 t b b; +#X obj 534 13 t b b; +#X obj 613 13 t b b; +#X obj 247 -38 t b b; +#X obj 315 -16 t b b; +#X obj 446 36 t b b; +#X obj 485 36 t b b; +#X obj 524 36 t b b; +#X obj 564 36 t b b; +#X obj 603 36 t b b; +#X obj 642 36 t b b; +#X obj 682 36 t b b; +#X text 18 -307 ------------------------------------------------------------ +; +#X text 438 -307 ------------------------------------------------------------ +; +#X text 438 298 ------------------------------------------------------------ +; +#X msg 247 -16 0; +#X msg 277 -16 1; +#X msg 315 6 0; +#X msg 345 6 1; +#X msg 571 84 0; +#X msg 610 84 1; +#X obj 165 -293 t b f; +#X obj 165 -270 t b b; +#X msg 213 -161 1 30; +#X obj 213 -182 delay 10; +#X obj 150 -248 delay 100; +#X msg 168 -161 0 100; +#X obj 416 13 t b b; +#X obj 331 -96 select 0 1 2 3 4 5 6 7 8; +#X obj 19 -429 cnv 15 210 24 empty empty octfilt_44100Hz 20 12 1 18 +-233017 -1109 0; +#X obj 229 -429 cnv 15 120 24 empty empty subpatch 0 12 1 18 -233017 +-1109 0; +#X text 54 -385 input; +#X text 52 -372 signal; +#X text 68 -357 |; +#X text 68 -347 V; +#X text 163 -386 number sets the mid-frequency:; +#X text 180 -357 |; +#X text 180 -347 V; +#X text 163 -372 0=31.5Hz to 8=8kHz; +#X text 182 392 signal; +#X text 198 356 |; +#X text 198 366 V; +#X text 181 379 output; +#X obj 256 184 cnv 15 160 25 empty empty empty 20 12 0 14 -225271 -66577 +0; +#N canvas 137 22 892 843 oct_125to8000_44100Hz 0; +#X obj 118 322 *~ 0; +#X obj 154 322 *~ 0; +#X obj 41 -39 inlet~; +#X obj 119 -39 inlet; +#X obj 199 -39 inlet; +#X obj 279 -39 inlet; +#X obj 359 -39 inlet; +#X obj 583 -39 inlet; +#X obj 159 -39 inlet; +#X obj 239 -39 inlet; +#X obj 319 -39 inlet; +#X obj 136 391 outlet~; +#X msg 334 31 1; +#X msg 303 31 0; +#X msg 221 31 1; +#X msg 250 31 0; +#X text 12 -13 ------------------------------------------------------------ +; +#X text 432 -13 ------------------------------------; +#X text 12 347 ------------------------------------------------------------ +; +#X text 432 347 ------------------------------------; +#X obj 583 31 switch~; +#X obj 119 113 biquad~ 1.98012 -0.982921 1 0 -1; +#X obj 119 135 biquad~ 1.96065 -0.969604 1 0 -1; +#X obj 119 157 biquad~ 1.94806 -0.953018 1 0 -1; +#X obj 119 180 /~ 75375.2; +#X obj 153 217 hp2_butt~ 2000; +#X obj 19 -169 cnv 15 300 24 empty empty oct_125to8000_44100Hz 20 12 +1 18 -233017 -1109 0; +#X obj 319 -169 cnv 15 120 24 empty empty subpatch 0 12 1 18 -233017 +-1109 0; +#X text 596 -67 |; +#X text 596 -57 V; +#X text 580 -108 bang to; +#X text 568 -95 switch this; +#X text 569 -82 subpatch on; +#X text 42 -95 input; +#X text 40 -82 signal; +#X text 56 -67 |; +#X text 56 -57 V; +#X text 258 -75 |; +#X text 258 -65 V; +#X text 223 -128 a bang to; +#X text 191 -115 one of these inlets; +#X text 172 -102 selects the corresponding; +#X text 212 -89 mid frequency; +#X obj 140 67 cnv 15 230 25 empty empty empty 20 12 0 14 -225271 -66577 +0; +#N canvas 103 3 1036 705 filtcoeffs_oct_125to8000_44100Hz 0; +#X text 265 122 250Hz; +#X text 356 -8 500Hz; +#X text 527 122 1000Hz; +#X text 617 -8 2000Hz; +#X text 787 122 4000Hz; +#X text 867 -8 8000Hz; +#X obj 824 -9 t b; +#X obj 742 121 t b; +#X obj 570 -9 t b; +#X obj 478 121 t b; +#X obj 308 -9 t b; +#X obj 217 121 t b; +#X obj 46 -9 t b; +#X obj 16 330 outlet; +#X obj 76 330 outlet; +#X obj 136 330 outlet; +#X obj 246 330 outlet; +#X text 14 355 biquad1; +#X text 74 355 biquad2; +#X text 134 355 biquad3; +#X text 12 301 ------------------------------------------------------------ +; +#X text 432 301 ------------------------------------------------------------ +; +#X text 12 -39 ------------------------------------------------------------ +; +#X text 432 -39 ------------------------------------------------------------ +; +#X obj 824 -64 inlet; +#X obj 742 -64 inlet; +#X obj 570 -64 inlet; +#X obj 478 -64 inlet; +#X obj 308 -64 inlet; +#X obj 217 -64 inlet; +#X obj 46 -64 inlet; +#X text 95 -8 125Hz; +#X text 852 -39 --------------------; +#X text 852 301 --------------------; +#X msg 15 15 1.98772 -0.988037 1 0 -1; +#X msg 25 35 1.99175 -0.992313 1 0 -1; +#X msg 35 56 1.99553 -0.99571 1 0 -1; +#X msg 47 76 4.65558e+06; +#X msg 186 144 1.99074 -0.991442 1 0 -1; +#X msg 196 165 1.98243 -0.984686 1 0 -1; +#X msg 206 186 1.97496 -0.976211 1 0 -1; +#X msg 220 206 588925; +#X msg 277 15 1.98012 -0.982921 1 0 -1; +#X msg 287 35 1.96065 -0.969604 1 0 -1; +#X msg 297 56 1.94806 -0.953018 1 0 -1; +#X msg 309 76 75375.2; +#X msg 447 145 1.95498 -0.966092 1 0 -1; +#X msg 457 165 1.905 -0.940226 1 0 -1; +#X msg 467 186 1.88879 -0.908143 1 0 -1; +#X msg 481 206 9869.36; +#X msg 537 15 1.7502 -0.823981 1 0 -1; +#X msg 547 35 1.749 -0.88474 1 0 -1; +#X msg 556 57 1.8894 -0.933001 1 0 -1; +#X msg 571 76 1349.18; +#X msg 707 145 1.40604 -0.673892 1 0 -1; +#X msg 717 165 1.28986 -0.788014 1 0 -1; +#X msg 727 186 1.70114 -0.867918 1 0 -1; +#X msg 741 206 199.198; +#X msg 789 15 0.552188 -0.423475 1 0 -1; +#X msg 799 35 0.0493552 -0.660181 1 0 -1; +#X msg 809 56 1.13983 -0.732749 1 0 -1; +#X msg 823 76 33.1826; +#X obj 14 -171 cnv 15 420 24 empty empty filtcoeffs_oct_125to8000_44100Hz +20 12 1 18 -233017 -1109 0; +#X obj 434 -171 cnv 15 120 24 empty empty subpatch 0 12 1 18 -233017 +-1109 0; +#X text 14 -140 outputs coefficients for 3 biquads + one overall normalization +factor; +#X text 199 355 normalization factor; +#X connect 6 0 61 0; +#X connect 6 0 58 0; +#X connect 6 0 59 0; +#X connect 6 0 60 0; +#X connect 7 0 57 0; +#X connect 7 0 56 0; +#X connect 7 0 55 0; +#X connect 7 0 54 0; +#X connect 8 0 53 0; +#X connect 8 0 52 0; +#X connect 8 0 51 0; +#X connect 8 0 50 0; +#X connect 9 0 49 0; +#X connect 9 0 48 0; +#X connect 9 0 47 0; +#X connect 9 0 46 0; +#X connect 10 0 45 0; +#X connect 10 0 44 0; +#X connect 10 0 43 0; +#X connect 10 0 42 0; +#X connect 11 0 41 0; +#X connect 11 0 40 0; +#X connect 11 0 39 0; +#X connect 11 0 38 0; +#X connect 12 0 37 0; +#X connect 12 0 36 0; +#X connect 12 0 35 0; +#X connect 12 0 34 0; +#X connect 24 0 6 0; +#X connect 25 0 7 0; +#X connect 26 0 8 0; +#X connect 27 0 9 0; +#X connect 28 0 10 0; +#X connect 29 0 11 0; +#X connect 30 0 12 0; +#X connect 34 0 13 0; +#X connect 35 0 14 0; +#X connect 36 0 15 0; +#X connect 37 0 16 0; +#X connect 38 0 13 0; +#X connect 39 0 14 0; +#X connect 40 0 15 0; +#X connect 41 0 16 0; +#X connect 42 0 13 0; +#X connect 43 0 14 0; +#X connect 44 0 15 0; +#X connect 45 0 16 0; +#X connect 46 0 13 0; +#X connect 47 0 14 0; +#X connect 48 0 15 0; +#X connect 49 0 16 0; +#X connect 50 0 13 0; +#X connect 51 0 14 0; +#X connect 52 0 15 0; +#X connect 53 0 16 0; +#X connect 54 0 13 0; +#X connect 55 0 14 0; +#X connect 56 0 15 0; +#X connect 57 0 16 0; +#X connect 58 0 13 0; +#X connect 59 0 14 0; +#X connect 60 0 15 0; +#X connect 61 0 16 0; +#X restore 119 72 pd filtcoeffs_oct_125to8000_44100Hz; +#X text 141 445 signal; +#X text 157 409 |; +#X text 157 419 V; +#X text 140 432 output; +#X connect 0 0 11 0; +#X connect 1 0 11 0; +#X connect 2 0 21 0; +#X connect 3 0 14 0; +#X connect 3 0 15 0; +#X connect 3 0 44 0; +#X connect 4 0 14 0; +#X connect 4 0 15 0; +#X connect 4 0 44 2; +#X connect 5 0 14 0; +#X connect 5 0 15 0; +#X connect 5 0 44 4; +#X connect 6 0 13 0; +#X connect 6 0 12 0; +#X connect 6 0 44 6; +#X connect 7 0 20 0; +#X connect 8 0 14 0; +#X connect 8 0 15 0; +#X connect 8 0 44 1; +#X connect 9 0 14 0; +#X connect 9 0 15 0; +#X connect 9 0 44 3; +#X connect 10 0 14 0; +#X connect 10 0 15 0; +#X connect 10 0 44 5; +#X connect 12 0 1 1; +#X connect 13 0 0 1; +#X connect 14 0 0 1; +#X connect 15 0 1 1; +#X connect 21 0 22 0; +#X connect 22 0 23 0; +#X connect 23 0 24 0; +#X connect 24 0 0 0; +#X connect 24 0 25 0; +#X connect 25 0 1 0; +#X connect 44 0 21 0; +#X connect 44 1 22 0; +#X connect 44 2 23 0; +#X connect 44 3 24 1; +#X restore 239 188 pd oct_125to8000_44100Hz; +#X obj 178 121 cnv 15 105 25 empty empty empty 20 12 0 14 -225271 -66577 +0; +#N canvas 341 244 667 609 oct_63_44100Hz 0; +#X obj 261 -9 inlet; +#X obj 23 -9 inlet~; +#X text 8 15 ------------------------------------------------------------ +; +#X text 8 115 ------------------------------------------------------------ +; +#X obj 23 140 outlet~; +#X obj 261 44 switch~; +#X obj 23 41 lp6_butt~ 2000; +#X obj 23 96 lp6_butt~ 2000; +#X obj 19 -129 cnv 15 220 24 empty empty oct_63_44100Hz 20 12 1 18 +-233017 -1109 0; +#X obj 239 -129 cnv 15 120 24 empty empty subpatch 0 12 1 18 -233017 +-1109 0; +#X text 26 -66 input; +#X text 24 -53 signal; +#X text 40 -38 |; +#X text 40 -28 V; +#X text 278 -37 |; +#X text 278 -27 V; +#X text 262 -78 bang to; +#X text 250 -65 switch this; +#X text 251 -52 subpatch on; +#X text 26 194 signal; +#X text 42 158 |; +#X text 42 168 V; +#X text 25 181 output; +#X obj 44 65 cnv 15 105 25 empty empty empty 20 12 0 14 -225271 -66577 +0; +#N canvas 73 324 541 549 oct_63_22050Hz 0; +#X obj 23 61 inlet~; +#X text 8 85 ------------------------------------------------------------ +; +#X text 8 265 ------------------------------------------------------------ +; +#X obj 23 292 outlet~; +#X obj 23 226 *~ 2; +#X obj 291 154 block~ 64 1 0.5; +#X obj 23 136 biquad~ 1.99175 -0.992313 1 0 -1; +#X obj 23 158 biquad~ 1.99553 -0.99571 1 0 -1; +#X obj 23 114 biquad~ 1.98772 -0.988037 1 0 -1; +#X obj 23 201 /~ 4.80993e+06; +#X obj 9 -39 cnv 15 220 24 empty empty oct_63_22050Hz 20 12 1 18 -233017 +-1109 0; +#X obj 229 -39 cnv 15 120 24 empty empty subpatch 0 12 1 18 -233017 +-1109 0; +#X text 26 4 input; +#X text 24 17 signal; +#X text 40 32 |; +#X text 40 42 V; +#X text 26 344 signal; +#X text 42 308 |; +#X text 42 318 V; +#X text 25 331 output; +#X connect 0 0 8 0; +#X connect 4 0 3 0; +#X connect 6 0 7 0; +#X connect 7 0 9 0; +#X connect 8 0 6 0; +#X connect 9 0 4 0; +#X restore 23 70 pd oct_63_22050Hz; +#X connect 0 0 5 0; +#X connect 1 0 6 0; +#X connect 6 0 24 0; +#X connect 7 0 4 0; +#X connect 24 0 7 0; +#X restore 157 125 pd oct_63_44100Hz; +#X obj 69 58 cnv 15 105 25 empty empty empty 20 12 0 14 -225271 -66577 +0; +#N canvas 534 361 667 609 oct_31_44100Hz 0; +#X obj 261 -9 inlet; +#X obj 23 -9 inlet~; +#X text 8 15 ------------------------------------------------------------ +; +#X text 8 115 ------------------------------------------------------------ +; +#X obj 23 140 outlet~; +#X obj 261 44 switch~; +#X obj 19 -129 cnv 15 220 24 empty empty oct_31_44100Hz 20 12 1 18 +-233017 -1109 0; +#X obj 239 -129 cnv 15 120 24 empty empty subpatch 0 12 1 18 -233017 +-1109 0; +#X text 26 -66 input; +#X text 24 -53 signal; +#X text 40 -38 |; +#X text 40 -28 V; +#X text 278 -37 |; +#X text 278 -27 V; +#X text 262 -78 bang to; +#X text 250 -65 switch this; +#X text 251 -52 subpatch on; +#X text 26 194 signal; +#X text 42 158 |; +#X text 42 168 V; +#X text 25 181 output; +#X obj 44 65 cnv 15 105 25 empty empty empty 20 12 0 14 -225271 -66577 +0; +#X obj 23 41 lp6_butt~ 1000; +#X obj 23 96 lp6_butt~ 1000; +#N canvas 73 324 541 549 oct_31_11025Hz 0; +#X obj 23 61 inlet~; +#X text 8 85 ------------------------------------------------------------ +; +#X text 8 265 ------------------------------------------------------------ +; +#X obj 23 292 outlet~; +#X obj 23 136 biquad~ 1.99175 -0.992313 1 0 -1; +#X obj 23 158 biquad~ 1.99553 -0.99571 1 0 -1; +#X obj 23 114 biquad~ 1.98772 -0.988037 1 0 -1; +#X obj 23 201 /~ 4.80993e+06; +#X obj 9 -39 cnv 15 220 24 empty empty oct_31_11025Hz 20 12 1 18 -233017 +-1109 0; +#X obj 229 -39 cnv 15 120 24 empty empty subpatch 0 12 1 18 -233017 +-1109 0; +#X text 26 4 input; +#X text 24 17 signal; +#X text 40 32 |; +#X text 40 42 V; +#X text 26 344 signal; +#X text 42 308 |; +#X text 42 318 V; +#X text 25 331 output; +#X obj 291 154 block~ 64 1 0.25; +#X obj 23 226 *~ 4; +#X connect 0 0 6 0; +#X connect 4 0 5 0; +#X connect 5 0 7 0; +#X connect 6 0 4 0; +#X connect 7 0 19 0; +#X connect 19 0 3 0; +#X restore 23 70 pd oct_31_11025Hz; +#X connect 0 0 5 0; +#X connect 1 0 22 0; +#X connect 22 0 24 0; +#X connect 23 0 4 0; +#X connect 24 0 23 0; +#X restore 48 62 pd oct_31_44100Hz; +#X connect 0 0 56 0; +#X connect 0 0 58 0; +#X connect 0 0 60 0; +#X connect 2 0 33 0; +#X connect 3 0 4 1; +#X connect 4 0 1 0; +#X connect 5 0 6 0; +#X connect 6 0 7 0; +#X connect 7 0 36 0; +#X connect 7 1 40 0; +#X connect 9 0 56 3; +#X connect 9 1 19 0; +#X connect 10 0 56 5; +#X connect 10 1 21 0; +#X connect 11 0 56 7; +#X connect 11 1 23 0; +#X connect 12 0 56 2; +#X connect 12 1 18 0; +#X connect 13 0 56 4; +#X connect 13 1 20 0; +#X connect 14 0 56 6; +#X connect 14 1 22 0; +#X connect 15 0 27 0; +#X connect 15 1 28 0; +#X connect 16 0 29 0; +#X connect 16 1 30 0; +#X connect 17 0 31 0; +#X connect 17 1 32 0; +#X connect 18 0 31 0; +#X connect 18 1 32 0; +#X connect 19 0 31 0; +#X connect 19 1 32 0; +#X connect 20 0 31 0; +#X connect 20 1 32 0; +#X connect 21 0 31 0; +#X connect 21 1 32 0; +#X connect 22 0 31 0; +#X connect 22 1 32 0; +#X connect 23 0 31 0; +#X connect 23 1 32 0; +#X connect 27 0 56 8; +#X connect 27 0 58 1; +#X connect 28 0 60 1; +#X connect 29 0 56 8; +#X connect 29 0 60 1; +#X connect 30 0 58 1; +#X connect 31 0 58 1; +#X connect 31 0 60 1; +#X connect 32 0 56 8; +#X connect 33 0 34 0; +#X connect 33 1 5 0; +#X connect 34 0 37 0; +#X connect 34 1 38 0; +#X connect 35 0 3 0; +#X connect 36 0 35 0; +#X connect 37 0 6 0; +#X connect 38 0 3 0; +#X connect 39 0 56 1; +#X connect 39 1 17 0; +#X connect 40 0 15 0; +#X connect 40 1 16 0; +#X connect 40 2 39 0; +#X connect 40 3 12 0; +#X connect 40 4 9 0; +#X connect 40 5 13 0; +#X connect 40 6 10 0; +#X connect 40 7 14 0; +#X connect 40 8 11 0; +#X connect 56 0 4 0; +#X connect 58 0 4 0; +#X connect 60 0 4 0; +#X restore 15 160 pd octfilt_44100Hz; +#X text 131 140 31.5; +#N canvas 65 162 554 504 a-weighting_44100Hz 0; +#X obj 34 86 biquad~ -0.308367 0.0770666 1 0.629733 0.0533704; +#X obj 34 108 biquad~ 1.88961 -0.89186 1 -1.9998 0.999797; +#X obj 34 130 biquad~ 1.8911 -0.893263 1 0.963195 -1.81118; +#X obj 33 152 biquad~ -0.301085 0.0761926 1 9.03357 -10.6286; +#X obj 33 174 biquad~ 1.99545 -0.995451 0.997724 -1.99545 0.997724 +; +#X obj 32 195 /~ 32.113; +#X obj 33 32 inlet~; +#X obj 33 269 outlet~; +#X obj 19 -69 cnv 15 280 24 empty empty a-weighting_44100Hz 20 12 1 +18 -233017 -1109 0; +#X obj 299 -69 cnv 15 120 24 empty empty subpatch 0 12 1 18 -233017 +-1109 0; +#X text 38 -25 input; +#X text 36 -12 signal; +#X text 52 3 |; +#X text 52 13 V; +#X text 35 325 signal; +#X text 51 289 |; +#X text 51 299 V; +#X text 34 312 output; +#X text 15 60 ------------------------------------------------------------ +; +#X text 15 230 ------------------------------------------------------------ +; +#X connect 0 0 1 0; +#X connect 1 0 2 0; +#X connect 2 0 3 0; +#X connect 3 0 4 0; +#X connect 4 0 5 0; +#X connect 5 0 7 0; +#X connect 6 0 0 0; +#X restore 15 199 pd a-weighting_44100Hz; +#X text 16 244 Some filters (designed to work at 44.1kHz sampling rate) +; +#X text 16 274 The subpatches found in this section implement band-pass +filters commonly used in acoustical measurements.; +#X text 16 314 The octave and third octave band-pass filters use exact +mid frequencies based on the 2^i and 2^(i/3) formulae \, respectively +(see IEC 1260).; +#X text 16 364 Please note that if you use adjacent octave or third +octave filters in parallel for synthesis purposes \, the resulting +frequency response will not have a flat passband behavior. You *can* +build analysis filter banks though.; +#X obj 17 445 cnv 15 236 65 empty empty empty 20 12 0 14 -262144 -66577 +0; +#X text 23 463 matthias.blau AT fh-oldenburg.de; +#X text 21 477 IHA FH-OOW \, Oldenburg \, Germany; +#X text 16 437 ------------------------------------------------------------ +; +#X text 16 255 ------------------------------------------------------------ +; +#X text 19 449 (c) M. Blau 2004-2006; +#X text 22 491 updated for version v28II06; +#X connect 0 0 27 1; +#X connect 28 0 37 1; diff --git a/tools/pm_scope.pd b/tools/pm_scope.pd new file mode 100644 index 0000000..b0cb1aa --- /dev/null +++ b/tools/pm_scope.pd @@ -0,0 +1,229 @@ +#N canvas 180 170 640 735 10; +#X obj 68 45 cnv 10 200 130 empty empty empty 0 0 1 16 -225280 -42246 +0; +#X obj 252 97 bng 12 250 50 0 \$0-scope1_y+ empty + 1 -10 1 14 -262144 +-1 -1; +#X obj 252 114 bng 12 250 50 0 \$0-scope1_y- empty - 3 16 1 18 -262144 +-1 -1; +#X obj 71 19 r~ i1; +#X obj 147 48 cnv 15 120 24 empty \$0-scope1_ovldstr OVERLOAD! 2 11 +1 14 -225280 -225280 0; +#X obj 121 18 bng 20 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 +-1; +#X obj 132 157 nbx 3 14 0 250 0 0 \$0-scope1_xtime \$0-set_scope1_xtime +msec 35 8 1 8 -262144 -1 -1 100 256; +#N canvas 352 0 832 750 scope1 0; +#X obj -2 -51 cnv 15 140 24 empty empty scope1 20 12 1 18 -233017 -1109 +0; +#X obj 113 -51 cnv 15 120 24 empty empty subpatch 0 12 1 18 -233017 +-1109 0; +#X obj 391 100 loadbang; +#X obj 263 374 delay 1000; +#X obj 15 102 inlet~; +#X obj 580 615 cnv 15 60 25 empty empty empty 20 12 0 14 -261681 -66577 +0; +#X obj 286 596 cnv 15 60 40 empty empty empty 20 12 0 14 -261681 -66577 +0; +#X obj 339 344 div 2; +#X obj 339 421 pow 0; +#X msg 339 398 10; +#X obj 382 375 select 0 1; +#X msg 382 404 1; +#X msg 414 404 3; +#X obj 366 448 * 1; +#X floatatom 346 300 5 0 0 0 - - -; +#X msg 309 224 1; +#X msg 392 224 1; +#X obj 309 249 + 1; +#X obj 392 249 - 1; +#X obj 392 274 * -1; +#X msg 346 224 0; +#X obj 396 495 / 10; +#X obj 375 530 * -1; +#X obj 292 161 cnv 15 90 25 empty empty empty 20 12 0 14 -262131 -66577 +0; +#X obj 405 161 cnv 15 90 25 empty empty empty 20 12 0 14 -262131 -66577 +0; +#X obj 561 63 cnv 15 115 20 empty empty empty 20 12 0 14 -261681 -66577 +0; +#X text -4 136 ------------------------------------------------------------ +; +#X text 416 136 ----------------------------------; +#X obj 42 478 cnv 15 125 20 empty empty empty 20 12 0 14 -228992 -66577 +0; +#X msg 45 335 0; +#X obj 45 360 metro 1000; +#X obj 79 392 delay 500; +#X obj 83 101 inlet; +#X text 129 99 <-- bang to reset; +#X text 157 112 overload; +#X msg 45 414 14; +#X obj 80 238 cnv 15 125 20 empty empty empty 20 12 0 14 -228992 -66577 +0; +#X obj 366 471 t b f; +#X obj 339 375 t b f; +#X obj 382 344 mod 2; +#X obj 346 320 t f f; +#X obj 2 314 threshold~ 0.98 100 -0.98 100; +#X obj 88 283 cnv 15 115 25 empty empty empty 20 12 0 14 -261681 -66577 +0; +#X obj 520 373 phasor~; +#X obj 521 351 sig~; +#X obj 521 306 samplerate~; +#X obj 589 461 cnv 15 120 25 empty empty empty 20 12 0 14 -261681 -66577 +0; +#X obj 594 369 cnv 15 110 25 empty empty empty 20 12 0 14 -262131 -66577 +0; +#X obj 488 228 metro 400; +#X obj 511 588 clip~ -1 1; +#X obj 521 87 block~ 1024; +#X obj 521 328 / 1024; +#X obj 582 396 / 1000; +#X obj 582 418 * 44100; +#X obj 521 442 *~ 4410; +#X obj 153 -7 cnv 15 80 15 empty empty empty 20 12 0 14 -261681 -66577 +0; +#X text 155 -8 arrays; +#X obj 153 9 cnv 15 80 15 empty empty empty 20 12 0 14 -228992 -66577 +0; +#X text 155 9 symbols; +#X obj 153 25 cnv 15 80 15 empty empty empty 20 12 0 14 -262131 -66577 +0; +#X text 154 25 floats; +#X text 30 -9 global variables:; +#X msg 597 164 100; +#X obj 608 184 cnv 15 140 25 empty empty empty 20 12 0 14 -262131 -66577 +0; +#X msg 488 203 1; +#X msg 79 414 7; +#X obj 83 190 f \$0; +#X msg 83 226 \; \$1-scope1_ovldstr color 7 7; +#X obj 83 166 t b b; +#X obj 16 287 tabwrite~ \$0-scope1_buffer; +#X obj 279 165 r \$0-scope1_y-; +#X obj 392 165 r \$0-scope1_y+; +#X obj 521 65 table \$0-scope1_buffer 11050; +#X obj 597 189 s \$0-set_scope1_xtime; +#X obj 582 373 r \$0-scope1_xtime; +#X obj 522 465 tabread4~ \$0-scope1_buffer; +#X obj 511 619 tabwrite~ \$0-meas1; +#X obj 289 555 pack 0.1 1 -1 \$0; +#X obj 45 442 pack 7 7 \$0; +#X msg 45 464 \; \$3-scope1_ovldstr color \$2 \$1; +#X msg 289 582 \; \$4-meas1 bounds 0 \$2 1023 \$3 \; \$4-meas1 yticks +0 \$1 5 \; \$4-meas1 ylabel 1140 \$3 0 \$2; +#X text 243 -8 \$0-scope1_buffer \, \$0-meas1; +#X text 243 9 \$0-scope1_ovldstr; +#X text 243 25 \$0-scope1_y- \, \$0-scope1_y+ \, \$0-scope1_xtime \, +\$0-set_scope1_xtime; +#X connect 2 0 3 0; +#X connect 2 0 20 0; +#X connect 2 0 45 0; +#X connect 2 0 62 0; +#X connect 2 0 64 0; +#X connect 3 0 77 0; +#X connect 4 0 41 0; +#X connect 4 0 69 0; +#X connect 7 0 38 0; +#X connect 8 0 13 0; +#X connect 9 0 8 0; +#X connect 10 0 11 0; +#X connect 10 1 12 0; +#X connect 11 0 13 1; +#X connect 12 0 13 1; +#X connect 13 0 37 0; +#X connect 14 0 17 1; +#X connect 14 0 18 1; +#X connect 14 0 40 0; +#X connect 15 0 17 0; +#X connect 16 0 18 0; +#X connect 17 0 14 0; +#X connect 18 0 19 0; +#X connect 19 0 14 0; +#X connect 20 0 14 0; +#X connect 21 0 77 0; +#X connect 22 0 49 1; +#X connect 22 0 77 2; +#X connect 29 0 30 0; +#X connect 30 0 35 0; +#X connect 30 0 31 0; +#X connect 31 0 65 0; +#X connect 32 0 68 0; +#X connect 35 0 78 0; +#X connect 37 0 77 0; +#X connect 37 1 21 0; +#X connect 37 1 22 0; +#X connect 37 1 49 2; +#X connect 37 1 77 1; +#X connect 38 0 9 0; +#X connect 38 1 8 1; +#X connect 39 0 10 0; +#X connect 40 0 7 0; +#X connect 40 1 39 0; +#X connect 41 0 30 0; +#X connect 41 1 30 0; +#X connect 43 0 54 0; +#X connect 44 0 43 0; +#X connect 45 0 51 0; +#X connect 45 0 53 1; +#X connect 48 0 69 0; +#X connect 48 0 76 0; +#X connect 49 0 76 0; +#X connect 51 0 44 0; +#X connect 52 0 53 0; +#X connect 53 0 54 1; +#X connect 54 0 75 0; +#X connect 62 0 73 0; +#X connect 64 0 48 0; +#X connect 65 0 78 0; +#X connect 66 0 67 0; +#X connect 68 0 66 0; +#X connect 68 1 29 0; +#X connect 70 0 15 0; +#X connect 71 0 16 0; +#X connect 74 0 52 0; +#X connect 75 0 49 0; +#X connect 77 0 80 0; +#X connect 78 0 79 0; +#X coords 0 0 0.00222222 0.00333333 200 140 0; +#X restore 72 49 pd scope1; +#X text 70 156 x range:; +#X text 72 202 The pm oscilloscope.; +#X text 143 22 <--reset overload; +#X text 73 310 Note that the processing is done in the "scope1" subpatch +(click on it to view/edit).; +#X text 73 520 Note also that there is a scope~ object in the cyclone +library \, which you may prefer over the simple one presented here. +; +#X obj 73 588 cnv 15 236 65 empty empty empty 20 12 0 14 -262144 -66577 +0; +#X text 75 592 (c) M. Blau 2004-2005; +#X text 79 606 matthias.blau AT fh-oldenburg.de; +#X text 77 620 IHA FH-OOW \, Oldenburg \, Germany; +#X text 72 580 ------------------------------------------------------------ +; +#X text 72 212 ------------------------------------------------------------ +; +#N canvas 0 0 450 300 graph14 0; +#X array \$0-meas1 1024 float 0; +#X coords 0 1 1023 -1 150 80 1; +#X restore 72 72 graph; +#X text 73 440 If you change the size of the display \, you will probably +have to adjust the position of the y-axis labels. To do so \, you have +to change the last line in the message box at the center bottom of +the subpatch: Substitute the 1140 in "$4-meas1 ylabel 1140 \$3 0 \$2" +by a more suitable value.; +#X text 73 350 If you want to use multiple scopes at the same time +\, you can simply copy the scope above. In addition \, you will have +to change the names of all global variables to contain e.g. "scope2" +instead of "scope1". Also the array that is displayed must be changed +from "$0-meas1" to e.g. "$0-meas2". (Hint: use a text editor to do +this).; +#X text 73 230 Principle of operation: the incoming signal (i1 in the +example above) is written to a buffer ($0-scope1_buffer) which is then +resampled using 4-point interpolation (1024 values via tabread4~). +The resampled values are written to the "meas1" array (which is displayed) +every 400ms.; +#X text 78 634 updated for version v28II06; +#X connect 3 0 7 0; +#X connect 5 0 7 1; |