Spirali

Con un algoritmo molto semplice puoi sperimentare e ottenere immagini molto interessanti

ANGOLO=...   ' di quanto gira?
VOLTE =...   ' quante volte?  
passo =...   ' di quanto avanza?
DELTA =...   ' di quanto aumenta il passo?

GraphicsWindow.Height=GraphicsWindow.Width
GraphicsWindow.PenWidth=1
Turtle.Y=GraphicsWindow.Height/2
Turtle.Speed=10

For i=1 To VOLTE
   Turtle.Move(passo)
   Turtle.Turn(ANGOLO)
   passo=passo+DELTA
EndFor

Alcune idee

ANGOLO=45
VOLTE =200
passo =5
DELTA =1

ANGOLO=60
VOLTE =250
passo =5
DELTA =1

ANGOLO=90
VOLTE =100
passo =5
DELTA =5

ANGOLO=91
VOLTE =200
passo =5
DELTA =2

ANGOLO=120
VOLTE =100
passo =10
DELTA =5

ANGOLO=121
VOLTE =300
passo =10
DELTA =1.5

ANGOLO=135
VOLTE =100
passo =5 
DELTA =5

ANGOLO=152
VOLTE =250
passo =5
DELTA =2

ANGOLO=175
VOLTE =500
passo =5 
DELTA =1

ANGOLO=181
VOLTE =500
passo =5
DELTA =1

---

A colori!

GraphicsWindow.PenColor=GraphicsWindow.GetRandomColor()