alias users {

  ; sauvegarde les paramètres actuel
  ; de mIRC dans les fichiers ini
  ; correspondant (donc la userlist)

  .saveini

  ; boucle lisant tous les users de la liste

  var %inc.line = 0 | while ($readini($usersdir,users,n $+ %inc.line)) {

    ; vérifie les conditions initiales :
    ; si une recherche spécifique est
    ; demandée appelle l'identifieur
    ; ulevel sinon renvoie tous les
    ; users à la commande spécifiée


  %tmp = $ifmatch | if ($2) { [ $ $+ [ ulevel $+ ( $2 , %tmp , $3 , $1 ) ] ] } | else { $1 %tmp } | inc %inc.line }

  ; [ $ $+ [ ulevel $+ ( $2 , %tmp , $3 , $1 ) ] ]
  ; peut vous paraitre barbare,
  ; en faite cela permet d'appeler
  ; la fonction $ulevel

  ; par exemple si la commande souhaitée
  ; est 'echo -a' le level '10' et l'opérateur '<='
  ; et la ligne du user en cours de
  ; lecture ExeptFlood:*!*@service*

  ; soit la commande $users(echo -a,10,<=)

  ; cette ligne renvera
  ; $ulevel( 10 , ExeptFlood:*!*@service* , <= , echo -a )

  ; les [ ] exterme permette d'évaluer la
  ; fonction $ulevel et ceux a l'intérieur
  ; d'évaluer les paramètres $* et variables %*



  halt
}

; note : j'appelle un identifieur pour vous
; apprendre à le faire, tout est faisable
; dans le meme alias



alias -l ulevel {
  ; verifie qu'un opérateur est spécifié si
  ;oui la variable %operator prend sa
  ; valeur si non, la variable prend la valeur '=='


  %operator = $iif($3,$3,==)

  ; verifie que la comparaison level
  ; spécifié - level du user en cours est
  ; vrai si oui renvoie le user à la
  ; commande spécifiée dans le $users


  if ($gettok($2,1,58) %operator $1) { $4 $gettok($2,2,58) }

  ; return est nécessaire pour continuer
  ; le traitement du while de l'alias users


  return
}

; identifieur renvoyant le chemin du
; fichier ou se trouve les users
alias usersdir { return $readini($mircini,rfiles,n0) }