Kayso, I am doing a culminating activity for computer programming and the object of the game is to move the ball around and to avoid the edges, and if you hit an edge you lose a life, but every time i run my program and hit an edge it automatically goes 3 to 2 to 1 then to you died, but i don't know what i am doing wrong and i would like help with this, so i would like my program to minus a life every time you hit an edge then let the user keep playing
var x : int
var y : int
x := 100
y := 100
var xspeed : int
var yspeed : int
xspeed := 0
yspeed := 0
var life : int
life := 3
var keys : array char of boolean
%Controls
loop
Input.KeyDown (keys)
if keys (KEY_UP_ARROW) and yspeed < 5 then
yspeed += 1
end if
if keys (KEY_DOWN_ARROW) and yspeed > -5 then
yspeed -= 1
end if
if keys (KEY_LEFT_ARROW) and xspeed > -5 then
xspeed -= 1
end if
if keys (KEY_RIGHT_ARROW) and xspeed < 5 then
xspeed += 1
end if
%If you crash
if y >= 400 or y <= 0 then
locatexy (300, 20)
put "you crashed"
end if
if x >= 639 or x <= 0 then
put "you crashed"
end if
y += yspeed
x += xspeed
%Ball
Draw.FillOval (x, y, 10, 10, red)
delay (10)
cls
%Life Counter
if y >= 400 or y <= 0 then
life -= 1
Text.Locate (1, 1)
colour (purple)
put "You Only Have ", life, " Lives Left
"
delay (200)
end if
if x >= 639 or x <= 0 then
life -= 1
Text.Locate (1, 1)
colour (purple)
put "You Only Have ", life, " Lives Left
"
delay (200)
end if
%If you have 0 lifes left
if life = 0
then
put "You Have Died!"
Input.Pause
exit
end if
end loop
but one thing as soon as i crash it starts as soon as you crash, so what do i do there??