Curseurs Potentiomètre
NbPotar = floor(9999 (1 - ParamètreChemin(M)))
script Actu SoitValeur(NbCT,NbPotar)
NbCurs = 1000m + 100c + 10d + u
script Actu SoitValeur(M,Point(Trajet,1-NbCurs/9999))
SoitValeur(NbCT,NbCurs)
NbCT
script Actu SoitValeur(M,Point(Trajet,1-NbCT/9999))
SoitValeur(NL,TexteEnUnicode(Texte(NbCT)) - 48)
LanceScriptActu(NL4)
NL = TexteEnUnicode(Texte(NbPotar)) - 48
NL4 = Si(Longueur(NL) ≟ 1, Unir({{0, 0, 0}, NL}), Si(Longueur(NL) ≟ 2, Unir({{0, 0}, NL}), Si(Longueur(NL) ≟ 3, Unir({{0}, NL}), Si(Longueur(NL) ≟ 4, NL))))
script Actu SoitValeur(m,NL4(1))
SoitValeur(c,NL4(2))
SoitValeur(d,NL4(3))
SoitValeur(u,NL4(4))
SoitValeur(NbCurs,NbPotar)
SoitValeur(NbCurs,NbCT)