-----------------------------------

kasqit

Wed Jun 11, 2008 8:17 am


Moving a pic, plz help

-----------------------------------

I need help making a pic im using of a spaceship sprite to move witht he arrow keyes.  i know how to make a circle or box move, but not a pic.
this is how i make the circle move

var key : string (1)
var x, y : int
x := 100
y := 200
loop
    getch (key)
    cls
    if ord (key) = 200 then
        y := y + 5
        drawfilloval (x, y, 50, 50, black)
        delay (10)
    elsif ord (key) = 208 then
        y := y - 5
        drawfilloval (x, y, 50, 50, black)
        delay (10)
    elsif ord (key) = 205 then
        x := x + 5
        drawfilloval (x, y, 50, 50, black)
        delay (10)
    elsif ord (key) = 203 then
        x := x - 5
        drawfilloval (x, y, 50, 50, black)
        delay (10)
    end if
end loop

if someone could help me out by showing me how to make a picture move in place of the circle, that would be great, Thanks
 :vi: