Protection anti flood personelles (v2)
Soyez le premier à donner votre avis sur cette source.
Snippet vu 8 712 fois - Téléchargée 27 fois
Contenu du snippet
C'est pratiquement la meme que mon ancien code sauf que je l'ai quelque peu remanier.
J'ai ajouter, comme suggérer, une possibilité de mettre les pseudo que vous voulez ignorer, ce qui peut etre pratique je l'avoue =)
Bref, a vous de voir :)
- Le 8 Juillet : Correction de l'erreur sur l'events on *:notice:
Une seule chose que je n'ai pas faite :
Il faut placer un fichier appelé "Pseudo.txt" (vide) a la racine de votre script.
Voila voila =)
J'ai ajouter, comme suggérer, une possibilité de mettre les pseudo que vous voulez ignorer, ce qui peut etre pratique je l'avoue =)
Bref, a vous de voir :)
- Le 8 Juillet : Correction de l'erreur sur l'events on *:notice:
Source / Exemple :
Menu menubar,channel,query {
-
Protections Perso:/dialog -m protect protect
}
dialog protect {
title "Protection - Looser !"
size -1 -1 170 108
option dbu
tab "Flood Pvs / Notices", 1, 2 0 165 91
box "Flood Pvs :", 2, 7 16 72 69, tab 1
box "Flood Notices :", 3, 81 16 80 69, tab 1
check "Activé", 4, 12 73 50 10, tab 1
text "Nombre max de Pvs :", 5, 10 25 53 8, tab 1
edit "", 6, 65 24 10 10, tab 1
text "Nombre de Notice :", 7, 85 25 48 8, tab 1
edit "", 8, 147 24 10 10, tab 1
text "Limite de temps (sec) :", 9, 85 37 56 8, tab 1
check "Activé", 11, 86 73 50 10, tab 1
edit "", 10, 147 36 10 10, tab 1
tab "Flood CTCP / Invitations", 12
box "Flood CTCP :", 13, 8 16 71 69, tab 12
box "Flood Invitations :", 14, 81 16 80 69, tab 12
text "Nombre de CTCP :", 15, 11 25 46 8, tab 12
edit "", 16, 66 24 10 10, tab 12
text "Limite de temps (sec) :", 17, 11 37 54 8, tab 12
check "Activé", 19, 12 73 50 10, tab 12
text "Nombre d'invitations :", 20, 85 25 53 8, tab 12
edit "", 21, 148 24 10 10, tab 12
text "Limite de temps (sec) :", 22, 85 37 58 8, tab 12
edit "", 23, 148 36 10 10, tab 12
check "Activé", 24, 86 73 50 10, tab 12
edit "", 18, 66 36 10 10, tab 12
tab "Divers", 25
box "Flood DCCs :", 26, 8 16 78 69, tab 25
text "Nombre de DCCs :", 27, 12 26 46 8, tab 25
edit "", 28, 73 25 10 10, tab 25
text "Limite de temps (sec) :", 29, 12 37 54 8, tab 25
edit "", 30, 73 36 10 10, tab 25
check "Activé", 31, 12 72 50 10, tab 25
text "Temps général d'ignore :", 33, 92 20 64 8, tab 25
edit "", 34, 92 30 20 10, tab 25 limit 15
text "secondes.", 35, 114 31 25 8, tab 25
button "Pseudo", 36, 93 44 21 10, tab 25
text "Pseudo a ignoré", 37, 118 45 42 8, tab 25
button "Valider", 32, 131 94 37 12, ok
}
on *:dialog:protect:*:*:{
if ($devent == init) {
if (%noon) { did -c protect 4 }
if (%pvon) { did -c protect 11 }
if (%ctcpon) { did -c protect 19 }
if (%invon) { did -c protect 24 }
if (%dccon) { did -c protect 31 }
did -a protect 6 %nb.pv
did -a protect 8 %nb.no
did -a protect 10 %no.tps
did -a protect 16 %nb.ctcp
did -a protect 18 %ctcp.tps
did -a protect 21 %nb.inv
did -a protect 23 %inv.tps
did -a protect 28 %nb.dcc
did -a protect 30 %dcc.tps
did -a protect 34 %i.tps
}
if ($devent == sclick) {
if ($did == 32) {
set %noon $did(4).state
set %pvon $did(11).state
set %ctcpon $did(19).state
set %invon $did(24).state
set %dccon $did(31).state
set %nb.pv $did(6)
set %nb.no $did(8)
set %no.tps $did(10)
set %nb.ctcp $did(16)
set %ctcp.tps $did(18)
set %nb.inv $did(21)
set %inv.tps $did(23)
set %nb.dcc $did(28)
set %dcc.tps $did(30)
set %i.tps $did(34)
}
if ($did == 36) dialog -m floodign floodign
}
}
on 1:open:?:{
if (%noon) {
if ($query(0) > %nb.pv) {
ignore -pu $+ %i.tps *!*@*
eprotect
}
else { halt }
}
}
on *:notice:*:*:{
if (%pvon) {
if ($nick isin $read(Pseudo.txt,w,$nick)) goto end
else {
inc -u $+ [ %no.tps ] %floodnoti
if (%floodnoti > %nb.no) {
ignore -nu $+ %i.tps *!*@
eprotect
}
}
:end
}
}
on *:ctcp:*:*:{
if (ctcpon) {
inc -u $+ [ %ctcp.tps ] %floodctcp
if (%floodctcp > %nb.ctcp) {
ignore -tu $+ %i.tps *!*@*
eprotect
}
}
}
on *:invite:#:{
if (%invon) {
inc -u $+ [ %inv.pts ] %floodinv
if (%floodinv > %nb.inv) {
ignore -iu $+ %i.tps *!*@*
eprotect
}
}
}
on *:dccserver:*:{
if (%dccon) {
inc -u [ %inv.tps ] %flooddcc
if (%flooddcc > %nb.dcc) {
ignore -iu $+ %i.tps *!*@
eprotect
}
}
}
dialog floodign {
title "Pseudo - Looser !"
size -1 -1 137 108
option dbu
box "Liste des pseudos :", 1, 1 1 64 105
list 2, 3 8 59 95, size vsbar
box "Ajout :", 3, 66 1 70 31
text "Pseudo :", 4, 70 9 25 8
edit "", 5, 70 18 50 10
button "Add", 6, 121 18 12 10
button "Supprimer", 7, 66 33 37 12
button "Fermer", 8, 98 94 37 12, ok
}
on *:dialog:floodign:*:*:{
if ($devent == init) {
loadbuf -o floodign 2 Pseudo.txt
}
if ($devent == sclick) {
if ($did == 6) {
write Pseudo.txt $did(5)
did -a floodign 2 $did(5)
}
if ($did == 7) {
write -dl $+ $did(2).sel Pseudo.txt
did -d floodign $did(2).sel
}
}
}
Alias eprotect { echo 4 -a $+ $timestamp [ Flood Protection ]7 $nick 4tente de te flooder (ignoré %i.tps secondes) - 3F124 Pour enlever l'ignore ! }
Conclusion :
Une seule chose que je n'ai pas faite :
Il faut placer un fichier appelé "Pseudo.txt" (vide) a la racine de votre script.
Voila voila =)
on *:ctcp:*:*:{
if (ctcpon) {
inc -u $+ [ %ctcp.tps ] %floodctcp
if (%floodctcp > %nb.ctcp) {
ignore -tu $+ %i.tps *!*@*
eprotect
}
}
}
il manque un % à la variable ctcpon
Et une autre erreur, concernant l'ignore cette fois, euh... où l'alias pour annulé l'ignore ? J'ai beau appuyer sur F12 l'ignore reste lol
Sinon, l'add-on est pas mal fichu ;)
Bravo ;)
Juste un petit soucis (qui vient peut etre de moi) :
Lorsque j'ajoute un pseudo à ignorer, aucun soucis, mais dès lors que je veux le supprimer j'obtiens le message suivant :
* /did: insufficient parameters (line 168, script7.mrc)
Néanmoins, le pseudo a bien été enlever, il faut recharger la fenêtre pour ça !
Très pratique en tout cas ! GG !
Et ben en fait , quand on est la fenetre pour ignorer un pseudo,
quand on clik sur add , ca ne l'ajoute pas visuelement, ca l'ajoute en fond mais il faut fermer le dialogue et le réouvrir pour voir qu'il a bien était ajouté.
Y a t'il une solution à ca , merci
Bonne continuation bye :)
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.