forked from enzienaudio/heavylib
-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathhv.osc-help.pd
115 lines (115 loc) · 3.23 KB
/
hv.osc-help.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
#N canvas 152 23 1189 640 10;
#X floatatom 31 316 5 0 0 0 - - -, f 5;
#X obj 31 345 sig~;
#X text 65 316 Hz;
#X text 64 346 (frequency input needs to be at signal rate);
#X text 25 56 The output can get a bit noisy at upper frequencies \,
but reduces effects of aliasing when using a phasor~ and doesn't require
wavetables.;
#X obj 302 395 phasor~;
#X obj 302 417 *~ 2;
#X obj 302 439 -~ 1;
#X obj 52 428 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 323 471 == 0;
#X text 70 427 compare to (centred) phasor output;
#X text 26 29 Polynomial band-limited step (Polystep) oscillators.
;
#X obj 302 493 *~ 0;
#X obj 31 508 *~ 1;
#X text 28 114 References:;
#X text 59 140 https://github.com/cfloisand/pd-polyblep/blob/master/Source/polyblep~.c
;
#X text 59 180 http://musicdsp.org/files/bandlimited.pdf;
#X text 59 210 http://www.martin-finke.de/blog/articles/audio-plugins-018-polyblep-oscillator/
;
#X text 25 276 Sawtooth;
#X text 25 286 --------------------------------------------------------
;
#X floatatom 413 316 5 0 0 0 - - -, f 5;
#X obj 413 345 sig~;
#X text 447 316 Hz;
#X obj 434 428 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj 675 471 == 0;
#X obj 654 493 *~ 0;
#X obj 413 508 *~ 1;
#X text 407 286 --------------------------------------------------------
;
#X text 407 276 Square;
#X text 452 426 compare to a dirty square;
#X obj 491 336 hsl 128 15 0 1 0 0 empty empty empty -2 -8 0 10 -262144
-1 -1 1200 1;
#X text 629 335 Pulse-width control (0..1);
#X floatatom 122 316 5 0 0 0 - - -, f 5;
#X text 162 314 phase reset;
#X obj 445 539 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
1;
#X obj 60 548 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X msg 488 311 0.5;
#X text 520 311 50% will be equal width;
#X obj 654 389 osc~;
#X obj 654 417 *~ 10000;
#X obj 654 439 clip~ -1 1;
#X obj 689 180 *~ 0.01;
#X obj 689 202 dac~;
#X obj 717 91 loadbang;
#X obj 717 113 metro 80;
#N canvas 0 22 450 278 (subpatch) 0;
#X array \$0-array1 1000 float 0;
#X coords 0 1 999 -1 300 200 1 0 0;
#X restore 857 52 graph;
#X obj 718 144 tabwrite~ \$0-array1;
#X obj 778 90 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
1;
#X obj 31 547 *~;
#X obj 413 537 *~;
#X obj 31 579 throw~ \$0-mix;
#X obj 409 577 throw~ \$0-mix;
#X obj 689 58 catch~ \$0-mix;
#X obj 499 60 hv.osc sine;
#X obj 499 90 hv.osc saw;
#X obj 499 120 hv.osc square;
#X obj 413 390 hv.osc square;
#X obj 31 400 hv.osc saw;
#X connect 0 0 1 0;
#X connect 1 0 5 0;
#X connect 1 0 57 0;
#X connect 5 0 6 0;
#X connect 6 0 7 0;
#X connect 7 0 12 0;
#X connect 8 0 9 0;
#X connect 8 0 13 1;
#X connect 9 0 12 1;
#X connect 12 0 48 0;
#X connect 13 0 48 0;
#X connect 20 0 21 0;
#X connect 20 0 1 0;
#X connect 21 0 38 0;
#X connect 21 0 56 0;
#X connect 23 0 24 0;
#X connect 23 0 26 1;
#X connect 24 0 25 1;
#X connect 25 0 49 0;
#X connect 26 0 49 0;
#X connect 30 0 56 1;
#X connect 32 0 5 1;
#X connect 32 0 57 1;
#X connect 34 0 49 1;
#X connect 35 0 48 1;
#X connect 36 0 30 0;
#X connect 38 0 39 0;
#X connect 39 0 40 0;
#X connect 40 0 25 0;
#X connect 41 0 42 0;
#X connect 41 0 42 1;
#X connect 43 0 44 0;
#X connect 44 0 46 0;
#X connect 47 0 44 0;
#X connect 48 0 50 0;
#X connect 49 0 51 0;
#X connect 52 0 41 0;
#X connect 52 0 46 0;
#X connect 56 0 26 0;
#X connect 57 0 13 0;