iemhelp/help-sin_phase~.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

#N canvas 375 118 484 456 10;

#X text 12 402 (c) musil@iem.kug.ac.at;

#X text 54 415 IEM KUG;

#X text 28 48 dsp ON/OFF;

#X floatatom 155 63 3 15 133 0 - - -;

#X obj 155 81 mtof;

#X floatatom 155 102 9 0 22000 0 - - -;

#X text 214 101 Hz;

#X floatatom 294 158 6 -360 360 0 - - -;

#X floatatom 11 88 5 0 0 0 - - -;

#X text 46 87 % cpu;

#X obj 11 68 dsp;

#X obj 11 48 tgl 15 0 empty empty empty 8 -8 0 10 -262144 -1 -1 1 1

;

#X text 10 7 sin_phase~;

#X text 105 8 calculate phase-difference between 2;

#X text 105 20 sine-waves \, in samples (signal-out);

#X obj 155 241 sin_phase~;

#X obj 209 216 cos~;

#X obj 154 220 cos~;

#X obj 154 198 +~ 0;

#X obj 155 122 phasor~ 440;

#X text 340 155 percent;

#X text 29 427 graz \, austria 2003;

#X text 180 61 midi-pitch;

#X text 295 140 phase-difference;

#X obj 156 264 lp1~ 10 100;

#X obj 157 286 unsig~;

#X floatatom 157 372 5 0 0 0 - - -;

#X obj 157 308 / 44100;

#X floatatom 92 326 5 0 0 0 - - -;

#X obj 157 330 * 10;

#X obj 157 350 * 360;

#X text 195 371 degree;

#X obj 61 268 unsig~;

#X floatatom 61 291 5 0 0 0 - - -;

#X obj 294 181 / 360;

#X obj 268 116 f;

#X connect 3 0 4 0;

#X connect 4 0 5 0;

#X connect 5 0 19 0;

#X connect 5 0 35 0;

#X connect 7 0 34 0;

#X connect 10 0 8 0;

#X connect 11 0 10 0;

#X connect 15 0 24 0;

#X connect 15 0 32 0;

#X connect 16 0 15 1;

#X connect 17 0 15 0;

#X connect 18 0 17 0;

#X connect 19 0 16 0;

#X connect 19 0 18 0;

#X connect 24 0 25 0;

#X connect 25 0 27 0;

#X connect 25 0 28 0;

#X connect 27 0 29 0;

#X connect 29 0 30 0;

#X connect 30 0 26 0;

#X connect 32 0 33 0;

#X connect 34 0 18 1;

#X connect 35 0 29 1;