blob: 416d86dd93f4c2d6db39420adae901a66367e905 (
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
|
#N canvas 47 54 883 486 10;
#X obj 71 32 cnv 15 15 15 empty empty vasp.*osc 0 10 1 14 -262144 -1
0;
#X obj 77 195 vasp.update;
#X obj 77 172 vasp.* 0.5;
#X obj 402 397 dac~;
#X obj 402 353 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X text 424 352 play;
#X text 71 63 multiplies a sine wave with a buffer content;
#X text 70 78 argument/right inlet: frequency in period length in samples
;
#N canvas 40 55 281 170 clear_buffer 0;
#X obj 54 79 vasp.update;
#X obj 54 56 vasp.= 0;
#X obj 54 26 inlet;
#X obj 54 108 bng 15 250 50 0 \$0-draw_display empty empty 0 -6 1152
8 -262144 -1 -1;
#X connect 0 0 3 0;
#X connect 1 0 0 0;
#X connect 2 0 1 0;
#X restore 534 397 pd clear_buffer;
#X msg 534 374 vasp bufmosc;
#X msg 77 127 vasp bufmosc;
#X text 181 126 generate white noise;
#X obj 77 149 vasp.noise;
#X obj 77 218 bng 15 250 50 0 \$0-draw_display empty empty 0 -6 1152
8 -262144 -1 -1;
#X obj 427 174 wavedisplay-simple bufmosc \$0;
#X obj 402 374 tabplay~ bufmosc;
#N canvas 92 108 339 264 init 0;
#X obj 110 180 s \$0-sample-length;
#X msg 177 126 resize \$1;
#X obj 177 79 loadbang;
#X msg 177 100 88200;
#X obj 177 148 s bufmosc;
#X connect 1 0 4 0;
#X connect 2 0 3 0;
#X connect 3 0 1 0;
#X connect 3 0 0 0;
#X restore 673 395 pd init;
#N canvas 4 20 454 304 Hz_to_period_length 0;
#X floatatom 136 242 0 0 0;
#X obj 136 142 t b f;
#X text 169 223 period length in samples (float);
#X floatatom 136 80 0 0 0;
#X obj 136 206 / 1;
#X text 181 79 frequency in Hz;
#X obj 53 142 samplerate~;
#X obj 53 119 loadbang;
#X floatatom 136 175 5 0 0;
#X connect 1 0 8 0;
#X connect 1 1 4 1;
#X connect 3 0 1 0;
#X connect 4 0 0 0;
#X connect 6 0 8 0;
#X connect 7 0 6 0;
#X connect 8 0 4 0;
#X restore 79 405 pd Hz_to_period_length;
#X text 188 379 ringmod-example;
#X obj 79 380 ringmod_example;
#X text 188 263 with 2Hz;
#X text 186 245 generate an amplitude modulation;
#X msg 78 245 vasp bufmosc;
#X obj 78 268 vasp.*osc 22050;
#X obj 78 292 vasp.update;
#X obj 78 315 bng 15 250 50 0 \$0-draw_display empty empty 0 -6 1152
8 -262144 -1 -1;
#X obj 60 460 VASP-HELP;
#X connect 1 0 13 0;
#X connect 2 0 1 0;
#X connect 4 0 15 0;
#X connect 9 0 8 0;
#X connect 10 0 12 0;
#X connect 12 0 2 0;
#X connect 15 0 3 0;
#X connect 15 0 3 1;
#X connect 22 0 23 0;
#X connect 23 0 24 0;
#X connect 24 0 25 0;
|
