1 files changed, 0 insertions, 217 deletions
diff --git a/rs-sonograph~.pd b/rs-sonograph~.pd
deleted file mode 100644
index a8531fa..0000000
--- a/rs-sonograph~.pd
+++ /dev/null
@@ -1,217 +0,0 @@
-#N canvas 0 1 986 654 10;
-#X msg 344 51 record;
-#X msg 53 30 bang;
-#X obj 53 50 openpanel;
-#X obj 52 167 soundfiler;
-#X msg 297 36 bang;
-#X obj 298 99 rfft~;
-#X floatatom 90 186 10 0 0;
-#X msg 168 185 resize \$1;
-#X obj 53 72 t s b;
-#X obj 53 129 pack s s;
-#X msg 52 150 read -resize \$1 \$2;
-#X obj 99 71 float \$0;
-#X obj 54 95 route float;
-#X obj 52 207 makefilename %d-sonosample;
-#X text 57 14 Step 1 : Load a sound file;
-#X obj 820 17 table \$0-sonosample;
-#X msg 822 43 \; pd dsp 1;
-#X obj 121 580 rifft~;
-#X msg 340 158 play;
-#X obj 822 82 block~ 256;
-#X obj 27 607 outlet~;
-#X text 346 135 Step 3 : Play the recorded sonogram;
-#X msg 887 44 \; pd dsp 0;
-#X obj 52 186 / 256;
-#X obj 121 607 /~ 256;
-#X obj 342 181 hsl 128 15 0 100 0 0 empty empty empty 20 8 0 8 -262144
--1 -1 0 1;
-#X text 316 181 0 %;
-#X text 476 180 100 %;
-#X obj 343 199 hsl 128 15 0 100 0 0 empty empty empty 20 8 0 8 -262144
--1 -1 12700 1;
-#X text 317 202 0 %;
-#X text 478 198 100 %;
-#X msg 512 196 100;
-#X obj 539 196 loadbang;
-#X text 339 217 Playback positions;
-#X obj 697 184 hsl 128 15 0 100 0 0 empty empty empty 20 8 0 8 -262144
--1 -1 0 1;
-#X text 671 184 0 %;
-#X text 831 183 100 %;
-#X obj 698 202 hsl 128 15 0 100 0 0 empty empty empty 20 8 0 8 -262144
--1 -1 12700 1;
-#X text 672 205 0 %;
-#X text 833 201 100 %;
-#X text 697 167 Set portion of the sonogram to modify;
-#X text 883 183 Start Point;
-#X text 883 198 End Point;
-#X msg 695 220 100;
-#X obj 722 220 loadbang;
-#X text 242 15 Step 2 : Record the sonogram;
-#N canvas 309 22 600 544 modifications 1;
-#X text 234 236 Filter a frequency;
-#X msg 107 239 filter \$1 \$1;
-#X msg 105 161 enhance \$1 \$1 1.1;
-#X msg 106 198 dim \$1 \$1 1.1;
-#X text 236 155 Enhance a frequency by 10% ( might be a range of frequencies
-with message 'enhance f1 f2 x' );
-#X text 234 198 Dim a frequency by 10 %;
-#X text 180 309 Flip frequencies ( dogs love it );
-#X msg 108 265 swappoints 1000;
-#X obj 179 97 hdl 8 1 0 128 empty empty empty 20 8 0 8 -260818 -24198
--128992 0;
-#X msg 106 116 swapfreqs \$1 \$2;
-#X obj 223 116 pack f f;
-#X text 218 264 Swap 1000 points ( rain effect );
-#X msg 151 94 \$1;
-#X obj 106 94 change;
-#X obj 179 77 hdl 8 1 0 128 empty empty empty 20 8 0 8 -260818 -24198
--128992 0;
-#X msg 151 74 \$1;
-#X obj 106 74 change;
-#X obj 178 145 hdl 8 1 0 128 empty empty empty 20 8 0 8 -260818 -24198
--128992 0;
-#X obj 179 183 hdl 8 1 0 128 empty empty empty 20 8 0 8 -260818 -24198
--128992 0;
-#X obj 180 223 hdl 8 1 0 128 empty empty empty 20 8 0 8 -260818 -24198
--128992 0;
-#X text 285 115 Swap two frequencies ( set 2nd \, click 1st );
-#X msg 110 308 flipfreqs;
-#X msg 110 330 flipblocks;
-#X text 244 286 Swap section [0% \, 20%] and [50% \, 70%] of [start
-\, end];
-#X text 185 330 Flip blocks ( reverse effect );
-#X msg 110 287 swapblocks 0 50 20;
-#X msg 152 32 godown 1;
-#X msg 107 32 goup 2;
-#X text 218 32 Move frequencies up or down;
-#X msg 108 54 roll 2;
-#X text 210 45 Roll frequencies : same as above but without loss (
-circular );
-#X msg 112 350 zswap;
-#X text 364 374 Change the phase;
-#X text 180 350 Exchange real and imaginery parts ( noisy filter )
-;
-#X msg 113 374 phase \$1;
-#X obj 200 373 hsl 128 15 0 90 0 0 empty empty empty 20 8 0 8 -262144
--1 -1 0 1;
-#X text 184 373 0;
-#X text 339 374 90;
-#X obj 187 415 hdl 8 1 0 128 empty empty empty 20 8 0 8 -260818 -24198
--128992 0;
-#X msg 113 429 add \$1 \$1 0.5;
-#X text 216 429 Add a constant to a frequency;
-#X obj 189 451 hdl 8 1 0 128 empty empty empty 20 8 0 8 -260818 -24198
--128992 0;
-#X msg 115 466 add \$1 \$1 -0.5;
-#X text 218 465 Sub a constant from a frequency;
-#X msg 113 395 average 100;
-#X text 190 395 Average over 100 blocks ( smooth with some sounds )
-;
-#X obj 16 454 outlet;
-#X connect 1 0 46 0;
-#X connect 2 0 46 0;
-#X connect 3 0 46 0;
-#X connect 7 0 46 0;
-#X connect 8 0 12 0;
-#X connect 9 0 46 0;
-#X connect 10 0 9 0;
-#X connect 12 0 13 0;
-#X connect 13 0 10 1;
-#X connect 14 0 15 0;
-#X connect 15 0 16 0;
-#X connect 16 0 10 0;
-#X connect 17 0 2 0;
-#X connect 18 0 3 0;
-#X connect 19 0 1 0;
-#X connect 21 0 46 0;
-#X connect 22 0 46 0;
-#X connect 25 0 46 0;
-#X connect 26 0 46 0;
-#X connect 27 0 46 0;
-#X connect 29 0 46 0;
-#X connect 31 0 46 0;
-#X connect 34 0 46 0;
-#X connect 35 0 34 0;
-#X connect 38 0 39 0;
-#X connect 39 0 46 0;
-#X connect 41 0 42 0;
-#X connect 42 0 46 0;
-#X connect 44 0 46 0;
-#X restore 694 150 pd modifications;
-#X obj 298 73 tabplay~ \$0-sonosample;
-#X obj 106 329 sonogram~ 256 0;
-#X text 538 54 When the sonogram is RED (updating) \,;
-#X text 537 43 VERY IMPORTANT NOTE :;
-#X text 591 116 Step 4 : modify parts of the sonogram ... and send
-a refresh message;
-#X msg 337 234 readspeed \$1;
-#X floatatom 468 234 5 0 0;
-#X text 337 252 Reading speed;
-#X obj 428 234 / 100;
-#X msg 515 234 100;
-#X obj 549 234 loadbang;
-#X text 538 66 no update is possible;
-#X msg 221 525 play;
-#X msg 217 555 open /tmp/sonogram.wav;
-#X obj 246 603 writesf~ 2;
-#X msg 276 576 start;
-#X msg 320 576 stop;
-#X floatatom 172 609 5 0 0;
-#X obj 436 158 tgl 15 0 empty empty empty 20 8 0 8 -262144 -1 -1 1
-1;
-#X text 464 160 Loop;
-#X obj 381 159 spigot;
-#X connect 0 0 48 0;
-#X connect 1 0 2 0;
-#X connect 2 0 8 0;
-#X connect 3 0 23 0;
-#X connect 4 0 0 0;
-#X connect 4 0 47 0;
-#X connect 5 0 48 0;
-#X connect 5 1 48 1;
-#X connect 6 0 7 0;
-#X connect 7 0 48 0;
-#X connect 8 0 9 0;
-#X connect 8 1 11 0;
-#X connect 9 0 10 0;
-#X connect 10 0 3 0;
-#X connect 11 0 12 0;
-#X connect 12 0 13 0;
-#X connect 13 0 9 1;
-#X connect 17 0 24 0;
-#X connect 18 0 48 0;
-#X connect 23 0 6 0;
-#X connect 24 0 20 0;
-#X connect 24 0 61 0;
-#X connect 24 0 61 1;
-#X connect 25 0 48 2;
-#X connect 28 0 48 3;
-#X connect 31 0 28 0;
-#X connect 32 0 31 0;
-#X connect 34 0 48 4;
-#X connect 37 0 48 5;
-#X connect 43 0 37 0;
-#X connect 44 0 43 0;
-#X connect 46 0 48 0;
-#X connect 47 0 5 0;
-#X connect 47 0 20 0;
-#X connect 48 0 17 0;
-#X connect 48 1 17 1;
-#X connect 48 3 63 0;
-#X connect 48 3 67 0;
-#X connect 52 0 48 0;
-#X connect 53 0 55 0;
-#X connect 55 0 52 0;
-#X connect 56 0 53 0;
-#X connect 57 0 56 0;
-#X connect 59 0 48 0;
-#X connect 59 0 60 0;
-#X connect 59 0 62 0;
-#X connect 60 0 61 0;
-#X connect 62 0 61 0;
-#X connect 63 0 61 0;
-#X connect 64 0 24 1;
-#X connect 65 0 67 1;
-#X connect 67 0 18 0;