aboutsummaryrefslogtreecommitdiff
path: root/exemples/03_chaos2D.pd
blob: 3513b5d7792c853891a4a7ba81567ae0cea75439 (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
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
#N canvas 1 4 843 542 12;
#X obj 16 98 t b b;
#X obj 16 50 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
;
#X obj 73 233 unpack s f f;
#X obj 177 293 vsl 15 128 0 127 0 0 empty empty empty 0 -8 0 8 -262144
-1 -1 8300 1;
#X obj 121 343 hsl 128 15 0 127 0 0 empty empty empty -2 -6 0 8 -262144
-1 -1 10100 1;
#X obj 16 71 metro 50;
#X msg 360 291 setK \$1;
#X msg 434 265 setD \$1;
#X msg 507 237 setM \$1;
#X floatatom 360 216 5 0 20 0 - - -;
#X floatatom 434 214 5 0 30 0 - - -;
#X floatatom 507 214 5 3 100 0 - - -;
#N canvas 796 335 379 269 gem 0;
#X obj 197 20 gemhead;
#X msg 47 96 0 \, destroy;
#X obj 13 124 gemwin;
#X obj 197 152 circle 0.5;
#X obj 182 47 inlet;
#X obj 182 72 unpack s f f;
#X obj 197 124 translateXYZ;
#X obj 13 19 inlet;
#X obj 13 45 sel 1;
#X obj 227 99 / 30;
#X obj 273 99 / 30;
#X msg 13 71 reset \, create \, 1;
#X connect 0 0 6 0;
#X connect 1 0 2 0;
#X connect 4 0 5 0;
#X connect 5 1 9 0;
#X connect 5 2 10 0;
#X connect 6 0 3 0;
#X connect 7 0 8 0;
#X connect 8 0 11 0;
#X connect 8 1 1 0;
#X connect 9 0 6 1;
#X connect 10 0 6 2;
#X connect 11 0 2 0;
#X restore 19 233 pd gem;
#X obj 19 186 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
;
#N canvas 513 286 485 188 structure 0;
#N canvas 272 241 298 174 link_left 0;
#X obj 194 68 inlet;
#X obj 194 121 outlet;
#X obj 31 95 link2D \$0-link 70 1 0 0;
#X obj 31 38 mass2D border_mass 1 -64 0;
#X connect 0 0 2 1;
#X connect 2 1 1 0;
#X connect 3 0 2 0;
#X restore 22 57 pd link_left;
#N canvas 345 616 329 171 link_down 0;
#X obj 181 53 inlet;
#X obj 181 106 outlet;
#X obj 18 80 link2D \$0-link 70 1 0 0;
#X obj 18 23 mass2D border_mass 1 0 -64;
#X connect 0 0 2 1;
#X connect 2 1 1 0;
#X connect 3 0 2 0;
#X restore 117 90 pd link_down;
#N canvas 506 199 290 152 link_up 0;
#X obj 187 52 inlet;
#X obj 187 105 outlet;
#X obj 24 79 link2D \$0-link 70 1 0 0;
#X obj 24 22 mass2D border_mass 1 0 64;
#X connect 0 0 2 1;
#X connect 2 1 1 0;
#X connect 3 0 2 0;
#X restore 121 29 pd link_up;
#X obj 222 93 outlet;
#N canvas 703 434 355 273 link_right 0;
#X obj 191 65 inlet;
#X obj 191 118 outlet;
#X obj 28 92 link2D \$0-link 70 1 0 0;
#X obj 28 35 mass2D border_mass 1 64 0;
#X connect 0 0 2 1;
#X connect 2 1 1 0;
#X connect 3 0 2 0;
#X restore 320 58 pd link_right;
#X obj 120 57 mass2D \$0-mass 8 37 19;
#X connect 0 0 5 0;
#X connect 1 0 5 0;
#X connect 2 0 5 0;
#X connect 4 0 5 0;
#X connect 5 0 3 0;
#X connect 5 0 2 0;
#X connect 5 0 1 0;
#X connect 5 0 0 0;
#X connect 5 0 4 0;
#X restore 62 206 pd structure;
#X obj 360 265 / 10;
#X obj 360 239 + 1;
#X obj 64 100 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 30 124 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X msg 434 190 0;
#X obj 164 6 loadbang;
#X obj 118 263 + 64;
#X obj 164 263 + 64;
#X obj 434 238 / 10;
#X text 42 47 <- click here;
#X msg 360 190 3;
#X msg 164 61 resetF;
#X obj 235 11 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 164 32 t b b;
#X msg 177 83 force2D -100 140;
#X obj 51 123 s \$0-link;
#X obj 16 147 s \$0-mass;
#X msg 199 108 reset;
#X obj 507 265 s \$0-mass;
#X obj 360 323 s \$0-link;
#X text 269 8 <- reset the simulation;
#X text 52 182 <- visualization (need gem);
#X text 359 135 you can change physical properties of the system. take
care of numerical instability (especially with fast movement);
#X text 276 388 The mass is connected to the 4 borders of the screen
with 4 link (without damping). The movement of the masss (should)
follow a chaotic equation.;
#X obj 40 445 osc~;
#X obj 40 420 mtof;
#X obj 40 395 line;
#X obj 97 394 *;
#X obj 39 471 *~;
#X obj 97 445 line~;
#X obj 39 497 dac~;
#X obj 97 369 / 256;
#X msg 97 419 \$1 100;
#X msg 40 369 \$1 100;
#X msg 507 189 20;
#X connect 0 0 31 0;
#X connect 0 1 30 0;
#X connect 1 0 5 0;
#X connect 2 1 21 0;
#X connect 2 2 22 0;
#X connect 5 0 0 0;
#X connect 6 0 34 0;
#X connect 7 0 34 0;
#X connect 8 0 33 0;
#X connect 9 0 16 0;
#X connect 10 0 23 0;
#X connect 11 0 8 0;
#X connect 13 0 12 0;
#X connect 14 0 2 0;
#X connect 14 0 12 1;
#X connect 15 0 6 0;
#X connect 16 0 15 0;
#X connect 17 0 30 0;
#X connect 18 0 31 0;
#X connect 19 0 10 0;
#X connect 20 0 28 0;
#X connect 21 0 4 0;
#X connect 21 0 48 0;
#X connect 22 0 3 0;
#X connect 22 0 46 0;
#X connect 23 0 7 0;
#X connect 25 0 9 0;
#X connect 26 0 30 0;
#X connect 27 0 28 0;
#X connect 28 0 26 0;
#X connect 28 0 29 0;
#X connect 28 1 32 0;
#X connect 29 0 31 0;
#X connect 32 0 31 0;
#X connect 39 0 43 0;
#X connect 40 0 39 0;
#X connect 41 0 40 0;
#X connect 42 0 47 0;
#X connect 43 0 45 0;
#X connect 43 0 45 1;
#X connect 44 0 43 1;
#X connect 46 0 42 1;
#X connect 46 0 42 0;
#X connect 47 0 44 0;
#X connect 48 0 41 0;
#X connect 49 0 11 0;