[PD] Gem: Place point light inside Geo?

[Peter P.]

(with attachment)
-------------- next part --------------
#N canvas 1235 50 671 642 10;
#X declare -lib Gem;
#X obj 19 457 declare -lib Gem;
#X obj 20 562 gemwin;
#X obj 10 35 gemhead;
#X obj 444 181 line;
#X obj 255 211 rotateXYZ 0 0 0;
#X obj 255 261 translateXYZ 2.5 0 0;
#X obj 255 161 rotateXYZ 0 0 -10;
#X obj 444 136 metro 8000;
#X msg 444 159 0 \, 360 8000;
#X obj 443 397 line;
#X obj 255 439 rotateXYZ;
#X msg 443 370 0 \, 360 3000;
#X obj 443 341 metro 3000;
#X obj 20 488 loadbang;
#X obj 444 114 loadbang;
#X obj 443 318 loadbang;
#X msg 20 511 lighting 1 \, create \, 1;
#X msg 26 535 0 \, destroy \, reset;
#X text 111 190 SUN;
#X text 367 161 tilt axis;
#X text 353 211 rotate around sun;
#X text 385 261 distance center of sun - center of earth;
#X text 358 346 EARTH;
#X text 355 391 tilt axis;
#X text 317 440 rotation around earth;
#X text 384 498 distance center of earth - center of moon;
#X text 347 549 MOON;
#X obj 29 176 sphere 0.7 50;
#X obj 255 345 sphere 0.15 20;
#X obj 255 497 translateXYZ 0.3 0 0;
#X obj 255 548 sphere 0.03 20;
#X text 17 589 Possible improvements: Actual dimensions and movement
ratios \, elliptic paths;
#X obj 255 324 colorRGB 0.5 0.7 0.9 1;
#X obj 255 527 colorRGB 0.9 1 1 1;
#X obj 29 200 ambient 0 0 0;
#X obj 29 105 separator;
#X obj 255 107 separator;
#X obj 10 272 light;
#X text 8 289 Radiating point light in center of sun;
#X obj 10 65 t a a a;
#X obj 10 242 separator;
#X text 133 148 Ambient sunlight;
#X obj 29 145 ambient 10 3.5 0;
#X obj 255 390 rotateXYZ 0 0 0;
#X connect 2 0 39 0;
#X connect 3 0 4 2;
#X connect 4 0 5 0;
#X connect 5 0 32 0;
#X connect 6 0 4 0;
#X connect 7 0 8 0;
#X connect 8 0 3 0;
#X connect 9 0 10 2;
#X connect 10 0 29 0;
#X connect 11 0 9 0;
#X connect 12 0 11 0;
#X connect 13 0 16 0;
#X connect 14 0 7 0;
#X connect 15 0 12 0;
#X connect 16 0 1 0;
#X connect 17 0 1 0;
#X connect 27 0 34 0;
#X connect 28 0 43 0;
#X connect 29 0 33 0;
#X connect 32 0 28 0;
#X connect 33 0 30 0;
#X connect 35 0 42 0;
#X connect 36 0 6 0;
#X connect 39 0 40 0;
#X connect 39 1 35 0;
#X connect 39 2 36 0;
#X connect 40 0 37 0;
#X connect 42 0 27 0;
#X connect 43 0 10 0;