global proc Pyr1 ()
{
for ($x =0 ; $x < getSliderValueX(); $x++) {
for ($y =0 ; $y < getSliderValueY(); $y++) {
for ($z = 0; $z <  getSliderValueZ(); $z++) {
if($x >= -5 && $x <=5 || $y >= 0 && $y <= 5) 
    {
    float $cSize = rand(0,0.5);
    polyCube  -h $cSize ;
  
        move     ($x * 0.1) ($y * -0.5) ($z * 0.1);
         scale   ($y * (rand (0.1,0.5))) ($y * (rand(0.1,0.5)) ) ($y * (rand (0.1,0.5)));
            
    }
else 
    /*nothing*/    ;
    }
    }
    }         
}