Voici le code que je vais utiliser pour classer les vôtres :
deficalcul {
  ;On récupère juste le nom de l'alias pour $isalias
  var %alias $remove($gettok($$1-,1,40),$)
  ;On récupère le nom du fichier où se trouve l'alias
  var %fichier $isalias(%alias).fname
  ;On récupère la taille du fichier
  var %taille  $file(%fichier).size
  ;On stocke le $ticks actif
  var %ticks $ticks
  ;On exécute 100x l'ident

  var %a 1
  while (%a <= 100) {
    var %tmp $eval($$1-,2)
    inc %a
  }
  ;On calcule la durée de la boucle
  var %duree $calc($ticks - %ticks)

  ;Et on affiche tout ça
  echo -a -----------------------
  echo -a Résultat de l'ident : %tmp
  echo -a Taille : %taille
  echo -a Durée : %duree ms
  ;Le '#' est calculé avec la formule suivante : taille du fichier * durée de la bouche
  echo -a $+(,$chr(35)) : $calc(%taille * %duree)
  echo -a Plus '#' sera élevé moins vous aurez de chances de gagner...
  ;Le vainqueur sera déterminé grâce au '#'
  echo -a -----------------------
}