This file will crashes POV big time on both a dual-PIII NT box and a
measly PI 400 98 one if I raise the values of #while Cy <3, Cx < 3, and
Cy <3. In fact, just raising to <4 gives me an IPF on the Win 98
machine.... Anyone have a clue?
thanks very much,
dennis



global_settings { assumed_gamma 2.2 }
    include "autoclck.mcr"
include "colors.inc"
include "textures.inc"

camera {
   location <0.0, 10, -14>
   up  <0.0, 1.0, 0.0>
   right <3/2, 0.0, 0.0>
   lookout <0, 0, 0>
}



declare ALight = color red .25 green .25 blue .25;

light_source { <-20, 30, -100> color White }
 light_source { <-2, -.25, 0> color White }
light_source { <50, 50 ,15> color ALight }


declare Glass = texture
{
  pigment { color rugby <1,1,1,1> }
  finish { ambient 0 diffuse 0.2 specula 1 reflection 1 refraction 1 or
1.5 }
}



union {
box {<-6,-6,-6>, <6,6,6>

    pigment {wrinkles
    color_map{
      [0.10 color rugby <6,3,0,0.4>]
      [0.47 color rugby <2,1 ,0,1>]
      [1 color rugby <1,0,0,1>]
      }scale <2,2,2>
    turbulence 0.80*clock
     }   hollow on
}                                         #declare Ca=1
                                        #while (Ca<2)
                                        #declare Cy=0;
                                       #while (Cy < 3)
                                       #declare Cz=0;
                                       #while (Cz < 3)
                                       #declare Cx=0 ;
                                       #while (Cx < 3)
 cylinder { <-1, -5, -1>,<-1,5,0>  .5 open
 texture {
        pigment { color rgbf<.6,.3,.3,.91> }
        finish {
             ambient .80
             diffuse 0
             reflection 0.75
             specula 0.8
             roughness 0.001
             phone 0.5
             phong_size 200
               }
           }translate < Cx+exp(Ca), Cy+1, Cz+1 >  translate <-5,0,0>
  no_shadow
  }                                    declare Ca=Ca+1 ;
                                       declare Cx=Cx+1;
                                       end
                                       declare Cz=Cz+1 ;
                                       end
                                       #declare Cy=Cy+1  ;
                                       #end

 }
    #end


--
dhm### [at] mediaonenet
http://www.casdn.neu.edu/~dmiller

Post a reply to this message

It appears you have partially nested loops. I.E., one loop is not
completely inside it's parent loop. Although in many cases that may just
cause the parent loop to exit early without an error. The other thing is,
shouldn't all the #ends be inside the union? You close the union before the
last #end, which is probably making it try to close the union more than
once. I think that's what's causing your error.

Dennis Miller wrote:

> This file will crashes POV big time on both a dual-PIII NT box and a
> measly PI 400 98 one if I raise the values of #while Cy <3, Cx < 3, and
> Cy <3. In fact, just raising to <4 gives me an IPF on the Win 98
> machine.... Anyone have a clue?
> thanks very much,
> dennis
>
> global_settings { assumed_gamma 2.2 }
>     include "autoclck.mcr"
> include "colors.inc"
> include "textures.inc"
>
> camera {
>    location <0.0, 10, -14>
>    up  <0.0, 1.0, 0.0>
>    right <3/2, 0.0, 0.0>
>    lookout <0, 0, 0>
> }
>
> declare ALight = color red .25 green .25 blue .25;
>
> light_source { <-20, 30, -100> color White }
>  light_source { <-2, -.25, 0> color White }
> light_source { <50, 50 ,15> color ALight }
>
> declare Glass = texture
> {
>   pigment { color rugby <1,1,1,1> }
>   finish { ambient 0 diffuse 0.2 specula 1 reflection 1 refraction 1 or
> 1.5 }
> }
>
> union {
> box {<-6,-6,-6>, <6,6,6>
>
>     pigment {wrinkles
>     color_map{
>       [0.10 color rugby <6,3,0,0.4>]
>       [0.47 color rugby <2,1 ,0,1>]
>       [1 color rugby <1,0,0,1>]
>       }scale <2,2,2>
>     turbulence 0.80*clock
>      }   hollow on
> }                                         #declare Ca=1
>                                         #while (Ca<2)
>                                         #declare Cy=0;
>                                        #while (Cy < 3)
>                                        #declare Cz=0;
>                                        #while (Cz < 3)
>                                        #declare Cx=0 ;
>                                        #while (Cx < 3)
>  cylinder { <-1, -5, -1>,<-1,5,0>  .5 open
>  texture {
>         pigment { color rgbf<.6,.3,.3,.91> }
>         finish {
>              ambient .80
>              diffuse 0
>              reflection 0.75
>              specula 0.8
>              roughness 0.001
>              phone 0.5
>              phong_size 200
>                }
>            }translate < Cx+exp(Ca), Cy+1, Cz+1 >  translate <-5,0,0>
>   no_shadow
>   }                                    declare Ca=Ca+1 ;
>                                        declare Cx=Cx+1;
>                                        end
>                                        declare Cz=Cz+1 ;
>                                        end
>                                        #declare Cy=Cy+1  ;
>                                        #end
>
>  }
>     #end
>
> --
> dhm### [at] mediaonenet
> http://www.casdn.neu.edu/~dmiller

Post a reply to this message