1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30
|
// On évite de faire des -1 -2 -3... si le temps n'a pas encore été calculé
SI Lib_Temps_restant <> "" ET Lib_Temps_restant <> "Calcul du temps restant....." ALORS
// Gestion de l'arrivage à 0, pour évité les -1, -2...
SI ExtraitChaîne(Lib_Temps_restant, 2, ":") = "0" OU ExtraitChaîne(Lib_Temps_restant, 2, ":") = "00" ALORS
SI Val(ExtraitChaîne(Lib_Temps_restant, 1, ":")) = 0 ALORS
Lib_Temps_restant = "0:00"
SINON
Lib_Temps_restant = Val(ExtraitChaîne(Lib_Temps_restant, 1, ":"))-1 + ":59"
FIN
SINON
// On réduit d'une seconde le temps restant
SI (Val(ExtraitChaîne(Lib_Temps_restant, 2, ":"))-1) >= 0 ET (Val(ExtraitChaîne(Lib_Temps_restant, 2, ":"))-1) <= 9 ALORS
Lib_Temps_restant = ExtraitChaîne(Lib_Temps_restant, 1, ":") + ":0" + (Val(ExtraitChaîne(Lib_Temps_restant, 2, ":"))-1)
SINON
Lib_Temps_restant = ExtraitChaîne(Lib_Temps_restant, 1, ":") + ":" + (Val(ExtraitChaîne(Lib_Temps_restant, 2, ":"))-1)
FIN
FIN
SINON
Lib_Temps_restant = "Calcul du temps restant....."
FIN
Goo++
// Toutes les 5 secondes on recalcule le temps restant
SI Goo >= 5 ALORS
AfficheTemps()
Goo = 0
FIN |
Partager