1 files changed, 104 insertions, 0 deletions
diff --git a/packages/noncvs/windows/extra/Gem/examples/06.particle/04.combo.pd b/packages/noncvs/windows/extra/Gem/examples/06.particle/04.combo.pd
new file mode 100644
index 00000000..37d9afd1
--- /dev/null
+++ b/packages/noncvs/windows/extra/Gem/examples/06.particle/04.combo.pd
@@ -0,0 +1,104 @@
+#N canvas 125 39 600 634 10;
+#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 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;