Mercurial > hg > weather-synthesis-prototyping
comparison polarD1.pd @ 15:18e9346e6f11
More parameterisation and adaptions due to spectrum analysis
| author | Roderick Selfridge <r.selfridge@qmul.ac.uk> |
|---|---|
| date | Mon, 19 Jan 2015 13:59:59 +0000 |
| parents | 03b38137bc08 |
| children |
comparison
equal
deleted
inserted
replaced
| 14:b76ee938cb04 | 15:18e9346e6f11 |
|---|---|
| 1 #N canvas 169 74 991 677 10; | 1 #N canvas 232 23 991 677 10; |
| 2 #X obj 442 -1591 hsl 128 15 0 127 0 0 empty empty empty -2 -8 0 10 | 2 #X obj 611 -1305 hsl 128 15 0 127 0 0 empty empty empty -2 -8 0 10 |
| 3 -262144 -1 -1 11100 1; | 3 -262144 -1 -1 6800 1; |
| 4 #X obj 439 -1616 inlet; | 4 #X obj 608 -1330 inlet; |
| 5 #X obj 414 -1198 throw~ l; | 5 #X obj 416 -1305 throw~ l; |
| 6 #X obj 479 -1198 throw~ r; | 6 #X obj 481 -1305 throw~ r; |
| 7 #X obj 417 -1437 r~ white; | 7 #X obj 417 -1517 r~ white; |
| 8 #X obj 495 -1446 cos~; | 8 #X obj 495 -1507 cos~; |
| 9 #X obj 518 -1358 osc~; | 9 #X obj 495 -1419 osc~; |
| 10 #X obj 417 -1315 *~ 2; | 10 #X obj 417 -1376 *~ 2; |
| 11 #X obj 439 -1565 / 127; | 11 #X obj 608 -1279 / 127; |
| 12 #X text 448 -1161 high Tone; | 12 #X obj 495 -1485 lop~ 0.1; |
| 13 #X obj 495 -1424 lop~ 0.1; | 13 #X obj 416 -1327 fcpan 0.48; |
| 14 #X obj 414 -1220 fcpan 0.48; | 14 #X obj 27 -1672 noise~; |
| 15 #X obj 20 -1588 noise~; | |
| 16 #N canvas 64 234 764 550 windspeed 0; | 15 #N canvas 64 234 764 550 windspeed 0; |
| 17 #X obj 127 63 +~ 1; | 16 #X obj 127 63 +~ 1; |
| 18 #X obj 126 173 +~; | 17 #X obj 126 173 +~; |
| 19 #X obj 127 86 *~ 0.25; | 18 #X obj 127 86 *~ 0.25; |
| 20 #X obj 142 151 +~; | 19 #X obj 142 151 +~; |
| 134 #X connect 19 0 8 0; | 133 #X connect 19 0 8 0; |
| 135 #X connect 20 0 18 0; | 134 #X connect 20 0 18 0; |
| 136 #X connect 21 0 17 0; | 135 #X connect 21 0 17 0; |
| 137 #X connect 22 0 19 0; | 136 #X connect 22 0 19 0; |
| 138 #X connect 23 0 21 0; | 137 #X connect 23 0 21 0; |
| 139 #X restore -101 -1555 pd windspeed; | 138 #X restore -94 -1639 pd windspeed; |
| 140 #X obj -101 -1533 delwrite~ a 3000; | 139 #X obj -94 -1617 delwrite~ a 3000; |
| 141 #X obj 20 -1566 s~ white; | 140 #X obj 27 -1650 s~ white; |
| 142 #X obj -67 -1601 inlet; | 141 #X obj -60 -1685 inlet; |
| 143 #X obj -32 -1582 inlet; | 142 #X obj -25 -1666 inlet; |
| 144 #X obj -101 -1579 inlet; | 143 #X obj -94 -1663 inlet; |
| 145 #X obj -71 -1435 dac~; | 144 #X obj -64 -1519 dac~; |
| 146 #X obj -95 -1494 catch~ l; | 145 #X obj -88 -1578 catch~ l; |
| 147 #X obj -31 -1494 catch~ r; | 146 #X obj -24 -1578 catch~ r; |
| 148 #X obj -30 -1460 *~ 0.45; | 147 #X obj -23 -1544 *~ 0.45; |
| 149 #X obj -94 -1460 *~ 0.45; | 148 #X obj -87 -1544 *~ 0.45; |
| 150 #X obj -94 -1410 prvu~; | 149 #X obj -87 -1494 prvu~; |
| 151 #X obj -93 -1376 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; | 150 #X obj -86 -1460 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; |
| 152 #X obj -30 -1409 prvu~; | 151 #X obj -23 -1493 prvu~; |
| 153 #X obj -29 -1376 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; | 152 #X obj -22 -1460 vu 15 120 empty empty -1 -8 0 10 -66577 -1 1 0; |
| 154 #X obj 82 -1477 vsl 15 128 0 127 0 0 empty empty empty 0 -9 0 10 -262144 | 153 #X obj 89 -1561 vsl 15 128 0 127 0 0 empty empty empty 0 -9 0 10 -262144 |
| 155 -1 -1 8900 1; | 154 -1 -1 2200 1; |
| 156 #X obj 82 -1329 / 64; | 155 #X obj 89 -1413 / 64; |
| 157 #X obj 253 -1504 hsl 128 15 0 127 0 0 empty empty empty -2 -8 0 10 | 156 #X obj 253 -1504 hsl 128 15 0 127 0 0 empty empty empty -2 -8 0 10 |
| 158 -262144 -1 -1 5100 1; | 157 -262144 -1 -1 8200 1; |
| 159 #X obj 251 -1410 hsl 128 15 0 127 0 0 empty empty empty -2 -8 0 10 | 158 #X obj 251 -1354 hsl 128 15 0 127 0 0 empty empty empty -2 -8 0 10 |
| 159 -262144 -1 -1 600 1; | |
| 160 #X obj 249 -1484 / 127; | |
| 161 #X obj 248 -1332 / 127; | |
| 162 #X obj 248 -1460 * 600; | |
| 163 #X obj 247 -1281 + 10; | |
| 164 #X floatatom 248 -1439 5 0 0 0 - - -; | |
| 165 #X floatatom 246 -1258 5 0 0 0 - - -; | |
| 166 #X obj 626 -1536 hsl 128 15 0 127 0 0 empty empty empty -2 -8 0 10 | |
| 160 -262144 -1 -1 12700 1; | 167 -262144 -1 -1 12700 1; |
| 161 #X obj 250 -1480 / 127; | |
| 162 #X obj 248 -1388 / 127; | |
| 163 #X obj 254 -1449 * 600; | |
| 164 #X obj 247 -1337 + 10; | |
| 165 #X obj 438 -1461 * 40; | |
| 166 #X floatatom 330 -1465 5 0 0 0 - - -; | |
| 167 #X floatatom 297 -1302 5 0 0 0 - - -; | |
| 168 #X obj 626 -1536 hsl 128 15 0 127 0 0 empty empty empty -2 -8 0 10 | |
| 169 -262144 -1 -1 9700 1; | |
| 170 #X obj 623 -1513 / 127; | 168 #X obj 623 -1513 / 127; |
| 171 #N canvas 0 22 450 300 (subpatch) 0; | 169 #N canvas 0 22 450 300 (subpatch) 0; |
| 172 #X array \$0-array 100 float 0; | 170 #X array \$0-array 100 float 0; |
| 173 #X coords 0 1 99 0 100 100 1 0 0; | 171 #X coords 0 1 99 0 100 100 1 0 0; |
| 174 #X restore 178 -1619 graph; | 172 #X restore 185 -1703 graph; |
| 175 #X obj 77 -1552 metro 500; | 173 #X obj 84 -1636 metro 500; |
| 176 #X text 79 -1511 graph the output; | 174 #X text 86 -1595 graph the output; |
| 177 #X obj 77 -1577 loadbang; | 175 #X obj 84 -1661 loadbang; |
| 178 #X obj 61 -1528 tabwrite~ \$0-array; | 176 #X obj 68 -1612 tabwrite~ \$0-array; |
| 179 #X obj 145 -1575 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 | 177 #X obj 152 -1659 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 |
| 180 0 1; | 178 0 1; |
| 181 #X obj 495 -1556 vd~ a 10; | 179 #X obj 495 -1556 vd~ a 10; |
| 182 #X obj 495 -1402 *~ 100; | 180 #X obj 495 -1463 *~ 100; |
| 183 #X obj 622 -1451 + 1; | 181 #X obj 623 -1466 + 1; |
| 184 #X obj 623 -1480 * 200; | 182 #X obj 623 -1489 * 200; |
| 185 #X obj 495 -1534 clip~ 0.26 0.99; | 183 #X obj 417 -1450 lop~ 400; |
| 186 #X obj 332 -1372 * 3; | 184 #X obj 416 -1397 *~; |
| 187 #X floatatom 343 -1339 5 0 0 0 - - -; | 185 #X obj 417 -1420 bp~ 300 200; |
| 188 #X obj 415 -1393 lop~ 400; | 186 #X obj 495 -1441 +~ 200; |
| 189 #X obj 417 -1257 hip~ 40; | 187 #X obj 660 -1437 hsl 128 15 0 127 0 0 empty empty empty -2 -8 0 10 |
| 190 #X obj 558 -1328 hsl 128 15 0 127 0 0 empty empty empty -2 -8 0 10 | 188 -262144 -1 -1 3800 1; |
| 191 -262144 -1 -1 9300 1; | 189 #X obj 657 -1415 / 127; |
| 192 #X obj 556 -1305 / 127; | 190 #X obj 657 -1368 + 1; |
| 193 #X obj 554 -1280 * 100; | 191 #X obj 657 -1391 * 900; |
| 194 #X obj 553 -1255 + 5; | 192 #X obj 248 -1307 * 300; |
| 195 #X floatatom 575 -1230 5 0 0 0 - - -; | 193 #X obj 622 -1644 hsl 128 15 0 127 0 0 empty empty empty -2 -8 0 10 |
| 196 #X obj 416 -1336 *~; | 194 -262144 -1 -1 800 1; |
| 197 #X obj 417 -1359 bp~ 300 200; | 195 #X obj 619 -1621 / 127; |
| 198 #X obj 416 -1291 *~; | 196 #X obj 619 -1597 + 0.01; |
| 199 #X obj 495 -1380 +~ 200; | 197 #X text 681 -1328 Gain; |
| 200 #X obj 248 -1363 * 100; | 198 #X text 620 -1680 lop cut-off / effects variations in the windspeed |
| 199 ; | |
| 200 #X text 654 -1565 Gain into osc Higher value adds more LF; | |
| 201 #X text 450 -1268 Polar Wind; | |
| 202 #X text 246 -1387 BP Q value; | |
| 203 #X text 254 -1535 BP Centre Freq; | |
| 204 #X obj 416 -1352 *~ 1; | |
| 205 #X obj 609 -1253 * 80; | |
| 206 #X text 667 -1470 Input LP Freq cut-off Higher adds more HF; | |
| 207 #X floatatom 675 -1595 5 0 0 0 - - -; | |
| 208 #X obj 417 -1474 hip~ 40; | |
| 209 #X obj 495 -1534 clip~ 0.5 0.9; | |
| 210 #X obj 451 -1651 hsl 128 15 0 127 0 0 empty empty empty -2 -8 0 10 | |
| 211 -262144 -1 -1 2600 1; | |
| 212 #X obj 448 -1625 / 127; | |
| 213 #X obj 446 -1579 + 1; | |
| 214 #X floatatom 716 -1354 5 0 0 0 - - -; | |
| 215 #X floatatom 445 -1550 5 0 0 0 - - -; | |
| 216 #X obj 448 -1603 * 500; | |
| 217 #X text 465 -1680 HP Freq Cut-off; | |
| 201 #X connect 0 0 8 0; | 218 #X connect 0 0 8 0; |
| 202 #X connect 1 0 0 0; | 219 #X connect 1 0 0 0; |
| 203 #X connect 4 0 54 0; | 220 #X connect 4 0 71 0; |
| 204 #X connect 5 0 10 0; | 221 #X connect 5 0 9 0; |
| 205 #X connect 6 0 63 1; | 222 #X connect 7 0 67 0; |
| 206 #X connect 7 0 63 0; | 223 #X connect 8 0 68 0; |
| 207 #X connect 8 0 36 0; | 224 #X connect 9 0 46 0; |
| 208 #X connect 10 0 48 0; | 225 #X connect 9 0 50 1; |
| 209 #X connect 10 0 61 1; | 226 #X connect 10 0 2 0; |
| 210 #X connect 11 0 2 0; | 227 #X connect 10 1 3 0; |
| 211 #X connect 11 1 3 0; | 228 #X connect 11 0 14 0; |
| 212 #X connect 12 0 15 0; | 229 #X connect 12 0 13 0; |
| 213 #X connect 13 0 14 0; | 230 #X connect 15 0 12 1; |
| 214 #X connect 13 0 45 0; | 231 #X connect 16 0 12 2; |
| 215 #X connect 16 0 13 1; | 232 #X connect 17 0 12 0; |
| 216 #X connect 17 0 13 2; | 233 #X connect 19 0 22 0; |
| 217 #X connect 18 0 13 0; | 234 #X connect 20 0 21 0; |
| 218 #X connect 20 0 23 0; | 235 #X connect 21 0 18 1; |
| 219 #X connect 21 0 22 0; | 236 #X connect 21 0 25 0; |
| 220 #X connect 22 0 19 1; | 237 #X connect 22 0 18 0; |
| 221 #X connect 22 0 26 0; | 238 #X connect 22 0 23 0; |
| 222 #X connect 23 0 19 0; | |
| 223 #X connect 23 0 24 0; | 239 #X connect 23 0 24 0; |
| 224 #X connect 24 0 25 0; | 240 #X connect 25 0 26 0; |
| 225 #X connect 26 0 27 0; | 241 #X connect 27 0 28 0; |
| 226 #X connect 28 0 29 0; | 242 #X connect 28 0 21 1; |
| 227 #X connect 29 0 22 1; | 243 #X connect 28 0 22 1; |
| 228 #X connect 29 0 23 1; | 244 #X connect 29 0 31 0; |
| 229 #X connect 30 0 32 0; | 245 #X connect 30 0 32 0; |
| 230 #X connect 31 0 33 0; | 246 #X connect 31 0 33 0; |
| 231 #X connect 32 0 34 0; | 247 #X connect 32 0 57 0; |
| 232 #X connect 33 0 65 0; | 248 #X connect 33 0 35 0; |
| 233 #X connect 34 0 37 0; | 249 #X connect 34 0 36 0; |
| 234 #X connect 34 0 52 0; | 250 #X connect 34 0 51 2; |
| 235 #X connect 35 0 38 0; | 251 #X connect 35 0 51 1; |
| 236 #X connect 36 0 7 1; | 252 #X connect 37 0 38 0; |
| 237 #X connect 37 0 62 1; | 253 #X connect 38 0 48 0; |
| 238 #X connect 38 0 62 2; | 254 #X connect 40 0 43 0; |
| 239 #X connect 39 0 40 0; | 255 #X connect 42 0 40 0; |
| 240 #X connect 40 0 50 0; | 256 #X connect 42 0 40 0; |
| 241 #X connect 42 0 45 0; | 257 #X connect 44 0 40 0; |
| 242 #X connect 44 0 42 0; | 258 #X connect 45 0 72 0; |
| 243 #X connect 44 0 42 0; | 259 #X connect 46 0 52 0; |
| 244 #X connect 46 0 42 0; | 260 #X connect 47 0 46 1; |
| 245 #X connect 47 0 51 0; | 261 #X connect 48 0 47 0; |
| 246 #X connect 48 0 64 0; | 262 #X connect 49 0 51 0; |
| 247 #X connect 49 0 48 1; | 263 #X connect 50 0 7 0; |
| 248 #X connect 50 0 49 0; | 264 #X connect 51 0 50 0; |
| 249 #X connect 51 0 5 0; | 265 #X connect 52 0 6 0; |
| 250 #X connect 52 0 53 0; | 266 #X connect 53 0 54 0; |
| 251 #X connect 53 0 54 1; | 267 #X connect 54 0 56 0; |
| 252 #X connect 54 0 62 0; | 268 #X connect 55 0 49 1; |
| 253 #X connect 55 0 11 0; | 269 #X connect 55 0 76 0; |
| 254 #X connect 56 0 57 0; | 270 #X connect 56 0 55 0; |
| 255 #X connect 57 0 58 0; | 271 #X connect 57 0 34 0; |
| 256 #X connect 58 0 59 0; | 272 #X connect 58 0 59 0; |
| 257 #X connect 59 0 55 1; | |
| 258 #X connect 59 0 60 0; | 273 #X connect 59 0 60 0; |
| 259 #X connect 61 0 7 0; | 274 #X connect 60 0 9 1; |
| 260 #X connect 62 0 61 0; | 275 #X connect 60 0 70 0; |
| 261 #X connect 63 0 55 0; | 276 #X connect 67 0 10 0; |
| 262 #X connect 64 0 6 0; | 277 #X connect 68 0 7 1; |
| 263 #X connect 65 0 35 0; | 278 #X connect 71 0 49 0; |
| 279 #X connect 72 0 5 0; | |
| 280 #X connect 72 0 43 0; | |
| 281 #X connect 73 0 74 0; | |
| 282 #X connect 74 0 78 0; | |
| 283 #X connect 75 0 77 0; | |
| 284 #X connect 77 0 71 1; | |
| 285 #X connect 78 0 75 0; |