aboutsummaryrefslogtreecommitdiff
path: root/Gem/examples/06.particle/04.combo.pd
blob: 670d9d0527be8512621caf5a906d0f5f8fab4c28 (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
#N canvas 125 61 600 634 10;
#X declare -lib Gem;
#X obj 41 197 gemwin;
#X msg 41 39 create;
#X msg 58 68 destroy;
#X obj 198 39 gemhead;
#X obj 198 136 part_color;
#X obj 198 615 part_draw;
#X text 391 35 set the color range;
#X text 309 174 set the size;
#X text 330 269 set the number per frame;
#X text 330 458 set the age to kill at;
#X text 464 196 the velocity domain;
#X text 462 230 radius = 0.2;
#X floatatom 382 383 0 0 0 0 - - -;
#X text 420 413 orbit point and gravity;
#X obj 422 59 loadbang;
#X text 426 384 keep the gravity low;
#X obj 198 461 part_killold 35;
#X msg 398 95 0 0 1;
#X obj 198 174 part_size 0.8;
#X text 461 214 a sphere at -1 0 0;
#X text 373 300 apply a gravity to the right;
#X msg 85 357 0 1 0;
#X msg 143 357 0 -1 0;
#X obj 198 305 part_gravity 0.07 0 0;
#X obj 198 579 translateXYZ -1 0.5 0;
#X obj 198 544 rotateXYZ 0 1 0;
#X floatatom 20 442 0 0 0 0 - - -;
#X obj 198 414 part_orbitpoint 0 -1 0 0.88;
#X obj 198 497 part_gravity 0 0 -0.05;
#X obj 198 220 part_velocity sphere -1 0 0 0.05;
#X msg 458 96 1 0 0;
#X text 390 498 apply a gravity in Z;
#X obj 85 290 metro 2000;
#X obj 20 290 metro 50;
#X obj 198 82 part_head 2000;
#X text 204 60 maximum of 2000 particles;
#X obj 198 276 part_source 10;
#N canvas 91 174 290 179 Gem.init 0;
#X obj 118 46 loadbang;
#X msg 118 81 reset;
#X obj 118 113 outlet;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X restore 90 175 pd Gem.init;
#X obj 79 104 tgl 40 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
;
#X obj 55 249 t f f;
#X obj 20 403 i;
#X obj 51 403 + 1;
#X obj 81 403 % 360;
#X obj 79 149 t f f;
#N canvas 0 0 450 300 alternate 0;
#X obj 82 126 inlet;
#X obj 82 239 outlet;
#X obj 82 192 select 0 1;
#X obj 145 239 outlet;
#X obj 82 147 i;
#X obj 117 146 == 0;
#X obj 82 167 t f f;
#X connect 0 0 4 0;
#X connect 2 0 1 0;
#X connect 2 1 3 0;
#X connect 4 0 6 0;
#X connect 5 0 4 1;
#X connect 6 0 2 0;
#X connect 6 1 5 0;
#X restore 85 327 pd alternate;
#X obj 492 7 declare -lib Gem;
#X connect 1 0 0 0;
#X connect 2 0 0 0;
#X connect 3 0 34 0;
#X connect 4 0 18 0;
#X connect 12 0 27 2;
#X connect 14 0 30 0;
#X connect 14 0 17 0;
#X connect 16 0 28 0;
#X connect 17 0 4 1;
#X connect 18 0 29 0;
#X connect 21 0 27 1;
#X connect 22 0 27 1;
#X connect 23 0 27 0;
#X connect 24 0 5 0;
#X connect 25 0 24 0;
#X connect 26 0 25 2;
#X connect 27 0 16 0;
#X connect 28 0 25 0;
#X connect 29 0 36 0;
#X connect 30 0 4 2;
#X connect 32 0 44 0;
#X connect 33 0 40 0;
#X connect 34 0 4 0;
#X connect 36 0 23 0;
#X connect 37 0 0 0;
#X connect 38 0 43 0;
#X connect 39 0 33 0;
#X connect 39 1 32 0;
#X connect 40 0 41 0;
#X connect 40 0 26 0;
#X connect 41 0 42 0;
#X connect 42 0 40 1;
#X connect 43 0 0 0;
#X connect 43 1 39 0;
#X connect 44 0 21 0;
#X connect 44 1 22 0;