Mercurial > hg > weather-synthesis-prototyping

annotate polarD1.pd @ 14:b76ee938cb04

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
BBCSpectrum image
author Roderick Selfridge <r.selfridge@qmul.ac.uk>
date Mon, 19 Jan 2015 11:57:35 +0000
parents 03b38137bc08
children 18e9346e6f11
rev   line source
r@11 1 #N canvas 169 74 991 677 10;
r@11 2 #X obj 442 -1591 hsl 128 15 0 127 0 0 empty empty empty -2 -8 0 10
r@13 3 -262144 -1 -1 11100 1;
r@11 4 #X obj 439 -1616 inlet;
r@12 5 #X obj 414 -1198 throw~ l;
r@12 6 #X obj 479 -1198 throw~ r;
r@12 7 #X obj 417 -1437 r~ white;
r@11 8 #X obj 495 -1446 cos~;
r@12 9 #X obj 518 -1358 osc~;
r@11 10 #X obj 417 -1315 *~ 2;
r@11 11 #X obj 439 -1565 / 127;
r@12 12 #X text 448 -1161 high Tone;
r@11 13 #X obj 495 -1424 lop~ 0.1;
r@12 14 #X obj 414 -1220 fcpan 0.48;
r@9 15 #X obj 20 -1588 noise~;
r@13 16 #N canvas 64 234 764 550 windspeed 0;
r@9 17 #X obj 127 63 +~ 1;
r@9 18 #X obj 126 173 +~;
r@9 19 #X obj 127 86 *~ 0.25;
r@9 20 #X obj 142 151 +~;
r@9 21 #N canvas 190 268 362 239 squall 0;
r@9 22 #X obj 78 41 noise~;
r@9 23 #X obj 77 108 hip~ 0;
r@9 24 #X obj 78 64 lop~ 3;
r@9 25 #X obj 78 85 lop~ 3;
r@9 26 #X obj 17 112 *~;
r@9 27 #X obj 38 160 *~;
r@9 28 #X obj 16 42 max~ 0.4;
r@9 29 #X obj 16 64 -~ 0.4;
r@9 30 #X obj 16 87 *~ 8;
r@9 31 #X obj 78 129 *~ 20;
r@9 32 #X obj 16 14 inlet~;
r@9 33 #X obj 40 184 outlet~;
r@9 34 #X obj 159 37 hsl 128 15 0 127 0 0 empty empty empty -2 -8 0 10 -262144
r@9 35 -1 -1 0 1;
r@9 36 #X obj 156 61 / 127;
r@9 37 #X obj 156 115 + 3;
r@9 38 #X obj 156 88 * 4;
r@9 39 #X obj 156 9 inlet;
r@9 40 #X connect 0 0 2 0;
r@9 41 #X connect 1 0 9 0;
r@9 42 #X connect 2 0 3 0;
r@9 43 #X connect 3 0 1 0;
r@9 44 #X connect 4 0 5 0;
r@9 45 #X connect 5 0 11 0;
r@9 46 #X connect 6 0 7 0;
r@9 47 #X connect 7 0 8 0;
r@9 48 #X connect 8 0 4 0;
r@9 49 #X connect 8 0 4 1;
r@9 50 #X connect 9 0 5 1;
r@9 51 #X connect 10 0 6 0;
r@9 52 #X connect 12 0 13 0;
r@9 53 #X connect 13 0 15 0;
r@9 54 #X connect 14 0 2 1;
r@9 55 #X connect 14 0 3 1;
r@9 56 #X connect 15 0 14 0;
r@9 57 #X connect 16 0 12 0;
r@9 58 #X restore 197 120 pd squall;
r@9 59 #N canvas 230 295 243 313 gust 0;
r@9 60 #X obj 9 15 noise~;
r@9 61 #X obj 8 157 *~;
r@9 62 #X obj 70 9 *~;
r@9 63 #X obj 69 -14 +~ 0.5;
r@9 64 #X obj 70 33 -~ 0.125;
r@9 65 #X obj 9 103 *~ 50;
r@9 66 #X obj 69 -54 inlet~;
r@9 67 #X obj 8 182 outlet~;
r@9 68 #X obj 9 59 lop~ 4;
r@9 69 #X obj 8 82 hip~ 0;
r@9 70 #X obj 9 38 lop~ 4;
r@9 71 #X obj 143 -74 hsl 128 15 0 127 0 0 empty empty empty -2 -8 0 10 -262144
r@9 72 -1 -1 0 1;
r@9 73 #X obj 140 -51 / 127;
r@9 74 #X obj 140 -26 * 4;
r@9 75 #X obj 140 -101 inlet;
r@9 76 #X connect 0 0 10 0;
r@9 77 #X connect 1 0 7 0;
r@9 78 #X connect 2 0 4 0;
r@9 79 #X connect 3 0 2 0;
r@9 80 #X connect 3 0 2 1;
r@9 81 #X connect 4 0 1 1;
r@9 82 #X connect 5 0 1 0;
r@9 83 #X connect 6 0 3 0;
r@9 84 #X connect 8 0 9 0;
r@9 85 #X connect 9 0 5 0;
r@9 86 #X connect 10 0 8 0;
r@9 87 #X connect 11 0 12 0;
r@9 88 #X connect 12 0 13 0;
r@9 89 #X connect 13 0 10 1;
r@9 90 #X connect 13 0 8 1;
r@9 91 #X connect 14 0 11 0;
r@9 92 #X restore 141 120 pd gust;
r@9 93 #X obj 127 259 outlet~;
r@9 94 #X msg 184 10 0.1;
r@9 95 #X obj 127 41 osc~ 0.1;
r@9 96 #X obj 38 103 vsl 15 128 0 127 0 0 empty empty empty 0 -9 0 10 -262144
r@12 97 -1 -1 0 1;
r@9 98 #X obj 127 200 *~ 1;
r@9 99 #X obj 40 256 / 64;
r@9 100 #X obj 127 233 clip~ 0 2;
r@9 101 #X obj 180 65 inlet;
r@9 102 #X obj 248 93 inlet;
r@9 103 #X obj 38 68 inlet;
r@9 104 #X obj 127 -151 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
r@13 105 1 1;
r@9 106 #X obj 127 -100 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
r@9 107 -1 -1;
r@9 108 #X floatatom 127 -52 5 0 0 0 - - -;
r@9 109 #X floatatom 127 7 5 0 0 0 - - -;
r@11 110 #X obj 127 -76 drunk 100 20;
r@13 111 #X obj 127 -126 metro 8000;
r@13 112 #X obj 127 -24 / 400;
r@13 113 #X obj 55 -144 loadbang;
r@9 114 #X connect 0 0 2 0;
r@9 115 #X connect 1 0 10 0;
r@9 116 #X connect 2 0 1 0;
r@9 117 #X connect 2 0 5 0;
r@9 118 #X connect 2 0 4 0;
r@9 119 #X connect 3 0 1 1;
r@9 120 #X connect 4 0 3 1;
r@9 121 #X connect 5 0 3 0;
r@9 122 #X connect 7 0 8 1;
r@9 123 #X connect 8 0 0 0;
r@9 124 #X connect 9 0 11 0;
r@9 125 #X connect 10 0 12 0;
r@9 126 #X connect 11 0 10 1;
r@9 127 #X connect 12 0 6 0;
r@9 128 #X connect 13 0 5 1;
r@9 129 #X connect 14 0 4 1;
r@9 130 #X connect 15 0 9 0;
r@11 131 #X connect 16 0 21 0;
r@11 132 #X connect 17 0 20 0;
r@11 133 #X connect 18 0 22 0;
r@11 134 #X connect 19 0 8 0;
r@11 135 #X connect 20 0 18 0;
r@11 136 #X connect 21 0 17 0;
r@11 137 #X connect 22 0 19 0;
r@13 138 #X connect 23 0 21 0;
r@9 139 #X restore -101 -1555 pd windspeed;
r@9 140 #X obj -101 -1533 delwrite~ a 3000;
r@9 141 #X obj 20 -1566 s~ white;
r@9 142 #X obj -67 -1601 inlet;
r@9 143 #X obj -32 -1582 inlet;
r@9 144 #X obj -101 -1579 inlet;
r@11 145 #X obj -71 -1435 dac~;
r@11 146 #X obj -95 -1494 catch~ l;
r@11 147 #X obj -31 -1494 catch~ r;
r@11 148 #X obj -30 -1460 *~ 0.45;
r@11 149 #X obj -94 -1460 *~ 0.45;
r@11 150 #X obj -94 -1410 prvu~;
r@11 151 #X obj -93 -1376 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
r@11 152 #X obj -30 -1409 prvu~;
r@11 153 #X obj -29 -1376 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0;
r@11 154 #X obj 82 -1477 vsl 15 128 0 127 0 0 empty empty empty 0 -9 0 10 -262144
r@13 155 -1 -1 8900 1;
r@11 156 #X obj 82 -1329 / 64;
r@11 157 #X obj 253 -1504 hsl 128 15 0 127 0 0 empty empty empty -2 -8 0 10
r@13 158 -262144 -1 -1 5100 1;
r@11 159 #X obj 251 -1410 hsl 128 15 0 127 0 0 empty empty empty -2 -8 0 10
r@13 160 -262144 -1 -1 12700 1;
r@11 161 #X obj 250 -1480 / 127;
r@11 162 #X obj 248 -1388 / 127;
r@11 163 #X obj 254 -1449 * 600;
r@11 164 #X obj 247 -1337 + 10;
r@12 165 #X obj 438 -1461 * 40;
r@11 166 #X floatatom 330 -1465 5 0 0 0 - - -;
r@11 167 #X floatatom 297 -1302 5 0 0 0 - - -;
r@11 168 #X obj 626 -1536 hsl 128 15 0 127 0 0 empty empty empty -2 -8 0 10
r@13 169 -262144 -1 -1 9700 1;
r@11 170 #X obj 623 -1513 / 127;
r@11 171 #N canvas 0 22 450 300 (subpatch) 0;
r@11 172 #X array \$0-array 100 float 0;
r@11 173 #X coords 0 1 99 0 100 100 1 0 0;
r@11 174 #X restore 178 -1619 graph;
r@11 175 #X obj 77 -1552 metro 500;
r@11 176 #X text 79 -1511 graph the output;
r@11 177 #X obj 77 -1577 loadbang;
r@11 178 #X obj 61 -1528 tabwrite~ \$0-array;
r@11 179 #X obj 145 -1575 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
r@12 180 0 1;
r@11 181 #X obj 495 -1556 vd~ a 10;
r@12 182 #X obj 495 -1402 *~ 100;
r@12 183 #X obj 622 -1451 + 1;
r@12 184 #X obj 623 -1480 * 200;
r@13 185 #X obj 495 -1534 clip~ 0.26 0.99;
r@13 186 #X obj 332 -1372 * 3;
r@13 187 #X floatatom 343 -1339 5 0 0 0 - - -;
r@13 188 #X obj 415 -1393 lop~ 400;
r@13 189 #X obj 417 -1257 hip~ 40;
r@13 190 #X obj 558 -1328 hsl 128 15 0 127 0 0 empty empty empty -2 -8 0 10
r@13 191 -262144 -1 -1 9300 1;
r@13 192 #X obj 556 -1305 / 127;
r@13 193 #X obj 554 -1280 * 100;
r@13 194 #X obj 553 -1255 + 5;
r@13 195 #X floatatom 575 -1230 5 0 0 0 - - -;
r@12 196 #X obj 416 -1336 *~;
r@13 197 #X obj 417 -1359 bp~ 300 200;
r@13 198 #X obj 416 -1291 *~;
r@13 199 #X obj 495 -1380 +~ 200;
r@13 200 #X obj 248 -1363 * 100;
r@11 201 #X connect 0 0 8 0;
r@9 202 #X connect 1 0 0 0;
r@13 203 #X connect 4 0 54 0;
r@11 204 #X connect 5 0 10 0;
r@13 205 #X connect 6 0 63 1;
r@13 206 #X connect 7 0 63 0;
r@12 207 #X connect 8 0 36 0;
r@13 208 #X connect 10 0 48 0;
r@13 209 #X connect 10 0 61 1;
r@11 210 #X connect 11 0 2 0;
r@11 211 #X connect 11 1 3 0;
r@11 212 #X connect 12 0 15 0;
r@11 213 #X connect 13 0 14 0;
r@12 214 #X connect 13 0 45 0;
r@11 215 #X connect 16 0 13 1;
r@11 216 #X connect 17 0 13 2;
r@11 217 #X connect 18 0 13 0;
r@11 218 #X connect 20 0 23 0;
r@11 219 #X connect 21 0 22 0;
r@11 220 #X connect 22 0 19 1;
r@11 221 #X connect 22 0 26 0;
r@11 222 #X connect 23 0 19 0;
r@11 223 #X connect 23 0 24 0;
r@11 224 #X connect 24 0 25 0;
r@10 225 #X connect 26 0 27 0;
r@10 226 #X connect 28 0 29 0;
r@11 227 #X connect 29 0 22 1;
r@11 228 #X connect 29 0 23 1;
r@12 229 #X connect 30 0 32 0;
r@11 230 #X connect 31 0 33 0;
r@11 231 #X connect 32 0 34 0;
r@13 232 #X connect 33 0 65 0;
r@12 233 #X connect 34 0 37 0;
r@13 234 #X connect 34 0 52 0;
r@11 235 #X connect 35 0 38 0;
r@12 236 #X connect 36 0 7 1;
r@13 237 #X connect 37 0 62 1;
r@13 238 #X connect 38 0 62 2;
r@12 239 #X connect 39 0 40 0;
r@13 240 #X connect 40 0 50 0;
r@12 241 #X connect 42 0 45 0;
r@12 242 #X connect 44 0 42 0;
r@12 243 #X connect 44 0 42 0;
r@12 244 #X connect 46 0 42 0;
r@13 245 #X connect 47 0 51 0;
r@13 246 #X connect 48 0 64 0;
r@13 247 #X connect 49 0 48 1;
r@13 248 #X connect 50 0 49 0;
r@13 249 #X connect 51 0 5 0;
r@13 250 #X connect 52 0 53 0;
r@13 251 #X connect 53 0 54 1;
r@13 252 #X connect 54 0 62 0;
r@13 253 #X connect 55 0 11 0;
r@13 254 #X connect 56 0 57 0;
r@13 255 #X connect 57 0 58 0;
r@13 256 #X connect 58 0 59 0;
r@13 257 #X connect 59 0 55 1;
r@13 258 #X connect 59 0 60 0;
r@13 259 #X connect 61 0 7 0;
r@13 260 #X connect 62 0 61 0;
r@13 261 #X connect 63 0 55 0;
r@13 262 #X connect 64 0 6 0;
r@13 263 #X connect 65 0 35 0;