"Dave Blandston" <nomail@nomail> wrote:
> Just a simple star with a few facets.
>
> I made this star as part of an Esperanto flag, since my wife is learning
> Esperanto. Since it's so simple I'll cheat a little and just post the source
> code here in case anyone is interested...
>
> Regards,
> Dave Blandston
>
> #local StarPoint = object {
>    intersection {
>       box {<-1, -.08, -1> <1, .08, 1>}
>       plane {z, 0 inverse rotate 70 * x rotate -54 * y translate -1 * z}
>       plane {z, 0 inverse rotate 70 * x rotate 54 * y translate -1 * z}
>       plane {z, 0 inverse rotate 110 * x rotate 72 * y translate 1 * z}
>       plane {z, 0 inverse rotate 110 * x rotate -72 * y translate 1 * z}
>       plane {z, 0 rotate 110 * x rotate -54 * y translate -1 * z}
>       plane {z, 0 rotate 110 * x rotate 54 * y translate -1 * z}
>       plane {z, 0 rotate 70 * x rotate 72 * y translate 1 * z}
>       plane {z, 0 rotate 70 * x rotate -72 * y translate 1 * z}
>    } //intersection
>    translate 1 * z
> } //object
>
> #local Star = object {
>    union {
>       #local I = 0;
>       #while (I < 5)
>          object {StarPoint rotate (I * 72) * y}
>          #local I = I + 1;
>       #end //#while
>    } //union
>    rotate -90 * x
> } //object

With front facets is very cool.
;)

Post a reply to this message