JSOC/proj/globalhs/sosh/example_concat2.pd - annotate

Return to example_concat2.pd CVS log

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

1 tplarson 1.1 #N canvas 1 52 1265 635 10; 2 #X msg 269 98 65536; 3 #X msg 262 75 131072; 4 #X obj 245 32 loadbang; 5 #X msg 273 126 32768; 6 #X obj 27 87 set-directory; 7 #X obj 27 50 bng 30 250 50 0 empty empty empty 17 7 0 10 -4032 -1 -1 8 ; 9 #X obj 28 112 s data-dir; 10 #X msg 29 150 \; pd dsp 1; 11 #X msg 29 196 \; pd dsp 0; 12 #X obj 234 162 s block-size; 13 #X msg 341 69 50; 14 #X obj 341 101 s window-ramp; 15 #X msg 153 83 ../data, f 10; 16 #X obj 360 133 window-gen; 17 #X obj 207 220 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 18 -1 -1; 19 #X obj 150 221 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 20 -1 -1; 21 #X obj 150 286 s cadence; 22 tplarson 1.1 #X msg 150 248 60; 23 #X msg 207 248 45; 24 #X obj 132 190 s filestem; 25 #X msg 150 122 mdi; 26 #X msg 165 147 hmi; 27 #X msg 261 193 262144; 28 #X obj 344 220 s fileblank; 29 #X msg 344 165 average.modes; 30 #X obj 792 519 dac~ 1 2; 31 #X obj 792 489 audio_safety~; 32 #X obj 24 373 nbx 10 20 -1e+37 1e+37 0 0 empty empty empty 0 -8 0 10 33 -204786 -1 -1 8000 256; 34 #X msg 24 345 44100; 35 #X text 130 377 desired SR; 36 #X msg 79 345 22050; 37 #X msg 136 345 11025; 38 #X msg 74 319 8000; 39 #X obj 24 416 s play-SR; 40 #X obj 25 483 nbx 10 20 0 22100 0 0 empty empty empty 0 -8 0 10 -204786 41 -1 -1 0 256; 42 #X text 132 493 2 = 1 octave lower; 43 tplarson 1.1 #X text 132 479 downshift factor; 44 #X obj 25 514 s shift-factor;
45 tplarson 1.2 #X obj 113 607 * 60; 46 #X obj 113 658 /; 47 #X floatatom 113 684 10 0 0 0 - - -, f 10; 48 #X obj 113 631 f; 49 #X obj 65 659 t b f;
50 tplarson 1.1 #X obj 33 552 sel 0; 51 #X msg 33 579 1; 52 #X floatatom 1022 398 5 0 0 0 - - -, f 5; 53 #X floatatom 875 290 5 0 0 0 - - -, f 5; 54 #X obj 935 273 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 55 -1 -1; 56 #X floatatom 990 281 5 0 0 0 - - -, f 5; 57 #X floatatom 1022 300 5 0 0 0 - - -, f 5; 58 #X floatatom 1056 319 5 0 0 0 - - -, f 5; 59 #X obj 1171 292 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 60 0 1; 61 #X text 797 288 day number; 62 #X text 1034 277 l; 63 #X text 1062 297 n; 64 #X text 1098 316 m; 65 #X obj 793 461 ~; 66 #X obj 862 460 0.01; 67 #X obj 862 434 nbx 10 20 0 100 0 0 empty empty empty 0 -8 0 10 -204786 68 -1 -1 0 256; 69 #X text 862 416 volume (0-100); 70 #X text 925 255 start; 71 tplarson 1.1 #X text 1195 290 on/off; 72 #X msg 25 452 2; 73 #X msg 107 452 8; 74 #X msg 66 452 4;
75 tplarson 1.2 #X text 86 702 transposition factor;
76 tplarson 1.1 #X floatatom 1148 390 5 0 0 0 - - -, f 5; 77 #X floatatom 1147 408 5 0 0 0 - - -, f 5; 78 #X obj 925 352 modefilter, f 33; 79 #X floatatom 1115 260 5 0 0 0 - - -, f 5; 80 #X obj 1115 210 loadbang; 81 #X msg 1115 235 1.2; 82 #X text 1160 259 width multiplier; 83 #X obj 991 61 r play-SR; 84 #X obj 826 59 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 85 1; 86 #X obj 705 127 * 0.01; 87 #X obj 705 101 nbx 10 20 0 100 0 0 empty empty empty 0 -8 0 10 -204786 88 -1 -1 0 256; 89 #X text 705 83 volume (0-100); 90 #X obj 705 177 ~; 91 #X obj 703 246 dac~ 1 2; 92 #X obj 704 213 audio_safety~; 93 #X obj 826 99 arbitrarySRmulti sumtest; 94 #X obj 1027 144 array size sumtest; 95 #X floatatom 929 22 5 0 0 0 - - -, f 5; 96 #X obj 1086 33 r sperday; 97 tplarson 1.1 #X obj 1086 61 72; 98 #X obj 1027 92 t b f; 99 #X text 780 20 number of timeseries; 100 #X obj 1027 119 ; 101 #X obj 1167 121 min; 102 #X obj 1167 64 t b f; 103 #X obj 1167 33 r block-size; 104 #N canvas 1 108 1265 421 catarray 0; 105 #N canvas 0 50 450 250 (subpatch) 0; 106 #X array sumtest 1 float 2; 107 #X coords 0 1 1 -1 1000 300 1 0 0; 108 #X restore 149 74 graph; 109 #X msg 11 116 \; sumtest normalize; 110 #X msg 11 76 \; sumtest const 0; 111 #X obj 74 317 inlet; 112 #X obj 150 377 hsl 1000 15 0 127 0 0 empty empty empty -2 -8 0 10 -262144 113 -1 -1 0 1; 114 #X obj 27 543 soundfiler; 115 #X obj 27 395 bng 30 250 50 0 empty empty empty 17 7 0 10 -4032 -1 116 -1; 117 #X text 63 401 save array to WAVE file; 118 tplarson 1.1 #X obj 101 430 r play-SR; 119 #X obj 27 459 f; 120 #X msg 27 504 write -wave -bytes 4 -rate \$1 ./wav_out/modecat sumtest 121 ; 122 #X connect 3 0 4 0; 123 #X connect 6 0 9 0; 124 #X connect 8 0 9 1; 125 #X connect 9 0 10 0; 126 #X connect 10 0 5 0; 127 #X restore 868 151 pd catarray; 128 #X msg 261 248 1440; 129 #X msg 313 247 1920; 130 #X obj 261 284 s sperday; 131 #X obj 843 205 r daynumber; 132 #X obj 843 233 t b f; 133 #X obj 605 181 qlist; 134 #X obj 573 83 t b b; 135 #X obj 573 50 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 136 -1; 137 #X msg 519 146 clear; 138 #X text 594 50 start sequencer; 139 tplarson 1.1 #X text 476 146 stop; 140 #X obj 472 29 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1 141 -1; 142 #X obj 472 54 openpanel; 143 #X msg 472 85 set read \$1; 144 #X text 492 26 set sequence file; 145 #X msg 605 149; 146 #X msg 360 193 %dd.modes; 147 #X obj 1180 151 array size sum1; 148 #X obj 1159 173 array size sum2; 149 #X obj 474 212 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 150 1; 151 #X obj 474 232 s window-on; 152 #X text 432 253 turn windowing on/off; 153 #X msg 474 180 0; 154 #X floatatom 709 483 5 0 0 0 - - -, f 5; 155 #X floatatom 397 381 5 0 0 0 - - -, f 5; 156 #X obj 457 364 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 157 -1 -1; 158 #X floatatom 512 372 5 0 0 0 - - -, f 5; 159 #X floatatom 544 391 5 0 0 0 - - -, f 5; 160 tplarson 1.1 #X floatatom 579 408 5 0 0 0 - - -, f 5; 161 #X obj 693 383 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 162 1; 163 #X text 319 379 day number; 164 #X text 556 368 l; 165 #X text 584 388 n; 166 #X text 620 407 m; 167 #X text 447 346 start; 168 #X text 717 381 on/off; 169 #X floatatom 536 473 5 0 0 0 - - -, f 5; 170 #X floatatom 536 492 5 0 0 0 - - -, f 5; 171 #X obj 447 443 modefilter, f 33; 172 #X floatatom 637 351 5 0 0 0 - - -, f 5; 173 #X obj 637 301 loadbang; 174 #X msg 637 326 1.2; 175 #X text 682 350 width multiplier; 176 #X obj 365 296 r daynumber; 177 #X obj 365 324 t b f; 178 #X obj 307 657 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 179 -1 -1; 180 #X obj 307 704 modecat sumtest; 181 tplarson 1.1 #X floatatom 397 591 5 0 0 0 - - -, f 5; 182 #X obj 358 673 ; 183 #X obj 376 641 r sperday; 184 #X text 264 574 day number of first timeseries; 185 #X obj 727 629 modeaddition sum1; 186 #X obj 674 614 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 187 -1 -1; 188 #X obj 494 606 loadbang; 189 #X msg 1100 485 \; sum1 normalize; 190 #N canvas 0 50 450 250 (subpatch) 0; 191 #X array sum1 103680 float 2; 192 #X coords 0 1 103680 -1 200 140 1; 193 #X restore 1033 530 graph; 194 #X msg 1114 442 \; sum1 const 0; 195 #X obj 681 712 applywindow sum2; 196 #X msg 494 634 sum2; 197 #X msg 790 684 sum1; 198 #N canvas 1 52 646 365 sumarray 0; 199 #N canvas 0 50 450 250 (subpatch) 0; 200 #X array sum2 103680 float 2; 201 #X coords 0 1 103680 -1 200 140 1; 202 tplarson 1.1 #X restore 130 68 graph; 203 #X msg 17 71 \; sum2 const 0; 204 #X obj 36 320 soundfiler; 205 #X obj 36 208 bng 30 250 50 0 empty empty empty 17 7 0 10 -4032 -1 206 -1; 207 #X text 72 215 save array to WAVE file; 208 #X obj 36 247 f; 209 #X obj 137 243 r play-SR; 210 #X msg 15 116 \; sum2 normalize; 211 #X msg 36 273 write -wave -bytes 4 -rate \$1 ./wav_out/windowed sum2 212 ; 213 #X connect 3 0 5 0; 214 #X connect 5 0 8 0; 215 #X connect 6 0 5 1; 216 #X connect 8 0 2 0; 217 #X restore 1090 695 pd sumarray; 218 #X obj 727 653 del 50; 219 #X obj 584 521 r outdone; 220 #X obj 615 556 + 1; 221 #X obj 674 584 sel 0; 222 #X obj 584 554 f 0; 223 tplarson 1.1 #X obj 674 553 mod 2; 224 #X floatatom 615 588 5 0 0 0 - - -, f 5; 225 #X msg 602 252 0; 226 #X obj 690 684 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 227 -1 -1; 228 #X obj 790 660 loadbang; 229 #X obj 358 619 -;
230 tplarson 1.2 #X obj 230 293 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0 231 1; 232 #X obj 230 313 s mswitch; 233 #X obj 128 551 r cadence; 234 #X obj 128 576 t b f;
235 tplarson 1.1 #X connect 0 0 9 0; 236 #X connect 1 0 9 0; 237 #X connect 2 0 12 0; 238 #X connect 2 0 10 0; 239 #X connect 2 0 20 0; 240 #X connect 2 0 32 0; 241 #X connect 2 0 109 0; 242 #X connect 2 0 115 0; 243 #X connect 3 0 9 0; 244 #X connect 4 0 6 0; 245 #X connect 4 1 12 0; 246 #X connect 5 0 4 0; 247 #X connect 10 0 11 0; 248 #X connect 12 0 4 1; 249 #X connect 14 0 18 0; 250 #X connect 14 0 22 0; 251 #X connect 14 0 94 0; 252 #X connect 15 0 17 0; 253 #X connect 15 0 1 0; 254 #X connect 15 0 93 0; 255 #X connect 17 0 16 0; 256 tplarson 1.1 #X connect 18 0 16 0; 257 #X connect 20 0 19 0; 258 #X connect 20 0 15 0; 259 #X connect 21 0 19 0; 260 #X connect 21 0 14 0; 261 #X connect 22 0 9 0; 262 #X connect 24 0 23 0; 263 #X connect 26 0 25 0; 264 #X connect 26 0 25 1; 265 #X connect 27 0 33 0; 266 #X connect 27 0 38 0; 267 #X connect 28 0 27 0; 268 #X connect 30 0 27 0; 269 #X connect 31 0 27 0; 270 #X connect 32 0 27 0; 271 #X connect 34 0 37 0; 272 #X connect 34 0 43 0; 273 #X connect 38 0 41 0; 274 #X connect 39 0 40 0; 275 #X connect 41 0 39 0; 276 #X connect 42 0 41 0; 277 tplarson 1.1 #X connect 42 1 39 1; 278 #X connect 43 0 44 0; 279 #X connect 43 1 42 0; 280 #X connect 44 0 42 0; 281 #X connect 45 0 144 4; 282 #X connect 46 0 68 1; 283 #X connect 47 0 68 0; 284 #X connect 48 0 68 2; 285 #X connect 49 0 68 3; 286 #X connect 50 0 68 4; 287 #X connect 51 0 68 6; 288 #X connect 56 0 26 0; 289 #X connect 57 0 56 1; 290 #X connect 58 0 57 0; 291 #X connect 62 0 34 0; 292 #X connect 63 0 34 0; 293 #X connect 64 0 34 0; 294 #X connect 68 0 56 0; 295 #X connect 68 1 67 0; 296 #X connect 68 2 45 0; 297 #X connect 68 3 66 0; 298 tplarson 1.1 #X connect 68 4 144 2; 299 #X connect 69 0 68 5; 300 #X connect 70 0 71 0; 301 #X connect 71 0 69 0; 302 #X connect 73 0 81 2; 303 #X connect 74 0 81 0; 304 #X connect 75 0 78 1; 305 #X connect 76 0 75 0; 306 #X connect 78 0 80 0; 307 #X connect 80 0 79 0; 308 #X connect 80 0 79 1; 309 #X connect 81 0 78 0; 310 #X connect 81 1 92 0; 311 #X connect 83 0 81 1; 312 #X connect 83 0 88 0; 313 #X connect 84 0 85 0; 314 #X connect 85 0 89 0; 315 #X connect 86 0 88 0; 316 #X connect 86 1 88 1; 317 #X connect 88 0 82 0; 318 #X connect 89 0 86 0; 319 tplarson 1.1 #X connect 89 0 110 0; 320 #X connect 89 0 111 0; 321 #X connect 90 0 89 0; 322 #X connect 90 1 89 1; 323 #X connect 91 0 90 0; 324 #X connect 93 0 95 0; 325 #X connect 94 0 95 0; 326 #X connect 96 0 97 0; 327 #X connect 97 0 47 0; 328 #X connect 97 1 46 0; 329 #X connect 99 0 98 0; 330 #X connect 99 0 161 0; 331 #X connect 99 1 108 0; 332 #X connect 100 0 99 0; 333 #X connect 101 0 98 0; 334 #X connect 104 0 105 0; 335 #X connect 105 0 106 0; 336 #X connect 106 0 108 0; 337 #X connect 108 0 98 0; 338 #X connect 109 0 23 0; 339 #X connect 112 0 113 0; 340 tplarson 1.1 #X connect 115 0 112 0; 341 #X connect 116 0 144 3; 342 #X connect 117 0 131 1; 343 #X connect 117 0 140 0; 344 #X connect 118 0 131 0; 345 #X connect 119 0 131 2; 346 #X connect 120 0 131 3; 347 #X connect 121 0 131 4; 348 #X connect 122 0 131 6; 349 #X connect 131 0 56 0; 350 #X connect 131 1 130 0; 351 #X connect 131 2 116 0; 352 #X connect 131 3 129 0; 353 #X connect 131 4 144 1; 354 #X connect 132 0 131 5; 355 #X connect 133 0 134 0; 356 #X connect 134 0 132 0; 357 #X connect 136 0 137 0; 358 #X connect 137 0 118 0; 359 #X connect 137 1 117 0; 360 #X connect 138 0 139 0; 361 tplarson 1.1 #X connect 140 0 164 1; 362 #X connect 141 0 139 1; 363 #X connect 142 0 141 1; 364 #X connect 144 0 154 0; 365 #X connect 145 0 144 0; 366 #X connect 146 0 151 0; 367 #X connect 150 0 138 0; 368 #X connect 151 0 139 2; 369 #X connect 152 0 150 1; 370 #X connect 154 0 162 0; 371 #X connect 155 0 158 0; 372 #X connect 156 0 158 1; 373 #X connect 156 0 159 0; 374 #X connect 156 0 160 0; 375 #X connect 157 0 145 0; 376 #X connect 158 0 156 0; 377 #X connect 159 0 157 0; 378 #X connect 161 0 158 1; 379 #X connect 162 0 150 0; 380 #X connect 163 0 152 0; 381 #X connect 164 0 141 0;
382 tplarson 1.2 #X connect 165 0 166 0; 383 #X connect 167 0 168 0; 384 #X connect 168 0 38 0; 385 #X connect 168 1 38 1;

Karen Tian