ComputerMusicIntro/3-notes-compositions/18-distortion.pd at 9c42312cdea54ec9df8468c4bc8ba521639e6d56 · cpmpercussion/ComputerMusicIntro · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
#N canvas 174 231 1275 680 10;
#X obj 123 150 *~, f 2;
#X obj 51 219 *~;
#X obj 437 83 vsl 15 128 0 1 0 0 empty empty output 0 -9 0 10 -262144
-1 -1 635 1;
#X floatatom 460 203 5 0 0 0 - - -;
#X obj 369 265 dbtorms;
#X obj 366 83 vsl 15 128 -1 1 0 0 empty empty distortion 0 -9 0 10
-262144 -1 -1 11430 1;
#X floatatom 369 287 9 0 0 0 - - -;
#X floatatom 391 192 5 0 0 0 - - -;
#X obj 366 19 loadbang;
#X obj 156 180 clip~ -1 1;
#X obj 368 241 + 120;
#X text 232 178 distort stage;
#X text 231 150 gain;
#X obj 43 177 expr~ tanh($v1);
#X obj 366 218 * 30;
#X obj 369 308 s dist_lev;
#X obj 149 150 r dist_lev;
#X obj 436 222 s output_lev;
#X obj 83 220 r output_lev;
#X obj 51 299 dac~;
#X obj 72 118 readsf~ 2;
#X obj 70 53 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X msg 72 86 open ./fieldrecording-30s.wav \, 1;
#X obj 64 22 loadbang;
#X msg 367 37 0.8;
#X msg 436 36 0.05;
#X text 162 221 better turn it down;
#X connect 0 0 9 0;
#X connect 0 0 13 0;
#X connect 1 0 19 0;
#X connect 1 0 19 1;
#X connect 2 0 3 0;
#X connect 2 0 17 0;
#X connect 4 0 6 0;
#X connect 5 0 7 0;
#X connect 5 0 14 0;
#X connect 6 0 15 0;
#X connect 8 0 25 0;
#X connect 8 0 24 0;
#X connect 10 0 4 0;
#X connect 13 0 1 0;
#X connect 14 0 10 0;
#X connect 16 0 0 1;
#X connect 18 0 1 1;
#X connect 20 0 0 0;
#X connect 20 2 21 0;
#X connect 21 0 22 0;
#X connect 22 0 20 0;
#X connect 23 0 21 0;
#X connect 24 0 5 0;
#X connect 25 0 2 0;