La realizzazione delle figure animate richiede l’uso delle funzioni PICTURE e SLEEP.
Il tono di grigio appare più chiaro o più scuro in funzione della tonalità che lo circonda.
Esercizio 1
Esercizio 2
CLEARSCREEN
HOME
HIDETURTLE
PENUP
x=POSITION[0]
y=POSITION[0]
a=250
a2=a/2
a4=a/4
a6=a/6
FILLCOLOR “black” POSITION [x-a4,y] HEADING 0 SQUARE a2
FILLCOLOR “white” POSITION [x+a4,y] HEADING 0 SQUARE a2 ; "silver"
FILLCOLOR “gray” POSITION [x-a4,y] HEADING 0 SQUARE a6
POSITION [x+a4,y] HEADING 0 SQUARE a6
Esercizio 3
Esercizio 4
CLEARSCREEN
HOME
HIDETURTLE
PENUP
x=POSITION[0]
y=POSITION[0]
a=250
a2=a/2
a8=a/8
FILLCOLOR [“black”, “white”, 0, 90, 0] RECTANGLE [a, a2] ; "silver"
FILLCOLOR “gray” RECTANGLE [a-a8, a8]
Esercizio 5
Esercizio 6
CLEARSCREEN
HOME
HIDETURTLE
a=250
b=a/3.5
b2=b/2
z=b*SQRT(2)/2
x=POSITION[0]
y=POSITION[1]
PENUP
FILLCOLOR “gray” ; “black”
RECTANGLE [a, b]
RECTANGLE [b, a]
PENCOLOR “silver” ; i triangoli sono tutti uguali
FILLCOLOR “silver”
POSITION [x+b2,y-b2] POINT
POSITION [x+b2,y-b2-z] POINT
POSITION [x+b2+z,y-b2] POINT FILL
POSITION [x-b2,y-b2] POINT
POSITION [x-b2-b,y-b2] POINT
POSITION [x-b,y] POINT FILL
Esercizio 7
Esercizio 8
CLEARSCREEN
HOME
HIDETURTLE
PENUP
x=POSITION[0]
y=POSITION[1]
a=250
a2=a/2
a4=a/4
a6=a/6
a8=a/8
picture "ill_ott.svg" [
FILLCOLOR “black” POSITION [x-a4, y] HEADING 0 RECTANGLE [a2, a]
FILLCOLOR “white” POSITION [x+a4, y] HEADING 0 RECTANGLE [a2, a] ; "silver"
FILLCOLOR “gray” POSITION [x, y+a6] HEADING 0 RECTANGLE [a2, a2]
SLEEP 1000
FILLCOLOR “white” POSITION [x+a4, y] HEADING 0 RECTANGLE [a2, a] ; "silver"
FILLCOLOR “gray” POSITION [x+a8, y-a6] HEADING 0 RECTANGLE [a4, a2]
SLEEP 1000
]
Esercizio 9
Esercizio 10
CLEARSCREEN
HOME
HIDETURTLE
PENUP
x=POSITION[0]
y=POSITION[1]
a=250
a2=a/2
a3=a/3
a4=a/4
a6=a/6
picture "ill_ott.svg" [
FILLCOLOR “black” POSITION [x-a4, y] HEADING 0 RECTANGLE [a2, a]
FILLCOLOR “white” POSITION [x+a4, y] HEADING 0 RECTANGLE [a2, a] ; "silver"
FILLCOLOR “gray” POSITION [x, y+a6] HEADING 0 ELLIPSE [a2+a6, a2]
FILLCOLOR “black” POSITION [x, y+a6] HEADING 0 ELLIPSE [a6,a6, 180,360]
FILLCOLOR “white” POSITION [x, y+a6] HEADING 0 ELLIPSE [a6,a6, 0,180] ; "silver"
SLEEP 1000
FILLCOLOR “white” POSITION [x+a4, y] HEADING 0 RECTANGLE [a2, a] ; "silver"
FILLCOLOR “gray” POSITION [x, y-a6] HEADING 0 ELLIPSE [a2+a6, a2, 0,180]
FILLCOLOR “white” POSITION [x, y-a6] HEADING 0 ELLIPSE [a6,a6, 0,180] ; "silver"
SLEEP 1000
]
- Wikipedia > Optical illusions, riproduco alcune immagini presenti nella galleria.