(file) Return to applywindow.pd CVS log (file) (dir) Up to [Development] / JSOC / proj / globalhs / sosh

File: [Development] / JSOC / proj / globalhs / sosh / applywindow.pd (download)
Revision: 1.2, Fri Feb 22 22:23:59 2019 UTC (4 years, 3 months ago) by tplarson
Branch: MAIN
CVS Tags: Ver_LATEST, Ver_9-5, Ver_9-41, Ver_9-4, HEAD
Changes since 1.1: +33 -29 lines
new versions

#N canvas 1 52 1265 635 10;
#X msg 545 140 set \$1;
#X msg 545 176 sum1;
#X obj 332 168 until;
#X obj 332 196 f;
#X obj 363 198 + 1;
#X obj 407 198 sel 0;
#X obj 375 281 tabread;
#X obj 254 72 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 277 107 float;
#X obj 254 29 inlet;
#X obj 114 532 soundfiler;
#X obj 414 340 t b f;
#X obj 289 455 tabwrite \$1;
#X obj 114 384 bng 30 250 50 0 empty empty empty 17 7 0 10 -4032 -1
-1;
#X text 150 390 save array to WAVE file;
#X obj 114 448 list append;
#X obj 188 419 r play-SR;
#X obj 114 422 symbol \$1;
#X msg 254 131 -1;
#X obj 440 281 tabread window;
#X obj 414 377 *;
#X obj 339 50 r nsamples;
#X obj 339 120 min;
#X obj 339 81 t b f;
#X obj 322 28 r block-size;
#X obj 439 163 - 1;
#X obj 495 237 outlet;
#X msg 114 493 write -wave -bytes 4 -rate \$2 ./wav_out/windowed \$1
;
#X obj 545 37 inlet;
#X obj 545 69 list prepend symbol;
#X obj 545 94 route list;
#X connect 0 0 1 0;
#X connect 0 0 6 0;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 4 0 3 1;
#X connect 4 0 12 1;
#X connect 4 0 6 0;
#X connect 4 0 19 0;
#X connect 5 0 2 1;
#X connect 5 0 26 0;
#X connect 6 0 20 0;
#X connect 7 0 8 0;
#X connect 7 0 18 0;
#X connect 8 0 2 0;
#X connect 9 0 7 0;
#X connect 11 0 20 0;
#X connect 11 1 20 1;
#X connect 13 0 17 0;
#X connect 15 0 27 0;
#X connect 16 0 15 1;
#X connect 17 0 15 0;
#X connect 18 0 3 1;
#X connect 19 0 11 0;
#X connect 20 0 12 0;
#X connect 21 0 23 0;
#X connect 22 0 8 1;
#X connect 22 0 25 0;
#X connect 23 0 22 0;
#X connect 23 1 22 1;
#X connect 24 0 22 0;
#X connect 25 0 5 1;
#X connect 27 0 10 0;
#X connect 28 0 29 0;
#X connect 29 0 30 0;
#X connect 30 0 0 0;

Karen Tian
Powered by
ViewCVS 0.9.4