Microsoft Small Basic

Program Listing: QXR430
Turtle.Speed = 9
DrawHouse()

Sub DrawHouse
For i=1 To 4
Turtle.TurnRight()
Turtle.Move(100)
EndFor
Turtle.Turn(30)
Turtle.Move(100)
Turtle.Turn(120)
Turtle.Move(100)
EndSub