Greetings.

I have the following code which should create a number of cylindrical towers 
with a rounded roof (cylinder and sphere). But it seems the code is not 
working. Who can help?

Thanks,

Sven

#declare BayTowers=difference
{
  #declare Turn=0;
  #declare Diameter=seed(1);
  #declare Tall=seed(2);
  #declare Wide=seed(3);
  #declare Deep=seed(4);
  #while(Turn<200)
   cylinder
   {
     < 0.0, 0.0, 0.0 > < 0.0, 30*rand(Tall), 0.0 > 100.0*rand(Diameter)
     translate < 0.0, -330.0, 0.0 >
     texture { Licht }
     texture {InnenAufbaut }
     translate < -100.0+(200*rand(Wide)), 0.0, 0.0+(1600*rand(Deep)) >
   }
   sphere
   {
     < 0.0, 0.0, 0.0 > 100.0*rand(Diameter)
     scale < 1.0, 0.3, 1.0 >
     translate < 0.0, -330.0-(30*rand(Tall)), 0.0 >
     texture { InnenOben }
     translate < -100.0+(200*rand(Wide)), 0.0, 0.0+(1600*rand(Deep)) >
   }
   cylinder
   {
     < 0.0, 0.0, 0.0 > < 0.0, 30*rand(Tall), 0.0 > 100.0*rand(Diameter)
     translate < 0.0, -330.0, 0.0 >
     texture { Licht }
     texture {InnenAufbaut }
     translate < -100.0+(200*rand(Wide)), 0.0, 0.0+(1600*rand(Deep)) >
     scale < 1.0, -1.0, 1.0 >
   }
   sphere
   {
     < 0.0, 0.0, 0.0 > 100.0*rand(Diameter) scale < 1.0, 0.3, 1.0 >
     translate < 0.0, -330.0-(30*rand(Tall)), 0.0 >
     texture { InnenOben }
     translate < -100.0+(200*rand(Wide)), -0.0, 0.0+(1600*rand(Deep)) >
     scale < 1.0, -1.0, 1.0 >
   }
   #declare Turn=Turn+1;
  #end
 }
 difference
 {
  cylinder { < 0.0, 0.0, -200.0 > < 0.0, 0.0, 1800.0 > 500.0 texture { 
Licht } texture { Innen } }
  cylinder { < 0.0, 0.0, -200.01 > < 0.0, 0.0, 1800.01 > 330.0 texture { 
Licht } texture { Innen } }
 }
}

Post a reply to this message