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:
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 =)
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.