blob: 740f9ea4b733639f61bee6892ecf6be265d263e0 (
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
|
#N canvas 77 150 893 542 10;
#X obj 75 32 cnv 15 15 15 empty empty phase-random_example 0 10 1 14
-262144 -1 0;
#N canvas 92 108 411 413 inside 0;
#X obj 66 154 soundfiler;
#X obj 84 238 s \$0-sample-length;
#X obj 66 208 s \$0-draw_display;
#X msg 214 206 resize \$1;
#X obj 214 159 loadbang;
#X obj 67 53 loadbang;
#X msg 214 180 88200;
#X obj 66 178 t b f f;
#X obj 67 101 filelisthandler \$0;
#X obj 214 228 s bufpol3;
#X msg 67 133 read -resize \$1 bufpol3;
#X msg 67 79 3;
#X obj 226 254 s bufpol4;
#X connect 0 0 7 0;
#X connect 3 0 9 0;
#X connect 3 0 12 0;
#X connect 4 0 6 0;
#X connect 5 0 11 0;
#X connect 6 0 3 0;
#X connect 6 0 1 0;
#X connect 7 0 2 0;
#X connect 7 1 1 0;
#X connect 7 2 3 0;
#X connect 8 0 10 0;
#X connect 10 0 0 0;
#X connect 11 0 8 0;
#X restore 781 472 pd inside;
#X obj 427 469 dac~;
#N canvas 0 0 413 295 clear_buffers 0;
#X obj 49 73 vasp.= 0;
#X obj 49 49 inlet;
#X obj 49 97 vasp.u;
#X obj 49 118 bng 15 250 50 0 \$0-draw_display empty empty 0 -6 1152
8 -262144 -1 -1;
#X connect 0 0 2 0;
#X connect 1 0 0 0;
#X connect 2 0 3 0;
#X restore 561 469 pd clear_buffers;
#X obj 427 426 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X text 449 423 play;
#X text 561 424 clear;
#X obj 495 192 wavedisplay-simple bufpol3 \$0;
#X obj 69 95 filelist \$0;
#X obj 427 446 tabplay~ bufpol3;
#X msg 68 188 vasp bufpol3 bufpol4;
#X obj 68 213 vasp.cfft;
#X obj 68 237 vasp.polar;
#X obj 68 261 vasp.split 2;
#X obj 101 284 vasp.noise;
#X obj 101 308 vasp.* 3.14159;
#X obj 68 336 vasp.join 2;
#X obj 68 359 vasp.rect;
#X obj 68 381 vasp.c!fft;
#X obj 68 405 vasp.update;
#X obj 68 428 bng 15 250 50 0 \$0-draw_display empty empty 0 -6 1152
8 -262144 -1 -1;
#X obj 720 449 table bufpol4 88200;
#X msg 561 446 vasp bufpol3 bufpol4;
#X text 157 213 complex fourier transformation;
#X text 158 236 cartesian to polar coordinate conversion;
#X text 158 258 split amplitude and phase;
#X text 202 280 random phase;
#X text 205 307 scale from 0 to 2*Pi;
#X text 156 335 polar to cartesian coordinate conversion;
#X obj 69 472 vasp.freeze;
#X text 152 472 is an abstraction that does the same;
#X connect 4 0 9 0;
#X connect 9 0 2 0;
#X connect 9 0 2 1;
#X connect 10 0 11 0;
#X connect 11 0 12 0;
#X connect 12 0 13 0;
#X connect 13 0 16 0;
#X connect 13 1 14 0;
#X connect 14 0 15 0;
#X connect 15 0 16 1;
#X connect 16 0 17 0;
#X connect 17 0 18 0;
#X connect 18 0 19 0;
#X connect 19 0 20 0;
#X connect 22 0 3 0;
|
