Return to example_sequencer.pd CVS log

Up to [Development] / JSOC / proj / globalhs / sosh

bug fixes

#N canvas 1 52 1265 635 10;
#X msg 269 98 65536;
#X msg 262 75 131072;
#X obj 245 32 loadbang;
#X msg 273 126 32768;
#X obj 27 87 set-directory;
#X obj 27 50 bng 30 250 50 0 empty empty empty 17 7 0 10 -4032 -1 -1
;
#X obj 28 112 s data-dir;
#X msg 29 154 \; pd dsp 1;
#X msg 29 196 \; pd dsp 0;
#X obj 234 162 s block-size;
#X msg 341 64 50;
#X obj 341 107 s window-ramp;
#X msg 153 83 ../data, f 10;
#X obj 360 133 window-gen;
#X obj 207 220 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 150 221 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 150 286 s cadence;
#X msg 150 248 60;
#X msg 207 248 45;
#X obj 132 190 s filestem;
#X msg 150 122 mdi;
#X msg 165 147 hmi;
#X msg 261 193 262144;
#X obj 344 220 s fileblank;
#X msg 344 165 average.modes;
#X obj 744 518 dac~ 1 2;
#X obj 744 488 audio_safety~;
#X obj 24 373 nbx 10 20 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 10
-204786 -1 -1 8000 256;
#X msg 24 345 44100;
#X text 130 377 desired SR;
#X msg 79 345 22050;
#X msg 136 345 11025;
#X msg 74 319 8000;
#X obj 24 402 s play-SR;
#X obj 23 462 nbx 10 20 0 22100 0 0 empty empty empty 0 -8 0 10 -204786
-1 -1 4 256;
#X text 130 472 2 = 1 octave lower;
#X text 130 458 downshift factor;
#X floatatom 974 397 5 0 0 0 - - -, f 5;
#X floatatom 877 309 5 0 0 0 - - -, f 5;
#X obj 842 308 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X floatatom 928 311 5 0 0 0 - - -, f 5;
#X floatatom 975 313 5 0 0 0 - - -, f 5;
#X floatatom 1022 315 5 0 0 0 - - -, f 5;
#X obj 1140 336 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
0 1;
#X obj 745 460 *~;
#X obj 814 459 * 0.01;
#X obj 814 433 nbx 10 20 0 100 0 0 empty empty empty 0 -8 0 10 -204786
-1 -1 20 256;
#X text 814 415 volume (0-100);
#X text 1164 334 on/off;
#X msg 23 431 2;
#X msg 105 431 8;
#X msg 64 431 4;
#X floatatom 1035 384 5 0 0 0 - - -, f 5;
#X floatatom 1034 402 5 0 0 0 - - -, f 5;
#X obj 877 351 modefilter, f 33;
#X floatatom 1067 313 5 0 0 0 - - -, f 5;
#X text 1109 313 width multiplier;
#X obj 991 61 r play-SR;
#X obj 826 59 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 705 127 * 0.01;
#X obj 705 101 nbx 10 20 0 100 0 0 empty empty empty 0 -8 0 10 -204786
-1 -1 0 256;
#X text 705 83 volume (0-100);
#X obj 744 179 *~;
#X obj 742 248 dac~ 1 2;
#X obj 743 215 audio_safety~;
#X obj 826 99 arbitrarySRmulti sumtest;
#X obj 1027 144 array size sumtest;
#X floatatom 929 22 5 0 0 0 - - -, f 5;
#X obj 1086 33 r sperday;
#X obj 1086 61 * 72;
#X obj 1027 92 t b f;
#X text 780 20 number of timeseries;
#X obj 1027 119 *;
#X obj 1167 121 min;
#X obj 1167 64 t b f;
#X obj 1167 33 r block-size;
#N canvas 1 102 1265 421 catarray 0;
#N canvas 0 50 450 250 (subpatch) 0;
#X array sumtest 518400 float 2;
#X coords 0 1 518400 -1 1000 300 1 0 0;
#X restore 149 74 graph;
#X msg 11 120 \; sumtest normalize;
#X msg 11 76 \; sumtest const 0;
#X obj 74 317 inlet;
#X obj 150 377 hsl 1000 15 0 127 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X obj 27 543 soundfiler;
#X obj 27 395 bng 30 250 50 0 empty empty empty 17 7 0 10 -4032 -1
-1;
#X text 63 401 save array to WAVE file;
#X obj 101 430 r play-SR;
#X obj 27 459 f;
#X msg 27 504 write -wave -bytes 4 -rate \$1 ./wav_out/modecat sumtest
;
#X connect 3 0 4 0;
#X connect 6 0 9 0;
#X connect 8 0 9 1;
#X connect 9 0 10 0;
#X connect 10 0 5 0;
#X restore 868 151 pd catarray;
#X msg 261 248 1440;
#X msg 313 247 1920;
#X obj 261 284 s sperday;
#X obj 605 181 qlist;
#X obj 573 36 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X msg 663 56 clear;
#X text 594 36 start sequencer;
#X text 627 56 stop;
#X obj 472 15 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 472 54 openpanel;
#X msg 472 85 set read \$1;
#X text 492 12 set sequence file;
#X msg 605 149;
#X msg 360 193 %dd.modes;
#X obj 1180 151 array size sum1;
#X obj 1159 173 array size sum2;
#X obj 373 285 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 373 305 s window-on;
#X text 344 270 turn windowing on/off;
#X msg 373 253 0;
#X obj 476 508 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 476 572 modecat sumtest;
#X obj 527 524 *;
#X obj 545 492 r sperday;
#X obj 893 530 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 578 519 loadbang;
#X obj 476 455 applywindow sum2;
#X msg 578 547 sum2;
#X msg 585 424 sum1;
#X obj 893 496 r outdone;
#X obj 476 431 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 585 400 loadbang;
#X obj 893 554 modesum sum1;
#X msg 1065 471 set \$1;
#X msg 1065 501 1145-output;
#X obj 928 282 r l;
#X obj 975 283 r n;
#X obj 1022 283 r m;
#X obj 877 285 r day;
#X obj 606 303 r daylnm;
#X obj 606 335 parsedaylnm;
#X obj 842 261 r startbang;
#X obj 495 341 r dayindex;
#X obj 495 393 t b f;
#X msg 532 232 next;
#X msg 474 120 print;
#X msg 475 150 rewind;
#X obj 573 83 t b b b b;
#X obj 461 184 r bangnext;
#X obj 893 587 s bangnext;
#X obj 476 604 s bangnext;
#X obj 24 282 r samprate;
#X obj 990 20 r numseries;
#X msg 605 589 \; sum1 const 0;
#X msg 586 219 \; sumtest normalize;
#X floatatom 341 87 5 0 0 0 - - -, f 5;
#N canvas 1 52 1066 438 sumarrays 0;
#N canvas 0 50 450 250 (subpatch) 0;
#X array sum2 103680 float 2;
#X coords 0 1 103680 -1 200 140 1;
#X restore 130 68 graph;
#X msg 17 71 \; sum2 const 0;
#X obj 36 320 soundfiler;
#X obj 36 208 bng 30 250 50 0 empty empty empty 17 7 0 10 -4032 -1
-1;
#X text 72 215 save array to WAVE file;
#X obj 36 247 f;
#X obj 137 243 r play-SR;
#X msg 15 116 \; sum2 normalize;
#X msg 386 121 \; sum1 normalize;
#N canvas 0 50 450 250 (subpatch) 0;
#X array sum1 103680 float 2;
#X coords 0 1 103680 -1 200 140 1;
#X restore 512 73 graph;
#X msg 387 79 \; sum1 const 0;
#X msg 36 273 write -wave -bytes 4 -rate \$1 ./wav_out/sumwindowed
sum2;
#X obj 458 347 soundfiler;
#X obj 458 235 bng 30 250 50 0 empty empty empty 17 7 0 10 -4032 -1
-1;
#X text 494 242 save array to WAVE file;
#X obj 458 274 f;
#X obj 559 270 r play-SR;
#X msg 458 300 write -wave -bytes 4 -rate \$1 ./wav_out/modesum sum1
;
#X connect 3 0 5 0;
#X connect 5 0 11 0;
#X connect 6 0 5 1;
#X connect 11 0 2 0;
#X connect 13 0 15 0;
#X connect 15 0 17 0;
#X connect 16 0 15 1;
#X connect 17 0 12 0;
#X restore 1018 190 pd sumarrays;
#X obj 234 297 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 234 317 s mswitch;
#X obj 23 493 s shiftfactor;
#X obj 23 558 nbx 10 20 0 22100 0 0 empty empty empty 0 -8 0 10 -204786
-1 -1 0 256;
#X obj 23 589 s absshift;
#X obj 151 430 r downfactor;
#X obj 151 526 r downabs;
#X msg 23 527 10000;
#X msg 340 571 0;
#X obj 340 547 t b;
#X obj 208 578 t b;
#X msg 208 602 1;
#X obj 340 596 s shiftswitch;
#X text 126 561 absolute downshift (bins);
#X obj 1067 278 r width;
#X floatatom 495 367 5 0 0 0 - - -, f 5;
#X obj 1142 448 loadbang;
#X obj 1142 473 del 100;
#X connect 0 0 9 0;
#X connect 1 0 9 0;
#X connect 2 0 12 0;
#X connect 2 0 10 0;
#X connect 2 0 20 0;
#X connect 2 0 32 0;
#X connect 2 0 90 0;
#X connect 2 0 96 0;
#X connect 3 0 9 0;
#X connect 4 0 6 0;
#X connect 4 1 12 0;
#X connect 5 0 4 0;
#X connect 10 0 132 0;
#X connect 12 0 4 1;
#X connect 14 0 18 0;
#X connect 14 0 22 0;
#X connect 14 0 78 0;
#X connect 15 0 17 0;
#X connect 15 0 1 0;
#X connect 15 0 77 0;
#X connect 17 0 16 0;
#X connect 18 0 16 0;
#X connect 20 0 19 0;
#X connect 20 0 15 0;
#X connect 21 0 19 0;
#X connect 21 0 14 0;
#X connect 22 0 9 0;
#X connect 24 0 23 0;
#X connect 26 0 25 0;
#X connect 26 0 25 1;
#X connect 27 0 33 0;
#X connect 28 0 27 0;
#X connect 30 0 27 0;
#X connect 31 0 27 0;
#X connect 32 0 27 0;
#X connect 34 0 136 0;
#X connect 34 0 143 0;
#X connect 37 0 109 2;
#X connect 38 0 54 1;
#X connect 39 0 54 0;
#X connect 40 0 54 2;
#X connect 41 0 54 3;
#X connect 42 0 54 4;
#X connect 43 0 54 6;
#X connect 44 0 26 0;
#X connect 45 0 44 1;
#X connect 46 0 45 0;
#X connect 49 0 34 0;
#X connect 50 0 34 0;
#X connect 51 0 34 0;
#X connect 54 0 44 0;
#X connect 54 1 53 0;
#X connect 54 2 37 0;
#X connect 54 3 52 0;
#X connect 54 4 110 0;
#X connect 55 0 54 5;
#X connect 57 0 65 2;
#X connect 58 0 65 0;
#X connect 59 0 62 1;
#X connect 60 0 59 0;
#X connect 62 0 64 0;
#X connect 64 0 63 0;
#X connect 64 0 63 1;
#X connect 65 0 62 0;
#X connect 65 1 76 0;
#X connect 67 0 65 1;
#X connect 67 0 72 0;
#X connect 68 0 69 0;
#X connect 69 0 73 0;
#X connect 70 0 72 0;
#X connect 70 1 72 1;
#X connect 72 0 66 0;
#X connect 73 0 70 0;
#X connect 73 0 91 0;
#X connect 73 0 92 0;
#X connect 74 0 73 0;
#X connect 74 1 73 1;
#X connect 75 0 74 0;
#X connect 77 0 79 0;
#X connect 78 0 79 0;
#X connect 80 1 131 0;
#X connect 81 0 124 0;
#X connect 82 0 80 0;
#X connect 85 0 86 0;
#X connect 86 0 87 0;
#X connect 87 0 89 0;
#X connect 89 0 80 0;
#X connect 90 0 23 0;
#X connect 93 0 94 0;
#X connect 96 0 93 0;
#X connect 97 0 98 0;
#X connect 98 0 127 0;
#X connect 98 0 130 0;
#X connect 99 0 98 1;
#X connect 100 0 99 1;
#X connect 101 0 109 0;
#X connect 102 0 104 0;
#X connect 103 0 97 0;
#X connect 104 0 98 2;
#X connect 105 0 103 1;
#X connect 106 0 101 0;
#X connect 107 0 103 0;
#X connect 108 0 105 0;
#X connect 109 0 126 0;
#X connect 110 0 111 0;
#X connect 111 0 109 1;
#X connect 112 0 40 0;
#X connect 113 0 41 0;
#X connect 114 0 42 0;
#X connect 115 0 38 0;
#X connect 116 0 117 0;
#X connect 118 0 39 0;
#X connect 119 0 149 0;
#X connect 120 0 107 0;
#X connect 120 1 99 0;
#X connect 121 0 80 0;
#X connect 122 0 80 0;
#X connect 123 0 80 0;
#X connect 124 0 121 0;
#X connect 124 1 121 0;
#X connect 124 2 123 0;
#X connect 124 3 89 0;
#X connect 125 0 121 0;
#X connect 128 0 27 0;
#X connect 129 0 67 0;
#X connect 132 0 11 0;
#X connect 134 0 135 0;
#X connect 137 0 138 0;
#X connect 137 0 144 0;
#X connect 139 0 34 0;
#X connect 140 0 137 0;
#X connect 141 0 137 0;
#X connect 142 0 146 0;
#X connect 143 0 142 0;
#X connect 144 0 145 0;
#X connect 145 0 146 0;
#X connect 148 0 55 0;
#X connect 149 0 120 0;
#X connect 150 0 151 0;
#X connect 151 0 111 0;