All pastes #2098722 Raw Edit

Mine

public text v1 · immutable
#2098722 ·published 2012-01-03 19:52 UTC
rendered paste body
;======================================;
; Gestion des connexions Eva Services
; par Raptor pour irc.olympe-fr.net
;======================================;


on 1:LOAD:{ 
  set %Eva.Nick $?="Pseudo Eva Service:"
  set %Eva.Chan $?="Salon Eva Service:"
}

on 1:TEXT:*:%Eva.Chan: {
  if ($nick == %Eva.Nick) {
    if ($1 == 03Connexion) {
      window -el15k[N] @NickList
      anick $3
      echo @nicklist $timestamp * Connexion $3 $4
      .timer.NickList. $+ $3 1 500 dnick $3
    }
    if ($1 == 03Déconnexion) && ($fline(@NickList,$3,1,1) != $null) {
      dnick $3
      echo @NickList $timestamp * Déconnexion $3 
      .timer.NickList. $+ $3 off
    }
    if ($1 == 03Kill) && ($fline(@NickList,$3,1,1) != $null) {
      dnick $3
      .timer.NickList. $+ $3 off
    }
    if ($1 == 03Nick) && ($fline(@NickList,$3,1,1) != $null) {
      echo @NickList $timestamp * $3 change son pseudo en $8
      .timer.NickList. $+ $3 off
      dnick $3
      anick $8   
      .timer.NickList. $+ $8 1 500 dnick $8
    }
  }
}

alias dnick { dline -l @NickList $fline(@NickList,$1,1,1) }
alias anick { aline -l @NickList $1 }
menu @NickList {
  Whois:/whois $1
  -
  Notice:/notice $1 $?=""
  Query:/query $1
  -
  Gline:/gline $* :Déconnexion forcée par l'administrateur pour une durée indéterminée en raison de non repect de la charte.
  Kill:/kill $* Déconnexion forcée par l'administrateur en raison de non repect de la charte.
}