aboutsummaryrefslogtreecommitdiff
path: root/pmcloud_3d.pd
blob: 564c5e82bbb2b24b3d05caf4eb5fc3ccaac36336 (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
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
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
#N canvas 1 53 743 397 10;
#X obj 45 9 inlet;
#X obj 42 350 outlet;
#X obj 643 48 inlet;
#X msg 643 95 setK lnk \$1;
#X obj 736 49 inlet;
#X obj 554 44 inlet;
#N canvas 801 117 639 733 create_clouds 0;
#X obj 70 30 loadbang;
#X obj 175 649 t a;
#X obj 173 677 outlet;
#X obj 32 50 t b b b b b b;
#X obj 85 103 \$1;
#X obj 145 229 random 1000;
#X obj 145 253 / 1000;
#X obj 274 230 random 1000;
#X obj 274 254 / 1000;
#X msg 126 419 link lnk cloud in \$1 0;
#X msg 89 471 link lnk cloud cloud \$1 0;
#X obj 126 391 \$2;
#X obj 85 446 \$2;
#X obj 48 421 \$3;
#X obj 274 179 * 243354;
#X obj 145 177 * 654543;
#X msg 85 156 bang;
#X msg 145 201 seed \$1;
#X msg 274 202 seed \$1;
#X obj 145 145 \$1;
#X obj 39 12 inlet;
#X msg 175 95 reset \, mass in 0 1 0 0 0 \, mass fixe 0 0 0 0 0;
#X obj 145 283 pack f f f;
#X obj 367 230 random 1000;
#X obj 367 254 / 1000;
#X msg 367 202 seed \$1;
#X obj 367 179 * 2.42455e+06;
#X msg 145 312 mass cloud 1 1 \$1 \$2 \$3;
#N canvas 0 0 259 330 loop 0;
#X obj 74 149 f;
#X obj 74 213 + 1;
#X obj 74 171 moses \$1;
#X obj 74 104 t b f;
#X obj 104 281 outlet;
#X obj 74 82 inlet;
#X msg 74 126 0;
#X obj 74 191 t f f;
#X obj 96 240 t f;
#X connect 0 0 2 0;
#X connect 1 0 8 0;
#X connect 2 0 7 0;
#X connect 3 0 6 0;
#X connect 3 1 2 1;
#X connect 5 0 3 0;
#X connect 6 0 0 0;
#X connect 7 0 1 0;
#X connect 7 1 4 0;
#X connect 8 0 0 0;
#X restore 85 126 pd loop;
#X msg 48 504 tLink damp fixe cloud 0 \$1 0 0 1 \, tLink damp fixe
cloud 0 \$1 0 1 0 \, tLink damp fixe cloud 0 \$1 1 0 0;
#X connect 0 0 3 0;
#X connect 1 0 2 0;
#X connect 3 1 12 0;
#X connect 3 1 13 0;
#X connect 3 2 11 0;
#X connect 3 3 4 0;
#X connect 3 4 21 0;
#X connect 3 5 19 0;
#X connect 4 0 28 0;
#X connect 5 0 6 0;
#X connect 6 0 22 0;
#X connect 7 0 8 0;
#X connect 8 0 22 1;
#X connect 9 0 1 0;
#X connect 10 0 1 0;
#X connect 11 0 9 0;
#X connect 12 0 10 0;
#X connect 13 0 29 0;
#X connect 14 0 18 0;
#X connect 15 0 17 0;
#X connect 16 0 5 0;
#X connect 16 0 7 0;
#X connect 16 0 23 0;
#X connect 17 0 5 0;
#X connect 18 0 7 0;
#X connect 19 0 15 0;
#X connect 19 0 14 0;
#X connect 19 0 26 0;
#X connect 20 0 3 0;
#X connect 21 0 1 0;
#X connect 22 0 27 0;
#X connect 23 0 24 0;
#X connect 24 0 22 2;
#X connect 25 0 23 0;
#X connect 26 0 25 0;
#X connect 27 0 1 0;
#X connect 28 0 16 0;
#X connect 29 0 1 0;
#X restore 46 169 pd create_clouds;
#X msg 400 149 posY in \$1;
#X obj 42 300 route massesPosId;
#X obj 42 324 route cloud;
#X obj 305 59 t b l;
#X obj 336 106 unpack f f;
#X msg 336 129 posX in \$1;
#X msg 736 95 setD damp \$1;
#X msg 555 95 setL lnk \$1;
#X msg 305 83 bang \, get massesPos cloud;
#X obj 68 143 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X msg 91 96 forceX cloud \$1;
#X msg 131 117 forceY cloud \$1;
#X obj 46 30 route reset force forceX forceY forceZ;
#X obj 91 69 unpack f f f;
#X msg 173 139 forceZ cloud \$1;
#X obj 42 278 msd3D;
#X connect 0 0 19 0;
#X connect 2 0 3 0;
#X connect 3 0 22 0;
#X connect 4 0 13 0;
#X connect 5 0 14 0;
#X connect 6 0 22 0;
#X connect 7 0 22 0;
#X connect 8 0 9 0;
#X connect 9 0 1 0;
#X connect 10 0 15 0;
#X connect 10 1 11 0;
#X connect 11 0 12 0;
#X connect 11 1 7 0;
#X connect 12 0 22 0;
#X connect 13 0 22 0;
#X connect 14 0 22 0;
#X connect 15 0 22 0;
#X connect 16 0 6 0;
#X connect 17 0 22 0;
#X connect 18 0 22 0;
#X connect 19 0 6 0;
#X connect 19 1 20 0;
#X connect 19 2 17 0;
#X connect 19 3 18 0;
#X connect 19 4 21 0;
#X connect 19 5 10 0;
#X connect 20 0 17 0;
#X connect 20 1 18 0;
#X connect 20 2 21 0;
#X connect 21 0 22 0;
#X connect 22 0 8 0;