Autolimit

Soyez le premier à donner votre avis sur cette source.

Snippet vu 2 920 fois - Téléchargée 27 fois

Contenu du snippet

Petit script permettant la modification du mode +l sur un salon, et ainsi d'eviter un afflux trop nombreux (et les attaques de clones). Utilisé sur #!pages_perso! (Voila)

Source / Exemple :


alias autolimit { 
  if ($me isop $1) {
    .set %al.chan $1
    enable #autolimit 
    .set %al.co $nick(%al.chan,0) + 2
.mode %al.chan +l %al.co } }

alias stoplimit { disable #autolimit
.mode %al.chan -l }

#autolimit off

ON *:JOIN:%al.chan: {
  if ($nick != $me) {
    /set %al.join on
    .timerjoin 1 15 .limitjoin
} }

ON *:PART:%al.chan: { 
  if ($nick != $me) {
    .timerjoin off
    .timerpart 1 2 .limitpart 
} }

ON *:QUIT:%al.chan: { 
  if ($nick != $me) {
    .timerjoin off
    .timerpart 1 2 .limitpart 
} }

ON *:KICK:%al.chan: { 
  .timerjoin off
  .timerpart 1 2 .limitpart
}

alias limitjoin {
  .set %al.co $nick(%al.chan,0) + 2
  .mode %al.chan +l %al.co
  .unset %al.join
}

alias limitpart {
  .set %al.co $nick(%al.chan,0) + 2
  .mode %al.chan +l %al.co
}
#autolimit end

Conclusion :


Il vous suffit de mettre le script dans vos remotes...
Lancement: /autolimit <salon>
Arret: /stoplimit

A voir également

Ajouter un commentaire

Commentaires

Messages postés
5
Date d'inscription
vendredi 14 novembre 2003
Statut
Membre
Dernière intervention
21 juin 2004

Sympas la source,thx c'est ce que je cherchais

Le sYstemE eSt Corrompu maiS c'Est sA DefInItioN
Messages postés
217
Date d'inscription
samedi 8 mars 2003
Statut
Membre
Dernière intervention
22 mai 2004

alors deja ton quit n'est pas bon
on 1:quit: {
...
}
mais deja tu ne pe pas mettre on 1:quit:#salon: {
sa n'existe pas et puis on a deja vu sa
Messages postés
1726
Date d'inscription
vendredi 12 septembre 2003
Statut
Membre
Dernière intervention
13 juin 2009
1
on 1:op:#:{ if ($opnick == $me) { timerl 1 2 mode # +l $calc($nick(#,0) + 4) } }
on @1:join:#:{ if ($nick != $me) { timerj 1 2 mode # +l $calc($nick(#,0) + 4) } }
on @1:part:#:{ if ($nick != $me) { timerp 1 2 mode # +l $calc($nick(#,0) + 3) } }
on @1:quit:{
if ($nick != $me) {
var %a = 1
while ($comchan($nick,%a)) {
if ($comchan($nick,%a).op) { timerq 1 2 mode $comchan($nick,%a) +l $calc($nick($comchan($nick,%a),0) + 3) }
inc %a
}
}
}
codé par WarDoWn, je trouve ce code bcp mieux car il est multichan/network et n'utilise pas de variable encombrantes.
Messages postés
817
Date d'inscription
mercredi 25 juin 2003
Statut
Membre
Dernière intervention
19 avril 2004

Essai de le rendre multichan et multinetwork.... l'idée est bonne... le scripting... 5/10
Messages postés
1025
Date d'inscription
vendredi 29 août 2003
Statut
Membre
Dernière intervention
28 mars 2005
2
Bonne idée mais ... déjà vu.
6/10

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.

Du même auteur (cs_KaZhaR)