yin-yang.pd 2.86 KB
Newer Older
1
#N struct yin-yang float x float y float yin float yang;
Ivica Bukvic's avatar
Ivica Bukvic committed
2
#N canvas 383 44 660 636 10;
3
4
5
6
7
8
9
#X obj 383 468 pointer;
#X msg 406 439 next;
#X obj 291 415 t a a;
#X obj 318 439 - 255;
#X obj 318 463 abs;
#X obj 291 341 random 256;
#X obj 290 294 tgl 15 0 empty empty empty 17 7 0 10 -4034 -1 -1 0 1
10
;
11
12
13
14
15
16
17
18
19
20
#X floatatom 347 290 5 0 0 0 - - -, f 5;
#X obj 291 383 line;
#X msg 256 455 0;
#X obj 74 376 cos~;
#X obj 89 458 osc~ 440;
#X obj 74 407 *~ -0.5;
#X obj 74 428 +~ 0.5;
#X obj 74 489 *~;
#X obj 150 411 snapshot~;
#X obj 150 294 tgl 15 0 empty empty empty 17 7 0 10 -4034 -1 -1 0 1
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
#X obj 150 315 metro 150;
#X floatatom 201 290 5 0 0 0 - - -, f 5;
#X msg 291 362 \$1 2674;
#X obj 290 315 metro 2674;
#X obj 150 433 t a a;
#X obj 151 508 pack;
#X obj 74 510 output~;
#X obj 382 384 loadbang;
#X obj 71 16 struct yin-yang float x float y float yin float yang;
#X obj 291 503 set yin-yang yin yang;
#X msg 89 313 dsp \$1;
#X obj 89 334 s pd;
#X obj 194 508 loadbang;
#X msg 194 529 0 0;
#X obj 150 460 * 180;
#X obj 74 353 phasor~ 0.3;
#N canvas 639 282 450 300 (subpatch) 0;
#X obj 78 -41 draw circle 233 233 231;
#X obj 78 33 draw path M 233 459 a 226 226 0 0 1 0 -452 a 113 113 0
0 1 0 226 z;
#X obj 78 116 draw circle 233 346 113;
#X obj 368 114 draw circle 233 120 30;
#X obj 318 -41 draw circle 233 346 30;
#X msg 78 10 fill yang yang yang \, stroke yang yang yang;
#X msg 78 94 fill yin yin yin \, stroke-opacity 0;
#X msg 318 -64 fill yang yang yang \, stroke-opacity 0;
#X msg 368 94 fill yin yin yin \, stroke-opacity 0;
#X msg 78 -64 fill yin yin yin \, stroke-opacity 0;
#X obj 78 -84 loadbang;
#X obj 78 -14 loadbang;
#X obj 318 -84 loadbang;
#X obj 78 67 loadbang;
#X obj 368 67 loadbang;
#X connect 5 0 1 0;
#X connect 6 0 2 0;
#X connect 7 0 4 0;
#X connect 8 0 3 0;
#X connect 9 0 0 0;
#X connect 10 0 9 0;
#X connect 11 0 5 0;
#X connect 12 0 7 0;
#X connect 13 0 6 0;
#X connect 14 0 8 0;
65
#X restore 151 581 draw group;
66
67
#X scalar yin-yang 114 127 188.603 66.3972 \;;
#X scalar yin-yang 315 136 0 255 \;;
68
#X msg 383 412 traverse pd-yin-yang.pd \, next;
69
70
71
#X obj 194 460 * 45;
#X msg 151 560 transform scale 0.3 skewx \$2 skewy \$2 rotate \$1 233
233;
72
#X connect 0 0 26 2;
73
#X connect 1 0 0 0;
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
#X connect 2 0 26 0;
#X connect 2 1 3 0;
#X connect 3 0 4 0;
#X connect 4 0 26 1;
#X connect 5 0 19 0;
#X connect 6 0 20 0;
#X connect 7 0 20 1;
#X connect 8 0 2 0;
#X connect 9 0 26 0;
#X connect 10 0 12 0;
#X connect 10 0 15 0;
#X connect 11 0 14 1;
#X connect 12 0 13 0;
#X connect 13 0 14 0;
#X connect 14 0 23 0;
#X connect 15 0 21 0;
#X connect 16 0 17 0;
#X connect 16 0 27 0;
#X connect 17 0 15 0;
#X connect 18 0 17 1;
#X connect 19 0 8 0;
#X connect 20 0 5 0;
96
97
98
99
#X connect 21 0 31 0;
#X connect 21 1 37 0;
#X connect 22 0 38 0;
#X connect 24 0 36 0;
100
#X connect 27 0 28 0;
101
102
103
104
105
106
107
#X connect 29 0 30 0;
#X connect 30 0 38 0;
#X connect 31 0 22 0;
#X connect 32 0 10 0;
#X connect 36 0 0 0;
#X connect 37 0 22 1;
#X connect 38 0 33 0;