Per 4 volte avanza di 100 pixel e gira a destra di 90°
1 2 3 4 5 6 7 8 |
Turtle.Move(175) Turtle.TurnRight() Turtle.Move(175) Turtle.TurnRight() Turtle.Move(175) Turtle.TurnRight() Turtle.Move(175) Turtle.TurnRight() |
Ripeti…
For … To …
Ripete 4 volte le prime due istruzioni precedenti
1 2 3 4 |
For lato=1 To 4 Turtle.Move(175) Turtle.TurnRight() EndFor |
Realizza la figura seguente
Aggiungi Turtle.Turn()…
Aggiungi GraphicsWindow.PenSize
1 2 3 4 5 6 7 8 9 10 11 |
GraphicsWindow.Height=GraphicsWindow.Width Turtle.Y =GraphicsWindow.Height/2 Turtle.Speed=10 For quadrato=1 To 8 GraphicsWindow.PenWidth=2*j For lato=1 To 4 Turtle.Move(175) Turtle.TurnRight() EndFor Turtle.Turn(45) EndFor |