I need help to make my pic move useing the keyboard!

[Darkmantis]

I've been useing this code in school and it works but for some reason it doesn't work for me at home. PLz help me!

setscreen ("graphics:400,400")
var x, y, button : int
var kp : string (1)
x := 100
y := 100
procedure drawcar
Pic.ScreenLoad ("car1.bmp", x - 10, y - 10, picMerge)
delay (10)
end drawcar

procedure erasecar
drawfilloval (x, y, 50, 50, white)
end erasecar

kp := "z"
drawcar

loop
if hasch then
getch (kp)
end if


if kp= KEY_RIGHT_ARROW then <--It says that the KEY_RIGHT_ARROW
x := x + 40___________________has not been declared
drawcar
end if
end loop

[beard0]

Your school has a more recent version of turing than you do. Instead of KEY_RIGHT_ARROW, which only got defined later on, use chr(205), and it will work. You can find this value and others in the help manual, under Turing Language -> Keystroke Codes.

[Darkmantis]

ok thanks a lot