Pencil

Esercizio 1

Una matita rossa

TO TRIANGLE size color
    REPEAT 3 [ 
        FORWARD size
        LEFT    120
    ]
    FILLCOLOR color 
    FILL
END

TO BOX size f
    REPEAT 2 [ 
        FORWARD size*10 
        RIGHT   90 
        FORWARD size*f 
        RIGHT   90 
    ]
END

TO PENCIL size color
    BOX       size 1
    FILLCOLOR color 
    FILL
    BOX       size 2/3
    BOX       size 1/3
    CLOSE
    RIGHT     150
    TRIANGLE  size “chocolate”
    FORWARD   size*0.75
    TRIANGLE  size/4 color
    BACK      size*0.75
    LEFT      150
END

PENCIL 25 “red”

Esercizio 2

Dieci matite rosse, con rotazione casuale

...

REPEAT 10 [ 
    PENUP 
    HOME 
    PENDOWN
    HEADING ANY 
    PENCIL  25 "red"
]

Esercizio 3

Dieci matite di colore casuale, in sequenza

...

x=100
y=400
REPEAT 10 [ 
    PENUP 
    POSITION  [x,y] 
    HEADING   0 
    PENDOWN
    FILLCOLOR ANY
    c=FILLCOLOR
    PENCIL    25 c
    x=x+40
]

Esercizio 4

Dieci matite di colore casuale, con angolo casuale


Lascia un commento

Il tuo indirizzo email non sarà pubblicato. I campi obbligatori sono contrassegnati *