[..] Ranger par ordre croissant des nombre

[L4crymal]

J'aimerai svp avoir un script qui lit l'ensemble d'un fichier .txt qui contient 1 nombre à virgule par ligne.
Et qui les range par ordre croissant dans un autre fichier merci d'avance

[ani]

► Afficher le texte

Code : Tout sélectionner

#include <Array.au3>
#include <File.au3>
Dim $aSort
$Fichier = "E:\1.txt"
$Sortie = "E:\sort.txt"

If Not _FileReadToArray($Fichier,$aSort) Then
   MsgBox(4096,"Error", " Error reading txt to Array     error:" & @error)
   Exit
EndIf

; on retire le premier élèment (celui qui retourne le nbre de valeur dans le array position 0)
_ArrayDelete($aSort,0) 
_ArraySort($aSort) ; Rangement croissant (valeur 1 décroissant)
_ArrayDisplay($aSort) ; affiche le array (pas obligatoire)

; boucle sur le array & ecriture du fichier de sortie
For $x = 0 to UBound($aSort) - 1
    FileWriteLine($Sortie,$aSort[$x])
Next

bonne continuation

[Tlem]

Il y à aussi la possibilité de remplacer la dernière boucle par :

Code : Tout sélectionner

_FileWriteFromArray($Sortie, $aSort)

[L4crymal]

Merci vous assurez

MAIS GROS PROBLEME QUE VOIS-JE!!!

XD il y a un truc la qui va pas :s :

32.7822390834589
33.4058518610606
33.4520867875666
4.0982163934243
5.03080698803898
7.90589306741499

( extrait de la fin du log avec les chiffres )

[Tlem]

Effectivement, il y à un piège car la fonction trie Alphabétiquement et non numériquement.

L'astuce serait de convertir chaque nombre pour leur donner un format identique.
Il faudrait savoir si la partie entière de vos nombres se limite aux dizaines ou si on peut aller au delà ?

Le but du jeu sera de prendre chaque nombre au fur et à mesure de lui rajouter autant de zéros que nécessaire (avant) selon la taille du nombre le plus grand.

Imaginons que vos nombres ce limite aux centaines.
Donc :
7.90589306741499 deviendra 007.90589306741499
4.0982163934243 deviendra 004.0982163934243
33.4520867875666 deviendra 033.4520867875666
etc ...

Une fois le nombre modifié, il suffit de le remettre dans le tableau puis une fois le tableau complété, on peut le trier.

Edit :
Un truc dans le genre.

Code : Tout sélectionner

$nb = 7.90589306741499

$aVar1 = StringSplit($nb, ".")
$Res = StringRight("000" & $aVar1[1], 3) & "." & $aVar1[2]
MsgBox(0,"",$Res)

[L4crymal]

C'est un calcul de temps entre 2 traitement d'une requête TCP de mon serveur.

Donc comme c'est en millièmes de seconde, je peut dire que ça sera maximum 1 seconde, si c'est + d'une seconde le décompte du temps s'arrête et il y a une alerte pour signaler que le serveur ne répond plus ( bien foutu hein ^^ )