Microsoft Small Basic

Program Listing: MWZ966
'Launch of Intro to Coding by Jil Hrdliczka
'for Knowledge Network mentors in South Africa
'April to June 2018
'Awesome turtle - huge fun!
GraphicsWindow.BackgroundColor = "Black"
GraphicsWindow.Height = 600
GraphicsWindow.Width = 600
Turtle.Show()
Turtle.Speed = 10
Turtle.X = 300
Turtle.Y = 300
maxlinelength = 500
angle = 185
incrlinelength = 5
For length = 0 to maxlinelength Step incrlinelength
GraphicsWindow.PenColor = GraphicsWindow.GetRandomColor()
Turtle.Move(length)
Turtle.Turn(angle)
EndFor
Program.Delay(10000)
Program.End()