Program SpaceShip2
	
	Method Main()
		
		Var X As Int
		Var Y As Int
		
		Clear(8)	
		
		LoadSprite("ship", "enemyship1.gif" )
		MoveSpriteToPoint("ship" , 50 , 50)
		RotateSprite("ship", 90)
		ShowSprite("ship")
		
		While IsKeyDown( "escape") = False
		
			If IsKeyDown( "Right" ) Then
				X = X + 2
				PlaySound("Missile.wav")
			End If
			
			If IsKeyDown( "Left" ) Then
				X = X - 2
				PlaySound("Missile.wav")
			End If
	
			If IsKeyDown( "Up" ) Then
				Y = Y - 2
				PlaySound("Missile.wav")
			End If
				
			If IsKeyDown( "Down" ) Then
				Y = Y + 2
				PlaySound("Missile.wav")
			End If
	
			MoveSpriteToPoint("ship" , X , Y)
			Delay(10)
		End While
	End Method

End Program