Scanner de host / banlist en echo / stats chan

Contenu du snippet

3 Alias qui peuvent etre bien pratique

- Permet la recherche d'un host en particulier
- Donne la banlist en echo
- Effectue un "rapport" du salon actif et met en echo les modes / topic etc ...

Source / Exemple :


Menu channel { 
  Scanner
  .Scanner de host:/scanhost $chan $$?="Host a scanner ? (*!*@host.domaine) :"
  .Banliste de $chan:/banliste $chan
  .Informations $chan:/rapport $chan
}

alias scanhost {
  if ( $2 == $null ) { /perso Utilise /scanhost #Salon *!*@host ! | halt }
  /var %scanhost.chan = $1
  /var %scanhost.host = $2
  /var %i = 1
  /escan Scan-host sur %scanhost.chan
  if ( $ialchan(%scanhost.host,%scanhost.chan,0) == 0 ) || ( $ialchan(%scanhost.host,%scanhost.chan,0) == $null ) {
    /escan Host_cherché4 %scanhost.host
    /escan Host Aucun host correspondant à %scanhost.host
    goto finscanhost
  }
  /escan Host cherché :4 %scanhost.host
  :bouclescanhost
  if ( $ialchan(%scanhost.host,%scanhost.chan,0) >= %i ) {
    /escan Host_n° $+ %i $+  $ialchan(%scanhost.host,%scanhost.chan,%i)
    inc %i 1
    goto bouclescanhost
  }
  :finscanhost
  /escan Fin Scan-host
  unset %i
  unset %scanhost.chan
  unset %scanhost.host
}

alias banliste {
  if ( $1 == $null ) { /perso Utilise /banliste #Salon | /halt }
  set %chan.ban $1
  set %i 1
  /eban Ban-liste sur %chan.ban
  if ( $ibl(%chan.ban,0) == $null ) || ( $ibl(%chan.ban,0) == 0 ) {
    /eban Ban Aucun ban mis pour %chan.ban
    goto finbanliste
  }
  :bouclebanliste
  /eban Ban_n° $+ %i $ibl(%chan.ban,%i) $ibl(%chan.ban,%i).by $ibl(%chan.ban,%i).date
  inc %i 1
  if ( %i <= $ibl(%chan.ban,0) ) { goto bouclebanliste }
  :finbanliste
  /eban Fin Ban-liste
  unset %i
  unset %chan.ban
}

alias rapport {
  if ( $1 == $null ) { /perso Utilise /rapport #Salon | /halt }
  set %rapport.chan $1
  /salon Rapport pour : 1 $+ %rapport.chan
  /salon Nom : 1 $+ %rapport.chan
  if ( $chan(%rapport.chan).topic == $null ) { /salon Topic :1 Aucun }
  else { /salon Topic :1 $chan(%rapport.chan).topic }
  if ( $chan(%rapport.chan).mode == $null ) { /salon Mode :1Aucun }
  else { /salon Mode :1 $chan(%rapport.chan).mode }
  /salon Ops :12 $opnick(%rapport.chan,0) $+ @
  /salon Voices :3 $vnick(%rapport.chan,0) $+ +
  /salon Users :1 $nick(%rapport.chan,0)
  /salon Fin du rapport
  unset %rapport.chan
}

Alias escan { echo 10 -a $timestamp [ Scanner ]1 $1- }
Alias eban { echo 14 -a $timestamp [ Banlist ]1 $1- }
Alias salon { echo 6 -a $timestamp [ Informations ]  $+ $$1- }

Conclusion :


A vous de voir =)

A voir également

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.