diff thunder4.pd @ 8:c8e2503e8da9

Thunder Updated and some small updates to wind

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/thunder4.pd	Sun Jan 18 13:01:08 2015 +0000
@@ -0,0 +1,309 @@
+#N canvas 168 171 601 372 10;
+#N canvas 152 29 188 323 afterimage 0;
+#X obj 1 114 noise~;
+#X obj 16 176 noise~;
+#X obj 1 199 *~;
+#X obj 1 241 bp~ 333 4;
+#X obj 1 135 lop~ 3;
+#X obj 1 220 clip~ -1 1;
+#X obj 52 68 line;
+#X obj 52 109 + 3;
+#X obj 52 89 * 30;
+#X obj 1 156 *~ 80;
+#X obj 117 67 line;
+#X obj 1 263 *~;
+#X msg 52 48 1 \, 0 600;
+#X msg 117 47 1 \, 0 6000;
+#X obj 1 283 *~ 0.9;
+#X obj 85 23 del 200;
+#X obj 85 1 inlet;
+#X obj 1 303 outlet~;
+#X connect 0 0 4 0;
+#X connect 1 0 2 1;
+#X connect 2 0 5 0;
+#X connect 3 0 11 0;
+#X connect 4 0 9 0;
+#X connect 5 0 3 0;
+#X connect 6 0 8 0;
+#X connect 7 0 4 1;
+#X connect 8 0 7 0;
+#X connect 9 0 2 0;
+#X connect 10 0 11 1;
+#X connect 11 0 14 0;
+#X connect 12 0 6 0;
+#X connect 13 0 10 0;
+#X connect 14 0 17 0;
+#X connect 15 0 12 0;
+#X connect 15 0 13 0;
+#X connect 16 0 15 0;
+#X restore 248 91 pd afterimage;
+#X obj 272 262 distance;
+#X obj 323 238 line;
+#X obj 11 71 r go;
+#X obj 248 68 r go;
+#X obj 350 66 r go;
+#X obj 128 70 r go;
+#X obj 186 49 line;
+#X msg 186 26 1 \, 0 9000;
+#X obj 186 4 r go;
+#X obj 323 193 r go;
+#X obj 272 348 dac~;
+#X obj 286 288 s~ udly;
+#N canvas 265 516 402 108 box 0;
+#X obj 319 51 switch~;
+#X obj 319 29 inlet;
+#X obj 1 7 udly 12000;
+#X obj 11 17 udly 12000;
+#X obj 21 27 udly 12000;
+#X obj 31 37 udly 12000;
+#X obj 41 47 udly 12000;
+#X obj 51 57 udly 12000;
+#X obj 61 67 udly 12000;
+#X obj 71 77 udly 12000;
+#X obj 87 7 udly 12000;
+#X obj 97 17 udly 12000;
+#X obj 107 27 udly 12000;
+#X obj 117 37 udly 12000;
+#X obj 127 47 udly 12000;
+#X obj 137 57 udly 12000;
+#X obj 147 67 udly 12000;
+#X obj 157 77 udly 12000;
+#X obj 172 6 udly 12000;
+#X obj 182 16 udly 12000;
+#X obj 192 26 udly 12000;
+#X obj 202 36 udly 12000;
+#X obj 212 46 udly 12000;
+#X obj 222 56 udly 12000;
+#X obj 232 66 udly 12000;
+#X obj 242 76 udly 12000;
+#X connect 1 0 0 0;
+#X restore 465 135 pd box of delays;
+#X obj 126 264 catch~ la;
+#X obj 368 263 catch~ ra;
+#X obj 465 115 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1
+1;
+#X obj 490 112 s shake;
+#X obj 490 91 r go;
+#X obj 12 22 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 12 44 s go;
+#X obj 186 71 * 2000;
+#X msg 323 215 0 \, 1 12000;
+#X obj 248 135 throw~ out;
+#X obj 197 264 catch~ out;
+#X obj 350 135 throw~ distance;
+#X obj 129 135 throw~ distance;
+#X obj 272 173 catch~ distance;
+#N canvas 132 138 177 510 rumble 0;
+#X obj 17 110 noise~;
+#X obj 33 314 -~ 0.5;
+#X obj 33 339 *~;
+#X obj 33 359 *~ -4;
+#X obj 33 379 +~ 1;
+#X obj 33 399 *~ 0.5;
+#X obj 75 28 noise~;
+#X obj 75 89 max~ 0;
+#X obj 17 172 samphold~;
+#X msg 938 102 0.54;
+#X obj 75 151 phasor~;
+#X obj 75 111 *~ 3000;
+#X obj 17 419 *~;
+#X obj 17 439 hip~ 100;
+#X obj 17 192 rpole~ 0.99;
+#X obj 17 212 *~ 0.04;
+#X obj 75 131 +~ 1;
+#X obj 81 -12 inlet density;
+#X obj 17 131 lop~;
+#X obj 17 152 lop~;
+#X obj 75 68 lop~;
+#X obj 75 48 lop~;
+#X obj 1 480 outlet~;
+#X obj 17 241 min~ 0;
+#X obj 17 263 *~ -1;
+#X obj 65 240 max~ 0;
+#X obj 17 286 +~;
+#X obj 1 28 vline~;
+#X obj 1 459 *~;
+#X obj 1 -12 inlet trig;
+#X msg 1 8 1 50 \, 0 8000 50;
+#X connect 0 0 18 0;
+#X connect 1 0 2 0;
+#X connect 1 0 2 1;
+#X connect 2 0 3 0;
+#X connect 3 0 4 0;
+#X connect 4 0 5 0;
+#X connect 5 0 12 1;
+#X connect 6 0 21 0;
+#X connect 7 0 11 0;
+#X connect 8 0 14 0;
+#X connect 10 0 8 1;
+#X connect 11 0 16 0;
+#X connect 12 0 13 0;
+#X connect 13 0 28 1;
+#X connect 14 0 15 0;
+#X connect 15 0 25 0;
+#X connect 15 0 23 0;
+#X connect 16 0 10 0;
+#X connect 17 0 20 1;
+#X connect 17 0 21 1;
+#X connect 17 0 18 1;
+#X connect 17 0 19 1;
+#X connect 18 0 19 0;
+#X connect 19 0 8 0;
+#X connect 20 0 7 0;
+#X connect 21 0 20 0;
+#X connect 23 0 24 0;
+#X connect 24 0 26 0;
+#X connect 25 0 26 1;
+#X connect 26 0 1 0;
+#X connect 26 0 12 0;
+#X connect 27 0 28 0;
+#X connect 28 0 22 0;
+#X connect 29 0 30 0;
+#X connect 30 0 27 0;
+#X restore 128 93 pd rumble;
+#N canvas 148 116 232 212 deep 0;
+#X obj 8 -8 noise~;
+#X obj 7 161 *~;
+#X obj 84 115 *~;
+#X obj 84 49 del 1000;
+#X obj 84 28 inlet;
+#X obj 7 181 outlet~;
+#X obj 84 91 vline~;
+#X msg 84 70 1 2000 \, 0 20000 2000;
+#X obj 8 12 lop~ 80;
+#X obj 8 32 lop~ 80;
+#X obj 8 52 hip~ 15;
+#X obj 8 92 clip~ -1 1;
+#X obj 8 72 *~ 12;
+#X obj 8 112 lop~ 80;
+#X obj 8 132 lop~ 80;
+#X connect 0 0 8 0;
+#X connect 1 0 5 0;
+#X connect 2 0 1 1;
+#X connect 3 0 7 0;
+#X connect 4 0 3 0;
+#X connect 6 0 2 0;
+#X connect 6 0 2 1;
+#X connect 7 0 6 0;
+#X connect 8 0 9 0;
+#X connect 9 0 10 0;
+#X connect 10 0 12 0;
+#X connect 11 0 13 0;
+#X connect 12 0 11 0;
+#X connect 13 0 14 0;
+#X connect 14 0 1 0;
+#X restore 350 88 pd deep;
+#X obj 11 135 throw~ out;
+#N canvas 724 263 166 223 strike 0;
+#X obj 0 172 outlet~;
+#X obj 1 44 route 0 1 2 3;
+#X obj 1 0 inlet;
+#N canvas 551 223 494 555 strike-pattern 0;
+#X obj 82 8 inlet;
+#X obj 153 334 outlet;
+#X obj 82 38 t b b;
+#X msg 82 71 1;
+#X msg 112 71 0;
+#X obj 82 98 +;
+#X obj 112 98 f;
+#X obj 82 125 moses 100;
+#X obj 82 152 t f f;
+#X obj 82 179 del;
+#X obj 82 207 t b b;
+#X obj 36 101 / 10;
+#X obj 82 257 random 100;
+#X obj 213 234 swap 100;
+#X obj 213 258 -;
+#X obj 213 284 / 100;
+#X obj 153 257 f;
+#X obj 182 257 + 1;
+#X obj 153 283 mod 4;
+#X obj 153 308 pack f f;
+#X connect 0 0 2 0;
+#X connect 2 0 3 0;
+#X connect 2 1 4 0;
+#X connect 3 0 5 0;
+#X connect 4 0 6 0;
+#X connect 5 0 6 0;
+#X connect 5 0 7 0;
+#X connect 6 0 5 1;
+#X connect 7 0 8 0;
+#X connect 8 0 9 0;
+#X connect 8 1 13 0;
+#X connect 9 0 10 0;
+#X connect 10 0 12 0;
+#X connect 10 1 16 0;
+#X connect 11 0 5 0;
+#X connect 12 0 11 0;
+#X connect 13 0 14 0;
+#X connect 13 1 14 1;
+#X connect 14 0 15 0;
+#X connect 15 0 19 1;
+#X connect 16 0 17 0;
+#X connect 16 0 18 0;
+#X connect 17 0 16 1;
+#X connect 18 0 19 0;
+#X connect 19 0 1 0;
+#X restore 1 23 pd strike-pattern;
+#X obj 1 67 strike-sound;
+#X obj 22 87 strike-sound;
+#X obj 65 126 strike-sound;
+#X obj 44 107 strike-sound;
+#X connect 1 0 4 0;
+#X connect 1 1 5 0;
+#X connect 1 2 7 0;
+#X connect 1 3 6 0;
+#X connect 2 0 3 0;
+#X connect 3 0 1 0;
+#X connect 4 0 0 0;
+#X connect 5 0 0 0;
+#X connect 6 0 0 0;
+#X connect 7 0 0 0;
+#X restore 11 94 pd strike;
+#X obj 12 0 inlet;
+#X obj 465 63 inlet;
+#X obj 11 115 *~ 0.3;
+#X obj 129 114 *~ 0.2;
+#X obj 248 113 *~ 0.9;
+#X obj 350 111 *~ 0.5;
+#X obj 367 340 throw~ l;
+#X obj 460 344 throw~ r;
+#X connect 0 0 36 0;
+#X connect 1 0 11 0;
+#X connect 1 0 11 1;
+#X connect 1 0 12 0;
+#X connect 1 0 38 0;
+#X connect 1 0 39 0;
+#X connect 2 0 1 1;
+#X connect 3 0 31 0;
+#X connect 4 0 0 0;
+#X connect 5 0 29 0;
+#X connect 6 0 28 0;
+#X connect 7 0 21 0;
+#X connect 8 0 7 0;
+#X connect 9 0 8 0;
+#X connect 10 0 22 0;
+#X connect 14 0 11 0;
+#X connect 14 0 38 0;
+#X connect 15 0 11 1;
+#X connect 15 0 39 0;
+#X connect 16 0 13 0;
+#X connect 18 0 17 0;
+#X connect 19 0 20 0;
+#X connect 21 0 28 1;
+#X connect 22 0 2 0;
+#X connect 24 0 11 0;
+#X connect 24 0 11 1;
+#X connect 24 0 38 0;
+#X connect 24 0 39 0;
+#X connect 27 0 1 0;
+#X connect 28 0 35 0;
+#X connect 29 0 37 0;
+#X connect 31 0 34 0;
+#X connect 32 0 19 0;
+#X connect 33 0 16 0;
+#X connect 34 0 30 0;
+#X connect 35 0 26 0;
+#X connect 36 0 23 0;
+#X connect 37 0 25 0;