Jeu de course à clics

label start,time,avancher
dim i,k,j

height 0,400
color 0,255,100,0
caption 0,"Jeu de course"

picture 1
left 1,5
top 1,20
width 1,50
height 1,50
color 1,100,0,255
2d_target_is 1
print_target_is 1:2d_fill_color 100,0,255
font_size 1,30:print_locate 15,3
print "1"

picture 2
left 2,5
top 2,100
width 2,50
height 2,50
color 2,100,0,255
2d_target_is 2
print_target_is 2:2d_fill_color 100,0,255
font_size 2,30:print_locate 15,3
print "2"

button 3
left 3,5
top 3,336
caption 3,"Start"
on_click 3,start

timer 4

j=100
for i=5 to 7
  option i:left i,j:top i,338:color i,255,100,0:j=j+100
next i
caption 5,"Facile":caption 6,"Moyen":caption 7,"Dificile":mark_on 5

end

start:
left 1,5:left 2,5
if checked(5)=1 then timer_interval 4,500
if checked(6)=1 then timer_interval 4,400
if checked(7)=1 then timer_interval 4,250
if k=0
  on_timer 4,time
else
  timer_on 4
end_if
on_click 0,avancher
on_click 1,avancher:on_click 2,avancher
return

time:
left 2,left(2)+10
if left(2)>526 then timer_off 4:message "Vous avez perdu!":k=1
return

avancher:
left 1,left(1)+10
if left(1)>526 then timer_off 4:message "Vous avez gagner!":k=1
return