view thunder4.pd @ 8:c8e2503e8da9

Thunder Updated and some small updates to wind

#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;