home *** CD-ROM | disk | FTP | other *** search
/ Mobiclic 41 / MOBICLIC41.ISO / pc / Data / COMMUNS / GENERIC.DIR / 00032_Script_32 < prev    next >
Text File  |  2002-02-07  |  828b  |  39 lines
  1. on startMovie
  2.   if the machineType=256 then
  3.     set the lineHeight of field "gen" to 17
  4.   end if
  5.   set the traceLogFile=""
  6. end startMovie
  7.  
  8. on temporise t
  9.   set t=60*t
  10.   startTimer
  11.   repeat while the timer<t
  12.     updateStage
  13.   end repeat
  14. end temporise
  15.  
  16. -- neutralisation de la touche echap
  17. on keyDown
  18.   if the keyCode=53 then
  19.     nothing
  20.   else
  21.     pass
  22.   end if
  23. end
  24.  
  25.  
  26. --on desinstall
  27. --  Mob = field "MobEnCours"
  28. --  if the machineType = 256 then
  29. --    dossier = baSysFolder("windows") & "MilanPresse\Mobiclic\" & Mob & "\Temp\"
  30. --  else
  31. --    dossier = baSysFolder("prefs") & "MilanPresse:Mobiclic:" & Mob & ":Temp:"
  32. --  end if
  33. --  L = baFileList(dossier,"*.*")
  34. --  if count(L)<>0 then
  35. --    repeat with i=1 to count(L)
  36. --      baDeleteFile(dossier & L[i])
  37. --    end repeat
  38. --  end if
  39. --end