Bear

; Vedi: http://www.numbertext.org/logo/librelogo.pdf

TO BEAR
    PENUP
    CIRCLE  100
    LEFT    45 
    FORWARD 70
    CIRCLE  50
    BACK    70 
    RIGHT   90 
    FORWARD 70
    CIRCLE  50
    BACK    70 
    RIGHT   45 
    BACK    20

    REPEAT 2 [
        FILLCOLOR “white”
        CIRCLE    25
        FILLCOLOR “black”
        CIRCLE    10
        FORWARD   40
    ]

    BACK    60 
    RIGHT   90 
    FORWARD 25
    CIRCLE  30
    BACK    25 
    LEFT    180
END

HIDETURTLE
BEAR

...

FOR colore IN [“gold”, “orange”, “tomato”, “purple”, “skyblue”] [
    FILLCOLOR colore
    BEAR
    FORWARD   100 
    LEFT      360/5
]