blob: 56781928f9a150a1207d3a3cf58f596616b9ce2c (
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
|
#N canvas 8 252 972 385 10;
#N canvas 40 55 255 173 clear_buffer 0;
#X obj 59 79 vasp.update;
#X obj 59 56 vasp.= 0;
#X obj 59 26 inlet;
#X connect 1 0 0 0;
#X connect 2 0 1 0;
#X restore 755 285 pd clear_buffer;
#X text 452 193 shift all values - 0.5;
#X text 372 63 optional argument/right inlet: right operand;
#X text 372 46 subtracts a value or a vasp from a vasp;
#X obj 376 213 vasp.update;
#X obj 376 190 vasp.- 0.5;
#X obj 376 145 vasp.osc 44100;
#X obj 376 167 vasp.* 0.5;
#X text 45 63 optional argument/right inlet: right operand;
#X text 45 46 adds a value or a vasp to a vasp;
#X obj 45 20 cnv 15 15 15 empty empty vasp.+ 0 10 1 14 -262144 -1 0
;
#X obj 374 18 cnv 15 15 15 empty empty vasp.- 0 10 1 14 -262144 -1
0;
#N canvas 0 0 450 300 graph167 0;
#X array bufadd 88200 float 0;
#X coords 0 1 88199 -1 300 120 1;
#X restore 624 100 graph;
#X text 124 192 shift all values + 0.5;
#X text 127 169 half the amplitude;
#X obj 49 213 vasp.update;
#X obj 49 190 vasp.+ 0.5;
#X obj 49 145 vasp.osc 44100;
#X obj 49 167 vasp.* 0.5;
#X text 157 147 generate a 1Hz sine wave;
#X msg 49 113 vasp bufadd;
#X msg 376 113 vasp bufadd;
#X msg 755 264 vasp bufadd;
#N canvas 0 0 396 272 init 0;
#X obj 36 19 loadbang;
#X msg 36 73 \; \$1 xticks 0 4410 10 \; \$1 xlabel 1.1 0 22050 44100
66150 88200 \; \$1 yticks 0 0.25 2 \; \$1 ylabel 94000 -1 -0.5 0 0.5
1;
#X msg 36 45 symbol bufadd;
#X connect 0 0 2 0;
#X connect 2 0 1 0;
#X restore 879 285 pd init;
#X obj 49 345 VASP-HELP;
#X connect 5 0 4 0;
#X connect 6 0 7 0;
#X connect 7 0 5 0;
#X connect 16 0 15 0;
#X connect 17 0 18 0;
#X connect 18 0 16 0;
#X connect 20 0 17 0;
#X connect 21 0 6 0;
#X connect 22 0 0 0;
|
