I am making a simple game that has an image of a track and an image of a car, everything works except the car goes under the track image when I want it to go over the image.
How do I solve this problem?
-Thanks
How do I solve this problem?
-Thanks
SetBuffer BackBuffer() While Not KeyHit(1) DrawImage track,0,0 If KeyDown(203) Then car_x=car_x-1*car_speed If KeyDown(205) Then car_x=car_x+1*car_speed If KeyDown(200) Then car_y=car_y-1*car_speed If KeyDown(208) Then car_y=car_y+1*car_speed If car_x>750 Then car_x=750 If car_x<0 Then car_x=0 If car_y>550 Then car_y=550 If car_y<0 Then car_y=0 If KeyDown(203) Then DrawImage car_west,car_x,car_y If KeyDown(205) Then DrawImage car_east,car_x,car_y If KeyDown(200) Then DrawImage car_north,car_x,car_y If KeyDown(208) Then DrawImage car_south,car_x,car_y Flip Cls Wend
SetBuffer BackBuffer() While Not KeyHit(1) DrawImage track,0,0 If KeyDown(203) :car_x=car_x-1*car_speed:carframe=car_west:endif If KeyDown(205) :car_x=car_x+1*car_speed:carframe=car_east:endif If KeyDown(200) :car_y=car_y-1*car_speed:carframe=car_north:endif If KeyDown(208) :car_y=car_y+1*car_speed:carframe=car_south:endif If car_x>750 Then car_x=750 If car_x<0 Then car_x=0 If car_y>550 Then car_y=550 If car_y<0 Then car_y=0 DrawImage carframe,car_x,car_y Flip Cls Wend
carframe=car_north
If KeyDown(203) and keydown(200) :car_x=car_x-1*car_speed:car_y=car_y-1*car_speed:carframe=car_southwest:endif If KeyDown(205) and keydown(200) :car_x=car_x+1*car_speed:car_y=car_y-1*car_speed:carframe=car_southeast:endif If KeyDown(203) and keydown(208) :car_x=car_x-1*car_speed:car_y=car_y+1*car_speed:carframe=car_northwest:endif If KeyDown(205) and keydown(208) :car_x=car_x+1*car_speed:car_y=car_y+1*car_speed:carframe=car_northeast:endif
carframe=car_north SetBuffer BackBuffer() While Not KeyHit(1) DrawImage track,0,0 If KeyDown(203) :car_x=car_x-1*car_speed:carframe=car_west:endif If KeyDown(205) :car_x=car_x+1*car_speed:carframe=car_east:endif If KeyDown(200) :car_y=car_y-1*car_speed:carframe=car_north:endif If KeyDown(208) :car_y=car_y+1*car_speed:carframe=car_south:endif If KeyDown(203) and keydown(200) :car_x=car_x-1*car_speed:car_y=car_y-1*car_speed:carframe=car_southwest:endif If KeyDown(205) and keydown(200) :car_x=car_x+1*car_speed:car_y=car_y-1*car_speed:carframe=car_southeast:endif If KeyDown(203) and keydown(208) :car_x=car_x-1*car_speed:car_y=car_y+1*car_speed:carframe=car_northwest:endif If KeyDown(205) and keydown(208) :car_x=car_x+1*car_speed:car_y=car_y+1*car_speed:carframe=car_northeast:endif If car_x>750 Then car_x=750 If car_x<0 Then car_x=0 If car_y>550 Then car_y=550 If car_y<0 Then car_y=0 DrawImage carframe,car_x,car_y Flip Cls Wend