Warp wrote:
>
>   Me too. There's no logical explanation for this.

Here is the 2.0 source hastily converted to 3.5:

#version 3.5;

#declare USE_AREA=1;

camera {
  location  <6,6,-6>
  direction <0,0,1.5>
  look_at   <1,0,0>
}

#declare length=10;
#declare h=0.6;
#declare i=1;

#declare tube1=
union{
  light_source{
    <0, h, 0>
    color rgb i
    area_light length*x,z,32,1
  }
  cylinder{
    <-length/2,h,0>,<length/2,h,0>,0.05
    pigment{color rgb<1,1,1>}
    finish{diffuse 0 ambient 1}
    no_shadow
  }
}

#declare d=length/31;
#declare di=i/32;

#declare light=light_source{<-length/2,h,0> color rgb di}

#declare tube2=
union{
  #declare I=0;#while(I<32)
    object{light translate I*d*x}
  #declare I=I+1;#end
  cylinder{
    <-length/2,h,0>,<length/2,h,0>,0.05
    pigment{color rgb<1,1,1>}
    finish{diffuse 0 ambient 1}
    no_shadow
  }
}

#if(USE_AREA=1)
  object{tube1}
#else
  object{tube2}
#end

#declare ball=sphere{<0,0.25,0>,0.25}

#declare row=
union{
  object{ball translate<-1.5,0,0.5>}
  object{ball translate<-0.5,0,0.5>}
  object{ball translate<0.5,0,0.5>}
  object{ball translate<1.5,0,0.5>}
}

union{
  object{row translate<0,0,1>}
  object{row translate<0,0,0>}
  object{row translate<0,0,-1>}
  object{row translate<0,0,-2>}
  pigment{color rgb<1,1,1>}
  finish{diffuse 1.5 ambient 0.1 phong 1}
}

plane{y,0
  texture{
    pigment{checker color rgb<1,1,1> color rgb<0.5,0.8,1>}
    finish{diffuse 1.5 ambient 0.1}
    scale 0.5
  }
}

_____________
Kari Kivisalo

Post a reply to this message