-
Notifications
You must be signed in to change notification settings - Fork 0
/
harp~.pd
executable file
·153 lines (153 loc) · 3.29 KB
/
harp~.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
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
#N canvas 833 87 504 725 10;
#X msg 82 159 1000 \$1;
#X obj 82 180 /;
#X obj 82 313 vline~;
#X obj 132 341 noise~;
#X obj 82 355 *~;
#X obj 128 556 delwrite~ \$0-del 100;
#X obj 172 454 delread~ \$0-del;
#X msg 12 362 clear;
#X obj 82 686 outlet~;
#X obj 82 396 lop~;
#X obj 82 419 hip~;
#X msg 192 236 0 \, 1 \$1;
#X obj 192 257 vline~;
#X obj 192 320 cos~;
#X obj 82 201 t f f;
#X obj 82 243 pack f f;
#X msg 82 292 1 \$1 \, 0 \$2 \$1;
#X obj 120 405 / 2;
#X obj 201 67 > 0;
#X obj 82 117 pipe 2;
#X obj 272 520 sel 1;
#X obj 302 541 del 2;
#X msg 302 562 1 0;
#X msg 272 562 0 1;
#X obj 272 583 line~;
#X obj 82 440 lop~;
#X obj 82 222 * 8;
#X obj 346 541 env~;
#X obj 346 562 change;
#X obj 346 583 sel 0;
#X msg 346 604 0;
#X msg 376 604 1;
#X obj 346 625 switch~ 1 1 1;
#X obj 82 501 biquad~ 0 0 0.5 0.5 0;
#X obj 192 341 *~ 0.1;
#X obj 192 299 -~ 0.25;
#X obj 298 442 f \$1;
#X msg 132 320 seed \$1;
#X obj 120 375 * 3;
#X obj 288 115 sel 0;
#X obj 288 136 - 1;
#X obj 288 157 / 126;
#X msg 288 178 1 \$1;
#X obj 288 199 -;
#X obj 288 241 + 100;
#X obj 288 262 dbtorms;
#X obj 288 283 pipe 2;
#X obj 82 376 *~;
#X obj 361 288 pipe 2;
#X msg 361 225 2 \$1;
#X obj 361 246 pow;
#X obj 172 475 *~ 0.995;
#X obj 288 220 * 0;
#X obj 82 461 lop~ 3000;
#X obj 128 530 hip~ 4;
#X obj 361 204 * 2.5;
#X obj 361 267 / 1.5;
#X obj 127 222 * 2;
#X obj 192 215 * 10;
#X obj 192 278 *~ 10;
#X obj 82 334 pow~ 2;
#X obj 82 522 *~;
#X obj 196 25 inlet;
#X obj 76 33 inlet;
#X obj 196 46 t f f;
#X obj 76 54 list prepend;
#X obj 76 75 route 1;
#X connect 0 0 1 0;
#X connect 1 0 6 0;
#X connect 1 0 14 0;
#X connect 2 0 60 0;
#X connect 3 0 4 1;
#X connect 4 0 47 0;
#X connect 6 0 51 0;
#X connect 7 0 5 0;
#X connect 7 0 9 0;
#X connect 7 0 10 0;
#X connect 7 0 25 0;
#X connect 7 0 33 0;
#X connect 7 0 53 0;
#X connect 7 0 54 0;
#X connect 9 0 10 0;
#X connect 10 0 25 0;
#X connect 11 0 12 0;
#X connect 12 0 59 0;
#X connect 13 0 34 0;
#X connect 14 0 26 0;
#X connect 14 1 57 0;
#X connect 14 1 58 0;
#X connect 15 0 16 0;
#X connect 16 0 2 0;
#X connect 17 0 10 1;
#X connect 18 0 20 0;
#X connect 18 0 65 1;
#X connect 19 0 0 0;
#X connect 19 0 38 0;
#X connect 19 0 17 0;
#X connect 20 0 21 0;
#X connect 20 0 23 0;
#X connect 21 0 22 0;
#X connect 21 0 7 0;
#X connect 21 0 31 0;
#X connect 21 0 36 0;
#X connect 22 0 24 0;
#X connect 23 0 24 0;
#X connect 24 0 61 1;
#X connect 25 0 53 0;
#X connect 26 0 15 0;
#X connect 27 0 28 0;
#X connect 28 0 29 0;
#X connect 29 0 30 0;
#X connect 30 0 32 0;
#X connect 31 0 32 0;
#X connect 33 0 54 0;
#X connect 33 0 27 0;
#X connect 33 0 61 0;
#X connect 34 0 4 1;
#X connect 35 0 13 0;
#X connect 36 0 37 0;
#X connect 37 0 3 0;
#X connect 38 0 9 1;
#X connect 38 0 25 1;
#X connect 39 1 40 0;
#X connect 40 0 41 0;
#X connect 41 0 42 0;
#X connect 41 0 55 0;
#X connect 42 0 43 0;
#X connect 43 0 52 0;
#X connect 44 0 45 0;
#X connect 45 0 46 0;
#X connect 46 0 47 1;
#X connect 47 0 9 0;
#X connect 48 0 38 1;
#X connect 49 0 50 0;
#X connect 50 0 56 0;
#X connect 51 0 33 0;
#X connect 52 0 44 0;
#X connect 53 0 33 0;
#X connect 54 0 5 0;
#X connect 55 0 49 0;
#X connect 56 0 48 0;
#X connect 57 0 15 1;
#X connect 58 0 11 0;
#X connect 59 0 35 0;
#X connect 60 0 4 0;
#X connect 61 0 8 0;
#X connect 62 0 64 0;
#X connect 63 0 65 0;
#X connect 64 0 18 0;
#X connect 64 1 39 0;
#X connect 65 0 66 0;
#X connect 66 0 19 0;