XProfan

# Okrea-Code
# new Object
origin 0,0,0
# Flügel
goto 0,0,0
color 1,0,0,1
triangle 2,2
goto 0,0,0
rotate 45,0,0
color 1,1,1,1
triangle 2,2
goto 0,0,0
rotate 90,0,0
color 1,0,0,1
triangle 2,2
goto 0,0,0
rotate 135,0,0
color 1,1,1,1
triangle 2,2
goto 0,0,0
rotate 180,0,0
color 1,0,0,1
triangle 2,2
goto 0,0,0
rotate 225,0,0
color 1,1,1,1
triangle 2,2
goto 0,0,0
rotate 270,0,0
color 1,0,0,1
triangle 2,2
goto 0,0,0
rotate 305,0,0
color 1,1,1,1
triangle 2,2
# Stiel
goto .99,0,0
rotate 0,0,90
color .2,.4,0,1
tube .04,.04,8,32
# Haube
goto 1,0,0
rotate 0,0,90
color 1,.7,0,1
tube .2,.2,.2,32