forked from macumbista/vectorsynthesis
-
Notifications
You must be signed in to change notification settings - Fork 0
/
vs-octahedron.pd
109 lines (109 loc) · 2.95 KB
/
vs-octahedron.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
#N canvas 43 94 637 496 10;
#N canvas 563 47 518 727 tables 0;
#N canvas 0 22 450 278 (subpatch) 0;
#X array \$0-shapeX 24 float 3;
#A 0 1 0 -1 0 -1 0 0 0 -1 0 0 0 -1 0 1 0 0 0 0 0 1 0 1 0;
#X coords 0 1 24 -1 200 140 1 0 0;
#X restore 211 88 graph;
#N canvas 0 22 450 278 (subpatch) 0;
#X array \$0-shapeY 24 float 3;
#A 0 0 -1 0 1 0 0 -1 0 0 0 -1 0 0 -1 0 1 0 1 0 1 0 0 0 0;
#X coords 0 1 24 -1 200 140 1 0 0;
#X restore 211 248 graph;
#N canvas 0 22 450 278 (subpatch) 0;
#X array \$0-shapeZ 24 float 3;
#A 0 0 0 0 0 0 1 0 1 0 -1 0 -1 0 0 0 0 1 0 -1 0 0 1 0 -1;
#X coords 0 1 24 -1 200 140 1 0 0;
#X restore 211 408 graph;
#X obj 7 99 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 7 239 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 7 399 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X obj 7 122 f \$0;
#X obj 7 262 f \$0;
#X obj 7 422 f \$0;
#X msg 7 147 \; \$1-shapeX read 01.tables/octahedronX.txt;
#X msg 7 287 \; \$1-shapeY read 01.tables/octahedronY.txt;
#X msg 7 447 \; \$1-shapeZ read 01.tables/octahedronZ.txt;
#X connect 3 0 6 0;
#X connect 4 0 7 0;
#X connect 5 0 8 0;
#X connect 6 0 9 0;
#X connect 7 0 10 0;
#X connect 8 0 11 0;
#X restore 394 244 pd tables;
#X obj 36 457 outlet~ X;
#X obj 109 457 outlet~ Y;
#X obj 179 457 outlet~ Z;
#X obj 249 457 outlet~ brightness;
#X obj 36 77 inlet~ phasor;
#X obj 124 77 inlet~ scale;
#X obj 249 77 inlet~ brightness;
#N canvas 0 22 450 300 blanking 0;
#X obj 66 60 inlet~ brightness;
#X obj 186 60 inlet~ Hramp;
#X obj 66 200 outlet~ brightness;
#X obj 66 149 *~;
#X obj 81 109 expr~ ($v1>0.02)&($v1<0.98);
#X connect 0 0 3 0;
#X connect 1 0 4 0;
#X connect 3 0 2 0;
#X connect 4 0 3 1;
#X restore 249 336 pd blanking;
#X obj 35 388 *~;
#X obj 128 388 *~;
#X obj 198 387 *~;
#X obj 419 102 sig~;
#X obj 419 140 expr~ ($v1 * -1) + 1;
#X obj 35 348 *~;
#X obj 128 348 *~;
#X obj 198 347 *~;
#X obj 59 237 VS-tabreadlin~ \$0-shapeX;
#X obj 222 317 VS-tabreadlin~ \$0-shapeZ;
#X obj 59 349 *~;
#X obj 152 348 *~;
#X obj 222 347 *~;
#X obj 35 214 tabread~ \$0-shapeX;
#X obj 128 258 tabread~ \$0-shapeY;
#X obj 198 298 tabread~ \$0-shapeZ;
#X obj 152 279 VS-tabreadlin~ \$0-shapeY;
#X obj 419 76 inlet interpolation;
#X obj 36 185 *~ 24;
#X connect 5 0 8 1;
#X connect 5 0 27 0;
#X connect 6 0 9 1;
#X connect 6 0 11 1;
#X connect 6 0 10 1;
#X connect 7 0 8 0;
#X connect 8 0 4 0;
#X connect 9 0 1 0;
#X connect 10 0 2 0;
#X connect 11 0 3 0;
#X connect 12 0 13 0;
#X connect 12 0 19 1;
#X connect 12 0 20 1;
#X connect 12 0 21 1;
#X connect 13 0 14 1;
#X connect 13 0 15 1;
#X connect 13 0 16 1;
#X connect 14 0 9 0;
#X connect 15 0 10 0;
#X connect 16 0 11 0;
#X connect 17 0 19 0;
#X connect 18 0 21 0;
#X connect 19 0 9 0;
#X connect 20 0 10 0;
#X connect 21 0 11 0;
#X connect 22 0 14 0;
#X connect 23 0 15 0;
#X connect 24 0 16 0;
#X connect 25 0 20 0;
#X connect 26 0 12 0;
#X connect 27 0 22 0;
#X connect 27 0 25 0;
#X connect 27 0 24 0;
#X connect 27 0 23 0;
#X connect 27 0 18 0;
#X connect 27 0 17 0;