Sounds like a sign your loop isn't looping. Try something like this:
#macro Column(colHeight, colRadius, colRidges)
    difference {
        cylinder {<0,0,0>, <0,colHeight,0>, colRadius}

        #local k=0;//the loop counter
        #while(k<colRidges)
            cylinder {<0,-0.1,0>, <0,colHeight + 0.1,0>,
(colRadius*pi)/colRidges
                translate x*colRadius rotate k*y*(360/colRidges)
            }
            #local k=k+1;
        #end
    }
#end
Rounding off the sharp edges will take a bit more work, but it shouldn't
be too hard. I will work on that. This is how the macro is used:
object {Column(1, 1, 17)
    pigment {color White}
}

Post a reply to this message