Auto ( op,kick,voice,limit) by w4x

Soyez le premier à donner votre avis sur cette source.

Snippet vu 4 473 fois - Téléchargée 16 fois

Contenu du snippet

~~~~~~~~~~~~~~~~~~~~~~~~
~~~~~~ AutoOvKL ~~~~~~
~~~~~~~~~~~~~~~~~~~~~~~~
;Un Auto Op,Kick,Voice,Limit On peut l'ouvrir /AutoOvKL
;By w4x

alias AutoOvKL dialog -m auto auto
dialog Auto {
title "- Auto - /AutoOvKL"
size -1 -1 213 82
option dbu
button "Tout Désactiver", 1, 85 55 50 12
button "Désactiver", 2, 10 33 37 12
button "Activer", 3, 10 16 37 12
box "AutoOp", 4, 4 4 50 50
box "AutoVoice", 5, 56 4 50 50
button "Désactiver", 6, 62 33 37 12
button "Activer", 7, 62 16 37 12
box "AutoKick", 8, 108 4 50 50
button "Désactiver", 9, 114 33 37 12
button "Activer", 10, 114 16 37 12
text "Auteur: w4x", 11, 159 72 33 8
button "Ok", 12, 91 68 37 10, ok cancel
box "AutoLimit", 14, 160 4 50 50
button "Activer", 15, 166 16 37 12
button "Désactiver", 16, 166 33 37 12
}
on *:Dialog:Auto:sclick:*:{
if ($did = 3) { set %AutoOp $$?="Salon a AutoOp" | Unset %AutoVoice | Unset %AutoKick | echo -a AutoOp a Bien été activé sur %AutoOp }
if ($did = 2) { unset %AutoOp }
if ($did = 7) { set %AutoVoice $$?="Salon a AutoVoice" | unset %AutoKick | unset %AutoOp | echo -a AutoVoice a Bien été activé sur %AutoVoice }
if ($did = 6) { unset %AutoVoice }
if ($did = 10) { set %AutoKick $$?="Salon a AutoKick" | unset %AutoOp | unset %AutoVoice | echo -a AutoKick a Bien été activé sur %AutoKick }
if ($did = 9) { unset %AutoKick }
if ($did = 1) { unset %AutoKick | Unset %Autolimit | Unset %AutoVoice | Unset %AutoOp | Echo -a AutoOvKL Entierement desactivé . }
if ($did = 15) { Set %Autolimit $$?="Salon a AutoLimit" | Echo -a AutoLimit Activé. }
if ($did = 16) { mode %Autolimit -l | unset %Autolimit | echo -a AutoLimit a été Desactivé . }
}
On *:Join:%AutoVoice: {
.Mode %AutoVoice +v $nick
}
On *:Join:%AutoOp: {
.mode %autoOp +o $nick
}
On *:Join:%AutoKick: {
.kick %AutoKick $nick %version
}
on *:join:%AutoLimit:{
if ($me isop $chan) { .timer 1 5 mode %Autolimit +l $calc($nick($chan,0) + 2) }
}
on *:part:%Autolimit:{
if ($me isop $chan) { .timer 1 5 mode %Autolimit +l $calc($nick($chan,0) + 2) }
}

Source / Exemple :


.

Conclusion :


Soyez Pas trop dure c'est un de mes premier codes .

A voir également

Ajouter un commentaire Commentaires
Messages postés
12
Date d'inscription
dimanche 23 mars 2008
Statut
Membre
Dernière intervention
1 juillet 2008

oué déjà je regrette d'avoir poser cette source et les 2 autres c'etait mais tous premier codes donc un peut fier je m'en excuse d'avoir posé ces horreur =o
Messages postés
44
Date d'inscription
lundi 24 septembre 2007
Statut
Membre
Dernière intervention
17 avril 2009

Si dix personnes quittent le salon en peu de temps, le mode +l ne sera pas mis à jour..? Il y aura donc 10 places de plus pour des clones..
Sinon c'est regrettable que l'autoop et l'autovoice ne soient pas gérés par une liste.
Et pour l'autokick, si la personne change de pseudo, c'est fini.. ^^
Enfin bon.. 1er code que W4x a du coder seul..sans rien riper... il mérite bien un 1.
Messages postés
1466
Date d'inscription
mardi 20 février 2007
Statut
Membre
Dernière intervention
7 février 2011
1
Pourquoi on ne serait pas dur ? Tu fais chier pas mal de serveurs (je pense notamment a Epiknet, DiscuT, Voila) avec tes attaques de proxies à la con...

Sinon au niveau du code, tu peux regrouper en un seul on *:join.
Remplace tes if par des elseif, et sache (même si on s'en fout) que lorsqu'il n'y a qu'une instruction, les { } ne sont pas obligatoires.
Ainsi, "if ($did = 9) unset %AutoKick" marche très bien (ce n'est qu'un détail).
Voila :)
Messages postés
1804
Date d'inscription
mardi 15 juillet 2003
Statut
Membre
Dernière intervention
22 septembre 2009
5
J'y pense j'y pense... J'vais finir par me mettre IE7 si ca continue. :'(
Messages postés
2466
Date d'inscription
vendredi 23 juillet 2004
Statut
Membre
Dernière intervention
1 août 2010
1
Moi Pada, je te conseille de résoudre tes problèmes d'accents :p
Afficher les 7 commentaires

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.