blob: 6d48a891f4e9b0b364415afa4e56338574baf7e7 (
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
|
#N canvas 396 160 600 500 10;
#X declare -lib Gem;
#X obj 198 50 gemhead;
#X obj 198 82 part_head;
#X obj 198 136 part_color;
#X obj 198 447 part_draw;
#X text 329 37 set the color range;
#X text 299 174 set the size;
#X text 310 269 set the number per frame;
#X text 310 378 set the age to kill at;
#X text 414 196 the velocity domain;
#X msg 219 413 draw line;
#X msg 298 413 draw point;
#X obj 198 270 part_source 25;
#X obj 198 381 part_killold 45;
#X text 412 230 radius = 0.2;
#X msg 336 97 1 0 1;
#X msg 396 98 0 1 0;
#X obj 198 220 part_velocity sphere 0 0 0 0.2;
#X floatatom 375 301 0 0 0 0 - - -;
#X obj 198 334 part_orbitpoint 0 1 0 0.08;
#X text 390 333 orbit point and gravity;
#X obj 198 174 part_size 0.4;
#X obj 360 61 loadbang;
#X text 411 213 a sphere at 0 0 0;
#X text 415 299 keep the gravity low;
#N canvas 87 154 247 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 64 238 pd Gem.init;
#N canvas 340 107 682 322 gemwin 0;
#X obj 102 122 tgl 15 0 \$0-gemstart \$0-gemstart empty 17 7 0 10 -262144
-1 -1 0 1;
#X obj 102 161 r \$0-gemstart;
#X obj 102 182 select 1 0;
#X msg 102 214 create \, 1;
#X msg 177 215 destroy;
#X obj 102 239 t a;
#X obj 318 54 inlet;
#X obj 318 255 gemwin;
#X obj 318 100 t a a;
#X obj 318 287 outlet;
#X obj 350 128 route create destroy;
#X obj 350 150 t b;
#X msg 350 172 1;
#X obj 390 150 t b;
#X msg 390 172 0;
#X obj 350 195 t f;
#X msg 350 219 set \$1;
#X text 118 122 rendering;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 2 1 4 0;
#X connect 3 0 5 0;
#X connect 4 0 5 0;
#X connect 5 0 8 0;
#X connect 6 0 8 0;
#X connect 7 0 9 0;
#X connect 8 0 7 0;
#X connect 8 1 10 0;
#X connect 10 0 11 0;
#X connect 10 1 13 0;
#X connect 11 0 12 0;
#X connect 12 0 15 0;
#X connect 13 0 14 0;
#X connect 14 0 15 0;
#X connect 15 0 16 0;
#X connect 16 0 0 0;
#X coords 0 -1 1 1 85 40 1 100 100;
#X restore 34 255 pd gemwin;
#X obj 492 7 declare -lib Gem;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 2 0 20 0;
#X connect 9 0 3 0;
#X connect 10 0 3 0;
#X connect 11 0 18 0;
#X connect 12 0 3 0;
#X connect 14 0 2 1;
#X connect 15 0 2 2;
#X connect 16 0 11 0;
#X connect 17 0 18 2;
#X connect 18 0 12 0;
#X connect 20 0 16 0;
#X connect 21 0 15 0;
#X connect 21 0 14 0;
#X connect 24 0 25 0;
|
