Try

#declare Count = 0;
#declare Radius = 5;
#declare Angle = 0;
#declare SphRad = 1;

#while(Count<99)

sphere{0,SphRad pigment{White}
        translate <0,Radius,0>
        rotate z*Angle
        }

#declare Count = Count +1;
#declare Angle = Angle +1;
#declare SphRad = SphRad - 0.01;

#end

All the Best

Mick
bankspad wrote in message <364B1C4F.AC5F0ADD@pacbell.net>...
>I am trying to create shapes much like horns, antlers, a snake's fangs,
>etc. but am clueless as to how to go about it. Can anyone help with
>this?
>
>KB-
>

Post a reply to this message