aboutsummaryrefslogtreecommitdiff
path: root/exemples/29_aglom.pd
blob: c674a29221435062142ff1bb1e1b26b653271e19 (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
#N canvas 51 18 635 423 10;
#X obj 18 181 t b b;
#X obj 18 103 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
;
#X msg 145 149 0 \, destroy;
#X obj 111 177 gemwin;
#X msg 111 124 reset \, create \, 1;
#X obj 18 390 s masse;
#X obj 266 150 s reset_masse;
#X msg 266 128 bang;
#X text 359 281 <- right border;
#X text 360 303 <- left border;
#X text 360 325 <- top border;
#X text 360 347 <- bottom border;
#N canvas 845 31 438 384 pool 0;
#X obj 290 290 aglom2 29;
#X obj 0 0 aglom2 0;
#X obj 10 10 aglom2 1;
#X obj 20 20 aglom2 2;
#X obj 30 30 aglom2 3;
#X obj 40 40 aglom2 4;
#X obj 50 50 aglom2 5;
#X obj 60 60 aglom2 6;
#X obj 70 70 aglom2 7;
#X obj 80 80 aglom2 8;
#X obj 90 90 aglom2 9;
#X obj 100 100 aglom2 10;
#X obj 110 110 aglom2 11;
#X obj 120 120 aglom2 12;
#X obj 130 130 aglom2 13;
#X obj 140 140 aglom2 14;
#X obj 150 150 aglom2 15;
#X obj 160 160 aglom2 16;
#X obj 170 170 aglom2 17;
#X obj 180 180 aglom2 18;
#X obj 190 190 aglom2 19;
#X obj 200 200 aglom2 20;
#X obj 210 210 aglom2 21;
#X obj 220 220 aglom2 22;
#X obj 230 230 aglom2 23;
#X obj 240 240 aglom2 24;
#X obj 250 250 aglom2 25;
#X obj 260 260 aglom2 26;
#X obj 270 270 aglom2 27;
#X obj 280 280 aglom2 28;
#X restore 398 132 pd pool;
#N canvas 860 482 315 409 creation 0;
#X obj 43 319 s pd-new;
#X msg 86 95 \; pd filename new ./ \; #N canvas \; #X pop 1 \;;
#X msg 43 289 menuclose;
#X obj 76 238 pack f f f;
#X obj 43 47 sel 0 1;
#X obj 43 29 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
;
#X obj 61 72 t b b;
#X obj 76 187 t f f f;
#X obj 103 211 * 10;
#X obj 76 211 * 10;
#X msg 76 265 obj \$1 \$2 aglom2 \$3;
#X obj 61 163 ch_uzi 30;
#X connect 2 0 0 0;
#X connect 3 0 10 0;
#X connect 4 0 2 0;
#X connect 4 1 6 0;
#X connect 5 0 4 0;
#X connect 6 0 11 0;
#X connect 6 1 1 0;
#X connect 7 0 9 0;
#X connect 7 1 8 0;
#X connect 7 2 3 2;
#X connect 8 0 3 1;
#X connect 9 0 3 0;
#X connect 10 0 0 0;
#X connect 11 1 7 0;
#X restore 398 158 pd creation pool;
#X obj 61 214 s link;
#X obj 18 154 metro 5;
#X obj 53 280 iLine2D masse 3.5 -3.5 3.5 3.5 1000 0 0 10;
#X obj 63 304 iLine2D masse -3.5 3.5 -3.5 -3.5 1000 0 0 10;
#X obj 78 327 iLine2D masse 3.5 3.5 -3.5 3.5 1000 0 0 10;
#X obj 89 350 iLine2D masse -3.5 -3.5 3.5 -3.5 1000 0 0 10;
#X text 50 100 <- begin (change the metro speed for slow computer)
;
#X floatatom 55 123 5 0 0 0 - - -;
#X obj 43 260 iAmbient2D masse 0 0 0.01 0.01 1;
#X text 359 257 <- give random speed and ambient viscosity;
#X text 174 35 All masses got 2 circular interactors around them. This
create a non linear interactor. this make them to atract / repuls depending
on ther distances....;
#X text 177 6 All masses interact each other in a way for the creation
of small structures;
#X connect 0 0 5 0;
#X connect 0 1 14 0;
#X connect 0 1 16 0;
#X connect 0 1 17 0;
#X connect 0 1 18 0;
#X connect 0 1 19 0;
#X connect 0 1 22 0;
#X connect 1 0 15 0;
#X connect 2 0 3 0;
#X connect 4 0 3 0;
#X connect 7 0 6 0;
#X connect 15 0 0 0;
#X connect 21 0 15 1;