-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy paththump-hiss-plus.pd
131 lines (131 loc) · 3.61 KB
/
thump-hiss-plus.pd
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
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
#N canvas 0 46 1364 720 10;
#X obj 461 311 pil;
#X obj 539 348 print pd_out;
#X obj 624 125 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj 368 344 print pil_out;
#X msg 896 145 (pd-post ticks);
#X obj 430 429 route bd;
#X obj 590 416 route hh;
#X obj 475 500 print bd;
#X obj 644 489 print hh;
#X obj 627 530 hsl 128 15 0 1 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 6350 1;
#X obj 430 534 hsl 128 15 0 1 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 12700 1;
#X obj 785 525 delay 10;
#X msg 362 548 0;
#X msg 747 556 0;
#X obj 620 602 line~;
#X obj 445 608 line~;
#X obj 691 620 noise~;
#X obj 496 629 osc~ 100;
#X obj 452 691 *~;
#X obj 643 702 *~;
#X obj 802 620 vsl 15 128 0 1 0 0 empty empty empty 0 -9 0 10 -262144
-1 -1 0 1;
#X obj 592 774 +~;
#X obj 559 959 dac~;
#X obj 343 509 delay 50;
#X obj 235 462 hsl 128 15 0 127 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X obj 838 490 hsl 128 15 0 127 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X obj 654 415 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 499 430 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X obj 687 132 hsl 128 15 0 127 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 0 1;
#X msg 744 282 (gc);
#X obj 774 223 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 756 253 metro 50;
#X text 831 230 switch this on to test for audible effects of garbage
collection (gc) on timing;
#X text 643 96 switch metronome on/off \, set metronome speed;
#X text 238 438 thump length;
#X text 837 469 hiss length;
#X text 495 450 thump manual trigger;
#X text 680 419 hiss manual trigger;
#X text 446 549 thump volume;
#X text 642 547 hiss volume;
#X text 823 676 volume;
#X obj 655 46 netreceive 6000;
#X obj 544 840 *~ 0.5;
#X obj 318 324 loadbang;
#X msg 373 416 1;
#X obj 856 328 loadbang;
#X msg 860 436 0.5;
#X msg 509 77 (pd-message 'hh);
#X msg 7 231 (flam 10 1 '(() (pd-message 'hh)));
#X msg 19 194 (schedule '(() (pd-message 'hh)) 10);
#X msg 54 94 (pd-post schedule-queue);
#X obj 506 35 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X msg 610 190 (schedule-loop '(();
#X msg 199 40 load schedule.l;
#X obj 388 370 t f f;
#X obj 844 359 t f f;
#X msg 332 42 (hush);
#X obj 617 163 metro 150;
#X text 53 16 load this lisp file to make some noise;
#X text 336 11 bang (hush) to shut it up again;
#X text 24 72 inspect the schedule queue;
#X text 16 175 tinker with the guts of schedule.l;
#X msg 28 286 (do-pattern '(hh - hh - hh));
#X msg 26 262 (loop-pattern '(hh - hh hh));
#X connect 0 0 3 0;
#X connect 0 1 5 0;
#X connect 0 1 6 0;
#X connect 2 0 57 0;
#X connect 4 0 0 0;
#X connect 5 0 10 0;
#X connect 5 0 23 0;
#X connect 6 0 9 0;
#X connect 6 0 11 0;
#X connect 9 0 14 0;
#X connect 10 0 15 0;
#X connect 11 0 13 0;
#X connect 12 0 15 0;
#X connect 13 0 14 0;
#X connect 14 0 19 0;
#X connect 15 0 18 0;
#X connect 16 0 19 1;
#X connect 17 0 18 1;
#X connect 18 0 21 0;
#X connect 19 0 21 1;
#X connect 20 0 42 1;
#X connect 21 0 42 0;
#X connect 23 0 12 0;
#X connect 24 0 23 1;
#X connect 25 0 11 1;
#X connect 26 0 11 0;
#X connect 26 0 9 0;
#X connect 27 0 10 0;
#X connect 27 0 23 0;
#X connect 28 0 57 1;
#X connect 29 0 0 0;
#X connect 30 0 31 0;
#X connect 31 0 29 0;
#X connect 41 0 0 0;
#X connect 42 0 22 0;
#X connect 42 0 22 1;
#X connect 43 0 54 0;
#X connect 44 0 10 0;
#X connect 45 0 55 0;
#X connect 46 0 9 0;
#X connect 47 0 0 0;
#X connect 48 0 0 0;
#X connect 49 0 0 0;
#X connect 50 0 0 0;
#X connect 51 0 0 0;
#X connect 53 0 0 0;
#X connect 54 0 27 0;
#X connect 54 1 44 0;
#X connect 55 0 26 0;
#X connect 55 1 46 0;
#X connect 56 0 0 0;
#X connect 57 0 0 0;
#X connect 62 0 0 0;
#X connect 63 0 0 0;