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