aboutsummaryrefslogtreecommitdiff
path: root/gogins_pan~.pd
blob: aba674ff669fd2a48476d35eb36f31190a678c7a (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
#N canvas 0 31 522 586 10;
#X obj 23 38 inlet~;
#X obj 139 47 inlet;
#X obj 23 482 outlet~;
#X obj 81 482 outlet~;
#X text 30 502 left;
#X text 84 502 right;
#X text 130 528 (C) Copyright 2004 Hans-Christoph Steiner;
#X text 234 544 released under the GNU GPL;
#X obj 23 443 pan_core~;
#X obj 107 27 loadbang;
#X msg 107 47 0.5;
#X obj 209 132 pi;
#X obj 337 171 / 2;
#X text 10 17 [gogins_pan~];
#X obj 368 93 loadbang;
#X obj 369 313 expr sqrt(2)/2;
#X obj 209 152 trigger float float;
#X obj 106 387 *;
#X obj 208 388 *;
#X obj 140 190 *;
#X obj 140 211 -;
#X obj 140 238 trigger float float;
#X obj 140 263 cos;
#X obj 268 262 sin;
#X text 101 456 the algorithm comes from Michael Gogins on the Csound
list;
#X obj 207 326 +;
#X obj 107 324 -;
#X obj 139 74 clip 0 1;
#X connect 0 0 8 0;
#X connect 1 0 27 0;
#X connect 8 0 2 0;
#X connect 8 1 3 0;
#X connect 9 0 10 0;
#X connect 10 0 27 0;
#X connect 11 0 16 0;
#X connect 12 0 20 1;
#X connect 14 0 11 0;
#X connect 14 0 15 0;
#X connect 15 0 18 1;
#X connect 15 0 17 1;
#X connect 16 0 19 1;
#X connect 16 1 12 0;
#X connect 17 0 8 1;
#X connect 18 0 8 2;
#X connect 19 0 20 0;
#X connect 20 0 21 0;
#X connect 21 0 22 0;
#X connect 21 1 23 0;
#X connect 22 0 25 0;
#X connect 22 0 26 0;
#X connect 23 0 25 1;
#X connect 23 0 26 1;
#X connect 25 0 18 0;
#X connect 26 0 17 0;
#X connect 27 0 19 0;