key pressed

on KeyDown

 

  put the keypressed

 

  Set lettreActive = the keypressed

 

 

  if lettreActive = "8" then

    go to "francais"

  end if

 

  if lettreActive = "5" then

    go to "anglais"

  end if

 

end 

 

position sourie

on idle

  put _mouse.mouseH

end

on enterFrame

 

  global mlocx  -- old mouse location data 

  global mlocxnew  -- new mouse location data  

  put the mouseh into mlocxnew 

  put the mouseh into mlocx

  --  mlocx=_mouse.mouseH