Designing Sound - Procedural Audio for Games and Film.

Code examples for “Designing Sound” textbook

Practical 33: Transport

Pure Data

Transporter - "beam me up" TOS transporter

#N canvas 43 123 529 671 10;
#X obj 409 70 *;
#X obj 409 90 *;
#X obj 409 110 *;
#X obj 409 130 *;
#X msg 409 29 466.164;
#X obj 409 150 *;
#X obj 409 170 *;
#X obj 409 190 *;
#X obj 409 210 *;
#X obj 264 299 hip~ 100;
#X obj 367 600 dac~;
#X obj 409 230 *;
#X obj 409 250 *;
#X obj 409 269 *;
#X obj 229 -4 sig~ 1;
#X obj 262 41 -~;
#X msg 470 28 1.12247;
#X obj 317 361 bp~ 1 620;
#X obj 318 383 bp~ 1 640;
#X obj 317 403 bp~ 1 680;
#X obj 318 423 bp~ 1 720;
#X obj 318 444 bp~ 1 760;
#X obj 317 465 bp~ 1 800;
#X obj 237 465 bp~ 1 840;
#X obj 236 442 bp~ 1 880;
#X obj 236 417 bp~ 1 910;
#X obj 236 394 bp~ 1 930;
#X obj 235 371 bp~ 1 1100;
#X obj 235 346 bp~ 1 1200;
#X obj 272 534 rev3~ 100 95 5000 1;
#X obj 278 -6 vline~;
#X obj 193 165 vd~ x;
#X obj 235 164 vd~ x;
#X obj 281 164 vd~ x;
#X obj 235 194 *~ 0.3;
#X obj 74 277 delwrite~ x 120;
#X obj 124 241 r~ fb;
#X obj 208 276 s~ fb;
#X obj 209 251 *~ 0.7;
#X obj 440 -21 loadbang;
#X obj 272 508 *~ 12;
#X obj 264 275 *~;
#X obj 262 62 *~ 12;
#X obj 440 -1 t b b;
#X obj 90 17 wrap~;
#X obj 74 -10 -~ 0.5;
#X obj 90 38 -~ 0.5;
#X obj 74 60 -~;
#X obj 106 177 wrap~;
#X obj 90 149 -~ 0.5;
#X obj 106 198 -~ 0.5;
#X obj 90 222 -~;
#X obj 74 248 *~;
#X obj 90 127 phasor~;
#X obj 74 -33 phasor~ 467.1;
#X obj 90 107 +~ 277;
#X obj 262 84 +~ 1;
#X obj 343 49 *~ -1;
#X obj 343 89 min~;
#X obj 343 69 +~ 1;
#X obj 343 109 *~ 4;
#X msg 278 -28 0 \, 1 12000 0;
#X obj 90 87 *~ 6500;
#X obj 262 107 +~ 12;
#X obj 281 139 +~ 12;
#X obj 5 -24 bng 25 250 50 0 beam_me_up empty transport 0 -6 0 8 -262144
-1 -1;
#X obj 278 -49 r beam_me_up;
#X obj 406 441 r beam_me_up;
#X obj 316 508 *~ 0.1;
#X obj 407 566 *~ 0.5;
#N canvas 0 0 349 464 activate 0;
#X obj 100 217 +~;
#X obj 84 270 *~;
#X obj 5 166 lop~ 30;
#X obj 100 244 phasor~;
#X obj 144 335 clip~ -1 1;
#X obj 168 136 osc~ 30;
#X obj 224 371 bp~ 2325 13;
#X obj 144 372 bp~ 1550 13;
#X obj 71 372 bp~ 775 13;
#X obj 168 166 *~ 40;
#X obj 115 135 noise~;
#X obj 115 166 *~ 0.1;
#X obj 115 195 +~;
#X obj 60 95 sig~ 1;
#X obj 59 119 -~;
#X obj 59 167 +~ 775;
#X obj 60 142 *~ 120;
#X obj 144 311 *~ 3;
#X msg 44 50 1 10 0 \, 0 5000 10;
#X obj 212 277 *~;
#X msg 228 231 1 0 0 \, 0 120 10;
#X obj 44 29 t b b;
#X obj 228 252 vline~;
#X obj 44 71 vline~;
#X obj 144 442 outlet~;
#X obj 44 7 inlet;
#X obj 144 412 *~ 0.5;
#X connect 0 0 3 0;
#X connect 1 0 17 0;
#X connect 2 0 1 0;
#X connect 3 0 1 1;
#X connect 4 0 6 0;
#X connect 4 0 7 0;
#X connect 4 0 8 0;
#X connect 5 0 9 0;
#X connect 6 0 26 0;
#X connect 7 0 26 0;
#X connect 8 0 26 0;
#X connect 9 0 12 1;
#X connect 10 0 11 0;
#X connect 10 0 19 0;
#X connect 11 0 12 0;
#X connect 12 0 0 1;
#X connect 13 0 14 0;
#X connect 14 0 16 0;
#X connect 15 0 0 0;
#X connect 16 0 15 0;
#X connect 17 0 4 0;
#X connect 18 0 23 0;
#X connect 19 0 17 0;
#X connect 20 0 22 0;
#X connect 21 0 18 0;
#X connect 21 1 20 0;
#X connect 22 0 19 1;
#X connect 23 0 2 0;
#X connect 23 0 14 1;
#X connect 25 0 21 0;
#X connect 26 0 24 0;
#X restore 406 462 pd activate;
#X connect 0 0 1 0;
#X connect 0 0 27 1;
#X connect 1 0 2 0;
#X connect 1 0 26 1;
#X connect 2 0 3 0;
#X connect 2 0 25 1;
#X connect 3 0 5 0;
#X connect 3 0 24 1;
#X connect 4 0 0 0;
#X connect 4 0 28 1;
#X connect 5 0 6 0;
#X connect 5 0 23 1;
#X connect 6 0 7 0;
#X connect 6 0 22 1;
#X connect 7 0 8 0;
#X connect 7 0 21 1;
#X connect 8 0 11 0;
#X connect 8 0 20 1;
#X connect 9 0 17 0;
#X connect 9 0 18 0;
#X connect 9 0 19 0;
#X connect 9 0 20 0;
#X connect 9 0 21 0;
#X connect 9 0 22 0;
#X connect 9 0 23 0;
#X connect 9 0 24 0;
#X connect 9 0 25 0;
#X connect 9 0 26 0;
#X connect 9 0 27 0;
#X connect 9 0 28 0;
#X connect 11 0 12 0;
#X connect 11 0 19 1;
#X connect 12 0 13 0;
#X connect 12 0 18 1;
#X connect 13 0 17 1;
#X connect 14 0 15 0;
#X connect 15 0 42 0;
#X connect 16 0 0 1;
#X connect 16 0 1 1;
#X connect 16 0 2 1;
#X connect 16 0 3 1;
#X connect 16 0 5 1;
#X connect 16 0 6 1;
#X connect 16 0 7 1;
#X connect 16 0 8 1;
#X connect 16 0 11 1;
#X connect 16 0 12 1;
#X connect 16 0 13 1;
#X connect 17 0 40 0;
#X connect 18 0 40 0;
#X connect 19 0 40 0;
#X connect 20 0 40 0;
#X connect 21 0 40 0;
#X connect 22 0 40 0;
#X connect 23 0 40 0;
#X connect 24 0 40 0;
#X connect 25 0 40 0;
#X connect 26 0 40 0;
#X connect 27 0 40 0;
#X connect 28 0 40 0;
#X connect 29 0 10 0;
#X connect 29 1 10 1;
#X connect 30 0 15 1;
#X connect 30 0 57 0;
#X connect 30 0 58 1;
#X connect 31 0 34 0;
#X connect 32 0 34 0;
#X connect 33 0 34 0;
#X connect 34 0 38 0;
#X connect 34 0 41 0;
#X connect 36 0 35 0;
#X connect 38 0 37 0;
#X connect 39 0 43 0;
#X connect 40 0 29 0;
#X connect 41 0 9 0;
#X connect 42 0 56 0;
#X connect 43 0 4 0;
#X connect 43 1 16 0;
#X connect 44 0 46 0;
#X connect 45 0 44 0;
#X connect 45 0 47 0;
#X connect 46 0 47 1;
#X connect 47 0 52 0;
#X connect 47 0 62 0;
#X connect 48 0 50 0;
#X connect 49 0 48 0;
#X connect 49 0 51 0;
#X connect 50 0 51 1;
#X connect 51 0 52 1;
#X connect 52 0 35 0;
#X connect 53 0 49 0;
#X connect 54 0 45 0;
#X connect 55 0 53 0;
#X connect 56 0 31 0;
#X connect 56 0 63 0;
#X connect 57 0 59 0;
#X connect 58 0 60 0;
#X connect 59 0 58 0;
#X connect 60 0 41 1;
#X connect 61 0 30 0;
#X connect 62 0 55 0;
#X connect 63 0 32 0;
#X connect 63 0 64 0;
#X connect 64 0 33 0;
#X connect 66 0 61 0;
#X connect 67 0 70 0;
#X connect 68 0 29 0;
#X connect 69 0 10 1;
#X connect 69 0 10 0;
#X connect 70 0 68 0;
#X connect 70 0 69 0;

Download transporter_TOS.pd.

Audio

Star Trek beam-up effect

Beam up transporter effect like in the original series

Download transporter_TOS.wav.