"clipka" <nomail@nomail> wrote:
> "alphaQuad" <alp### [at] earthlinknet> wrote:
> > upon close inspection of the code, there's is nothing else like THESE stars,
> > since I wrote and designed every aspect of MY STARS!
>
> Yeah, sure. Then what may *this* be...? ;)
>
> One of many such artifacts, if one bothers to take a closer look; to me, they
> bear striking resemblance to some Gnome "flying windows"-clone screensaver.

If your image is really what you say, I'd admit to be a gross assumption
considering source, it suggests a couple of things:

someone besides me can use megapov
someone besides me can make spirals

original release date of this Gnome would be also suggestive of,
if I helped or not in its creation


first appearance in the archive date 4/16/08 before colorization
(1st archive dated 3/20/08)

#macro _spiral()
//#local q = <-1,1,0>;
#local q2 = <1,1,0>;
//#local q3 = <-1,-1,0>;
#local q4 = <1,-1,0>;
   #local rate = 0.82; // decent rate
   #local n = 150;
   #local r = (PI2*1.25)/(-n);
   #local i = 0;
   //#local pnt = midpoint(p,p3)*1.8+<.2,-.4,0>;  // start distance    str
   #local pnt = midpoint(q2,q4);
   // -<.05,0,0>;
   #local len = vlength(pnt);
   #local lp = pnt;
   ball(lp,.033)
   #while (i<n)
      #local p = rotation(r*i,z,vnormalize(pnt)*(len-(len*rate/n)*i));
      #if (vlength(p-lp) > (i/500.0)+.033)
        ball(p,(i/500.0)+.035)
        #local lp = p;
      #end
      #declare i = i+1;

   #end
#end

triangulation.inc also mine with copies in 3 other languages which include
rotation() and midpoint()

after colorize!

#macro _spiral()
  //#local q = <-1,1,0>;
  #local q2 = <1,1,0>;
  //#local q3 = <-1,-1,0>;
  #local q4 = <1,-1,0>;
   #local rate = 0.82; // decent rate
   #local n = 150;
   #local r = (PI2*1.25)/(-n);
   #local i = 0;
   #local pnt = midpoint(q2,q4);
   #local len = vlength(pnt);
   #local lp = pnt;
   #local ty = array[5]{ "O","B","A","F","G" } //,"K","M","C"
   #local c = starcolor(ty[int(rand(S3)*4)])*.5;
   ball(lp,.033,c)
   #while (i<n)
      #local p = rotation(r*i,z,vnormalize(pnt)*(len-(len*rate/n)*i));
      #if (vlength(p-lp) > (i/500.0)+.033)
        ball(p,(i/500.0)+.035,c)
        #local lp = p;
      #end
      #declare i = i+1;

   #end
#end

too dense to see how bad your assumptions are, indicative of your complete
neglect for positive intent

people like you kill the world with black-hole hearts and brains

Post a reply to this message