GraphicsWindow.BackgroundColor= "LightYellow"
GraphicsWindow.PenColor = "Black"
angulo = 360 / 8
Turtle.Speed =10
For w=1 To 2
For z=1 To 9-w
Turtle.Turn(-90)
Turtle.Move(15)
Turtle.Turn(-45)
If w*z<>1 then
For i = 1 To 8
Turtle.Move(15)
Turtle.Turn(45)
EndFor
endif
Turtle.Turn(135)
Turtle.Move(15)
Turtle.Turn(-45)
For i = 1 To 8
Turtle.Move(15)
Turtle.Turn(45)
endfor