Linee che ruotano intorno a un punto
Turtle.Speed=10 numero =100 lunghezza=180 angolo =360/numero For i=1 To numero+1 Turtle.PenDown() Turtle.Move(lunghezza) Turtle.PenUp() Turtle.Move(-lunghezza) Turtle.Turn(angolo) EndFor
Se la lunghezza è crescente…
Turtle.Speed=10 Turtle.TurnRight() numero =100 angolo =360/numero lungMax =220 lungDelta=lungMax/numero lunghezza=10 For i=1 To numero+1 Turtle.PenDown() Turtle.Move(lunghezza) Turtle.PenUp() Turtle.Move(-lunghezza) lunghezza=lunghezza+lungDelta Turtle.Turn(angolo) EndFor
Se le linee partono da più punti…