blob: b9cafd74a678653eb7fcb7662fcfaa2851d2ae72 (
plain)
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
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
|
#N canvas 560 15 621 659 10;
#X obj 13 13 tgl 15 0 empty empty empty 0 -6 0 8 -241291 -1 -1 1 1
;
#X obj 181 29 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 30 128 t a a;
#X obj 17 250 shunt 2;
#X obj 64 251 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
;
#X obj 45 620 fps;
#X floatatom 71 621 5 0 0 0 - - -;
#X obj 17 269 t a b;
#X obj 7 368 fps;
#X floatatom 7 387 5 0 0 0 - - -;
#X obj 45 419 spigot;
#X obj 76 381 f;
#X obj 109 378 + 1;
#X obj 76 400 == 0;
#X obj 30 30 t b;
#X obj 174 9 loadbang;
#X obj 105 487 loadbang;
#X obj 461 449 loadbang;
#X obj 244 595 unpack 0 0;
#X obj 244 614 inv+ 64;
#X msg 308 595 0 \$1;
#X obj 480 494 t b l;
#X obj 244 633 << 12;
#X obj 17 186 t a a;
#N canvas 627 255 450 300 synth 0;
#X obj 17 16 inlet;
#X obj 17 102 s foo;
#X obj 20 125 tabreceive~ foo;
#X obj 20 259 outlet~;
#X obj 67 238 env~;
#X floatatom 67 257 5 0 0 0 - - -;
#X obj 99 27 loadbang;
#X obj 76 25 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 334 58 table foo 2048;
#X obj 21 144 rifft~;
#X obj 20 201 +~;
#X obj 21 163 expr~ tanh($v1*0.0001);
#X obj 20 182 lop~ 2000;
#X obj 339 24 block~ 2048;
#X obj 17 36 # * 2048;
#X obj 18 58 # /;
#X obj 86 49 #for 1 257 1;
#X obj 17 80 #export_list;
#X connect 0 0 14 0;
#X connect 2 0 9 0;
#X connect 4 0 5 0;
#X connect 6 0 16 0;
#X connect 7 0 16 0;
#X connect 9 0 11 0;
#X connect 10 0 4 0;
#X connect 10 0 3 0;
#X connect 11 0 12 0;
#X connect 12 0 10 0;
#X connect 14 0 15 0;
#X connect 15 0 17 0;
#X connect 16 0 15 1;
#X connect 17 0 1 0;
#X restore 136 437 pd synth;
#X obj 129 459 dac~;
#X text 498 6 1-D wave generator;
#X obj 174 47 #for -128 128 1;
#X obj 174 66 # abs-;
#X obj 174 85 # < 127;
#X obj 159 107 # * 1e+07;
#X obj 159 127 # * -1e+07;
#X obj 30 85 # min;
#X obj 30 104 # max;
#X obj 131 253 #redim (1);
#X obj 461 518 # + (0 6);
#X obj 65 272 #draw_polygon put (1 #);
#X obj 45 448 # >> 12;
#X obj 45 467 #redim (256);
#X obj 45 506 #outer <;
#X obj 105 506 #for 64 -64 -1;
#X obj 45 525 #transpose;
#X obj 45 544 #outer * (3 # 255);
#X obj 45 601 #out window;
#X obj 240 533 #mouse \, ...;
#X obj 244 576 #export_list;
#X obj 30 66 #store (1 256 1 # 0);
#X obj 17 147 # -;
#X obj 45 563 #fade (16 4 1);
#X obj 17 226 # -;
#X obj 109 397 % 2;
#X obj 30 11 metro 20;
#X msg 461 468 4 2 # 0 0 0 4 1 4 1 0;
#X obj 42 205 # >> 8;
#X text 54 186 damping;
#X text 249 147 wave equation;
#X text 88 419 framerate-divider;
#X obj 45 582 #scale_by 2;
#X obj 244 557 # / 2;
#X obj 55 148 #convolve (1 3 # 1 0 1) \, seed 1;
#X obj 37 321 #convolve (1 3 # 1 2 1);
#X obj 37 340 # >> 2;
#X text 180 321 smoothing;
#X text 224 120 cap at plus or minus ten million;
#X text 389 19 Copyright 2004 \, 2007 Mathieu Bouchard;
#X connect 0 0 51 0;
#X connect 1 0 27 0;
#X connect 2 0 47 1;
#X connect 2 1 59 0;
#X connect 3 0 7 0;
#X connect 3 1 36 0;
#X connect 4 0 3 1;
#X connect 5 0 6 0;
#X connect 7 0 46 1;
#X connect 7 0 60 0;
#X connect 7 1 8 0;
#X connect 7 1 11 0;
#X connect 8 0 9 0;
#X connect 10 0 37 0;
#X connect 11 0 12 0;
#X connect 11 0 13 0;
#X connect 12 0 50 0;
#X connect 13 0 10 1;
#X connect 14 0 46 0;
#X connect 15 0 27 0;
#X connect 16 0 40 0;
#X connect 17 0 52 0;
#X connect 18 0 19 0;
#X connect 18 1 20 0;
#X connect 19 0 22 0;
#X connect 20 0 21 0;
#X connect 21 0 52 0;
#X connect 21 1 35 1;
#X connect 22 0 34 0;
#X connect 23 0 49 0;
#X connect 23 1 53 0;
#X connect 24 0 25 0;
#X connect 24 0 25 1;
#X connect 27 0 28 0;
#X connect 28 0 29 0;
#X connect 29 0 30 0;
#X connect 29 0 31 0;
#X connect 30 0 32 1;
#X connect 31 0 33 1;
#X connect 32 0 33 0;
#X connect 33 0 2 0;
#X connect 34 0 36 1;
#X connect 35 0 36 2;
#X connect 36 0 7 0;
#X connect 37 0 38 0;
#X connect 38 0 24 0;
#X connect 38 0 39 0;
#X connect 39 0 41 0;
#X connect 40 0 39 1;
#X connect 41 0 42 0;
#X connect 42 0 48 0;
#X connect 43 0 5 0;
#X connect 43 0 44 0;
#X connect 44 0 58 0;
#X connect 44 1 58 0;
#X connect 44 4 4 0;
#X connect 45 0 18 0;
#X connect 46 0 32 0;
#X connect 47 0 23 0;
#X connect 48 0 57 0;
#X connect 49 0 3 0;
#X connect 50 0 11 1;
#X connect 51 0 14 0;
#X connect 52 0 35 0;
#X connect 53 0 49 1;
#X connect 57 0 43 0;
#X connect 58 0 45 0;
#X connect 59 0 47 0;
#X connect 60 0 61 0;
#X connect 61 0 10 0;
|
