Microsoft Small Basic

Program Listing:
Embed this in your website
Turtle.Show()
Graphicswindow.keydown = TurtleControl

Sub TurtleControl
If (GraphicsWindow.LastKey = "Left") Then
  Turtle.TurnLeft()
EndIf
If (GraphicsWindow.LastKey = "Right") Then
  Turtle.TurnRight()
EndIf
If (GraphicsWindow.LastKey = "Up") Then
  Turtle.Move(10)
EndIf
If (GraphicsWindow.LastKey = "Down") Then
  Turtle.Move(-10)
EndIf
EndSub
Copyright (c) Microsoft Corporation. All rights reserved.