Administrer !! commande /super basé sur /who

Contenu du snippet

Voila si vous etes LocOP Minimum d'un reseau et que vous desirez Tuer ou G:LIner desproxys en fureur qui join part des cannaux il y a une solution : /Super !

Cette commande utilise le /Who et le retransmet dans une fenetre ou vous pourez MassKILLER et MassGLINER en selectionnant nos amis les proxys ;-)

A utiliser sans modération contre les Flood3r ^^

Source / Exemple :


alias super {
  clear -l @Users
  clear @Users
  window -el25 @Users
  set %admin on
  //who
  //infoserver
}
raw 352:*: {
  if ( %admin == on ) {
    aline -l 8 @Users 0,2 $6 8( $+ $4 $+ )
  }
}
raw 315:*: {
  /.timer 1 3 aline @Users Il y as $line(@users,0,2) utilisateurs
  unset %admin
}
menu @Users {
  dclick {
    query $gettok($sline(@Users,1),2,32)
  }
}
alias admin_stop {
  .close @Users
}
menu @Users {
  Reload:/Super
  -
  Kill/GLine
  .Kill:/killalls
  .-
  .GLiner 1 seconde: {
    UNSET %rgline
    set %rgline $$?="Pour quelle raison ?"
    //glinealls %rgline
    set %tgline 1
  }
  .GLiner 1 Minute: {
    UNSET %rgline
    set %rgline $$?="Pour quelle raison ?"
    //glinealls %rgline
    set %tgline 60
  }
  .GLiner 5 Minutes: {
    UNSET %rgline
    set %rgline $$?="Pour quelle raison ?"
    //glinealls %rgline
    set %tgline 300
  }
  .GLiner 15 Minutes: {
    UNSET %rgline
    set %rgline $$?="Pour quelle raison ?"
    //glinealls %rgline
    set %tgline 900
  }
  .GLiner 30 Minutes: {
    UNSET %rgline
    set %rgline $$?="Pour quelle raison ?"
    //glinealls %rgline
    set %tgline 1800
  }
  .GLiner 1 Heure: {
    UNSET %rgline
    set %rgline $$?="Pour quelle raison ?"
    //glinealls %rgline
    set %tgline 3600
  }
  .GLiner 1 Jour: {
    UNSET %rgline
    set %rgline $$?="Pour quelle raison ?"
    //glinealls %rgline
    set %tgline 86400
  }
  .-
  .GLiner 1 Semaine: {
    UNSET %rgline
    set %rgline $$?="Pour quelle raison ?"
    //glinealls %rgline
    set %tgline 604800
  }
  .GLiner 1 Mois: {
    UNSET %rgline
    set %rgline $$?="Pour quelle raison ?"
    //glinealls %rgline
    set %tgline 2592000
  }
  .GLiner infiniment: {
    UNSET %rgline
    set %rgline $$?="Pour quelle raison ?"
    //glinealls %rgline
    set %tgline 0
  }
  CTCPs
  .Version:/ctcp $gettok($sline(@Users,1),2,32) version
  .Heure:/ctcp $gettok($sline(@Users,1),2,32) time
  .Ping:/ctcp $gettok($sline(@Users,1),2,32) ping
  .Finger:/ctcp $gettok($sline(@Users,1),2,32) finger
  -
  Envoyer une notice:/notice $gettok($sline(@Users,1),2,32) $$?="Quel message lui envoyer ?"
  Whois:/whois $gettok($sline(@Users,1),2,32)
  Ouvir un privé:/query $gettok($sline(@Users,1),2,32)
  -
  Kill: { 
    killalls
  }
}
alias killalls {
  set %1.1 0
  set %2.2 $sline(@Users,0)
  if ( %2.2 > 0 ) {
    set %3.3 on
    while ( %3.3 == on ) {
      inc %1.1
      /.timer 1 1 /.kill $gettok($sline(@Users,%1.1),2,32) Super command by $me
      if ( %1.1 == %2.2 ) {
        unset %3.3
        //.timer 1 3 //super
      }
    }
  }
}
alias glinealls {
  set %1.1 0
  set %2.2 $sline(@Users,0)
  if ( %2.2 > 0 ) {
    set %3.3 on
    while ( %3.3 == on ) {
      inc %1.1
      /.timer 1 1 /.gline $gettok($sline(@Users,%1.1),2,32) %tgline :Super command by $me ( $+ %rgline $+ )
      if ( %1.1 == %2.2 ) {
        unset %3.3
        //.timer 1 3 //super
      }
    }
  }
}

Conclusion :


SYNTAXE : /SUPER

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.