Esercizi con la grafica della tartaruga: FORWARD, HEADING
Esercizio 1
n=500 ; numero tratti
lunghezza=300 ; lunghezza massima
;--------------------------------------------------------------
CLEARSCREEN ; pagina bianca
HOME ; posizione centrale
HIDETURTLE ; senza tartaruga
PENSIZE 5 ; spessore del tratto
;--------------------------------------------------------------
REPEAT n [ ; ripeti n volte
PENUP HOME PENDOWN ; posizione iniziale
HEADING ANY ; direzione a caso
PENCOLOR ANY ; colore a caso
FORWARD RANDOM(lunghezza) ; lunghezza a caso
]
I raggi più lunghi nascondono quelli più corti precedenti.
Esercizio 2
Se il raggio è decrescente non succede più
n=500 ; numero tratti
lunghezza=300 ; lunghezza del 1° tratto
;--------------------------------------------------------------
CLEARSCREEN ; pagina bianca
HOME ; posizione centrale
HIDETURTLE ; senza tartaruga
PENSIZE 5 ; spessore del tratto
;--------------------------------------------------------------
REPEAT n [ ; ripeti n volte
PENUP HOME PENDOWN ; posizione iniziale
HEADING ANY ; direzione a caso
PENCOLOR ANY ; colore a caso
FORWARD lunghezza ; tratto colorato
lunghezza=lunghezza-0.5 ; il prossimo tratto sarà più corto
]
Esercizio 3
n=200 ; meno tratti
lunghezza=300
;--------------------------------------------------------------
CLEARSCREEN
HOME
HIDETURTLE
PENSIZE 5
;--------------------------------------------------------------
REPEAT n [
PENUP
HOME
PENDOWN
HEADING ANY
PENCOLOR ANY
FORWARD lunghezza
CIRCLE 5 ; le punte
lunghezza=lunghezza-1 ; tratti più corti
]
Esercizio 4
n=100 ; numero tratti minore
lunghezza=300
;--------------------------------------------------------------
CLEARSCREEN
HOME
HIDETURTLE
PENSIZE 25 ; spessore del tratto maggiore
;--------------------------------------------------------------
REPEAT n [
PENUP
HOME
PENDOWN
HEADING ANY
PENCOLOR ANY
PENTRANSPARENCY 50 ; la trasparenza rallenta il codice
FORWARD lunghezza
lunghezza=lunghezza-2 ; il prossimo tratto sarà più corto
]
Esercizio 5
Senza la trasparenza
Esercizio 6
Continua…
n=200
distanza=300
dimensione=5
;--------------------------------
CLEARSCREEN
HOME
HIDETURTLE
PENUP
;--------------------------------
REPEAT n [
HOME
HEADING ANY
FORWARD distanza
FILLCOLOR ANY
FILLTRANSPARENCY 75
CIRCLE dimensione
distanza=distanza-1
dimensione=dimensione+1
]
Esercizio 7
Esercizio 8
…