slow runtime...

hi, thanks for replying... here is the code

Graphics 1024,768

mamma1=LoadImage("mamma1.jpg")
mamma2=LoadImage("mamma2.jpg")
mamma3=LoadImage("mamma3.jpg")
natur=LoadPixmap("natur.jpg")

playerx#=512
playery#=600

While Not KeyHit(KEY_ESCAPE)

'playernm=playernm

Cls

' SetColor (0,25,255)

' DrawText ("Welcome to my game!",0,750)
' DrawText ("" + playernm$,0,730 )

If KeyDown(KEY_UP)
playery=playery-5
' playernm=playernm+1
EndIf

If KeyDown(KEY_DOWN)
playery=playery+5
' playernm=playernm+1
EndIf

If KeyDown(KEY_LEFT)
playerx=playerx-5
' playernm=playernm+1
EndIf

If KeyDown(KEY_RIGHT)
playerx=playerx+5
' playernm=playernm+1
EndIf

If playerx > 960
playerx = 960
EndIf

If playerx < 0
playerx = 0
EndIf

' DrawPixmap natur,0,0

DrawImage mamma3,playerx,playery

Flip

Wend


End