|
Trouver une ressource
Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !
WANTIBNCFLOOD V1.0
Information sur la source
Description
C'est un antiflood pour les clones en BNC
Dernièrement j'ai remarqué sur les chans mIRC, des clones flood qui floodent en postant les même caractère mais chacun a un IP différent et leur system c'est de posté maximum 150 caractères et puis il s'arrête ensuite le 2eme a son tour donc la plupart des antifloods ne capture rien dans ce cas.
Alors j'ai essayé de faire en sorte que, si deux lignes identique qui se suivent en moins d'une seconde pour une longueur de caractères précise (cette longueur de lignes et la les deux lignes par seconde sont fixe dans le code et non configurable parce que si on les configure mal, il peut arrivé que le code ne fonctionne plus comme il faut) en cas de flood les NICK qui postent les même caractères seront BAN sous un mask (* !*@000.000.000.00)
mode +i +m +R seront exécuté lors de détection d'un flood et désactivé après le temps précis (si la case reste vide le mode +i, +m, ou +R ne seront pas désactivé)
ensuite tout ceux qui on eus un BAN seront KICK avec le kick msg que vous déposez dans le dialog
Source
- menu menubar {
- -
- WantiBNCflood V1.0
- .Configurer:wf
- .Désinstaller:dwf
- }
- dialog wantibncfloodlog {
- title "WorldDMT Anti BNC Flood"
- size -1 -1 110 113
- option dbu
- text "Activation de Anti BNC Flood", 1, 5 5 75 8, left
- check "ON/OFF", 2, 76 4 30 9
- box "Désactivation de modes", 3, 2 15 75 41
- text "mode - i après", 4, 7 25 40 8, left
- edit %i, 5, 45 24 15 9, limit2
- text "Sec.", 6, 62 25 40 8, left
- text "mode - m après", 7, 7 35 40 8, left
- edit %m, 8, 45 34 15 9, limit2
- text "Sec.", 9, 62 35 40 8, left
- text "mode - R après", 10, 7 45 40 8, left
- edit %R, 11, 45 44 15 9, limit2
- text "Sec.", 12, 62 45 40 8, left
- box "kick banned nick", 13, 2 57 106 37
- text "Message de kick pour les nicks", 14, 5 65 100 7, center
- text "qui ont un ban sur le chan", 15, 5 71 100 7, center
- edit %kbmsg, 16, 5 80 100 9, autohs
- button "valide", 17, 2 95 106 12, ok
- box "info", 18, 78 15 30 41
- text "Pour plus", 19, 78 25 30 8, center
- text "d'info", 20, 78 32 30 8, center
- button "INFO", 21, 79 40 28 10
- }
- dialog winfo {
- title "Winfo"
- size -1 -1 120 56
- option dbu
- box "WorldDMT™- World Design Multi Technology", 22, 1 5 118 50
- text "WorldDMT Script - © 2008", 23, 5 15 77 8, left
- text "E-mail: worlddmt@hotmail.com Web/profile:", 24, 5 23 77 14, left
- link "www.ircfr.com/auteur/WORLDDMT/815724.aspx", 25, 5 37 100 18
- }
- dialog deswf {
- title "Désinstaller WantiBNCflood"
- size -1 -1 150 40
- option dbu
- box "ATTENTION!!", 16, 1 2 148 37
- text "Cette action supprime l’addon WantiBNCflood V1.0 voulez-vous désinstallé WantiBNCflood ?", 27, 12 9 125 24, Center
- button "Oui", 28, 45 25 30 12, ok
- button "Non", 29, 75 25 30 12, cancel
- }
- alias wf {
- if ($dialog(wantibncfloodlog)) echo -s la fenêtre WorldDMT Anti BNC Flood est déjà ouverte
- else dialog -m wantibncfloodlog wantibncfloodlog
- }
- alias wi {
- if ($dialog(winfo)) return
- else dialog -ma winfo winfo
- }
- alias dwf {
- if ($dialog(deswf)) return
- else dialog -ma deswf deswf
- }
- alias wantibncflood {
- tokenize 32 $strip($1-)
- if ($hfind(fld $+ $chan,$1-,0).data) {
- var %v $v1
- while (%v) var %nick = %nick $hfind(fld $+ $chan,$1-,%v).data ,%v %v - 1
- inc %v
- raw mode # +imRbb %nick $address($nick,2)
- notice # 4flood detectée 1by WorldDMT Script
- if (%i) timer1 1 %i mode # -i
- if (%m) timer2 1 %m mode # -m
- if (%R) timer3 1 %R mode # -R
- }
- else if ($len($1-) > 110) hadd -mu1 fld $+ $chan $address($nick,2) $1-
- }
- on *:dialog:deswf:sclick:28: unload -rs wantibncflood.mrc
- on *:dialog:winfo:sclick:25:run www.ircfr.com/auteur/WORLDDMT/815724.aspx
- on *:dialog:wantibncfloodlog:sclick:21:wi
- on *:dialog:wantibncfloodlog:*:*: {
- if ($devent == sclick) {
- if ($did(2).state) set %wp 1 | else unset %wp
- if ($did(17)) {
- if $did(16) != $null { set %kbmsg $did(16) } | else unset %kbmsg
- if $did(5) != $null { set %i $did(5) } | else unset %i
- if $did(8) != $null { set %m $did(8) } | else unset %m
- if $did(11) != $null { set %R $did(11) } | else unset %R
- }
- }
- elseif ($devent == init) {
- if (%wp) did -c $dname 2
- }
- }
- on @*:NOTICE:*:#: if (%wp) wantibncflood $1-
- on @*:ACTION:*:#: if (%wp) wantibncflood $1-
- on @*:TEXT:*:#: if (%wp) wantibncflood $1-
- on @*:ban:#: {
- var %b 0,%c $ialchan($banmask,#,0).nick,%ban
- while %b < %c {
- inc %b
- %ban = $ialchan($banmask,#,%b).nick
- if ($nick != $me) kick # %ban %kbmsg 1by WorldDMT Script
- }
- }
- on *:load: {
- echo -a - Chargement de l'Addon WantiBNCflood V1.0 réussit
- echo -a -
- echo -a - Vous trouvez dans le menu bar WantiBNCflood
- echo -a -
- echo -a - Cliquez dessus pour la configuration de l'Addon
- }
- on *:unload: {
- echo -a - Désinstallation de l'Addon terminé avec succes
- echo -a -
- echo -a - merci d'avoir utilisé WantiBNCflood V1.0
- echo -a -
- echo -a - WorldDMT
- }
menu menubar {
-
WantiBNCflood V1.0
.Configurer:wf
.Désinstaller:dwf
}
dialog wantibncfloodlog {
title "WorldDMT Anti BNC Flood"
size -1 -1 110 113
option dbu
text "Activation de Anti BNC Flood", 1, 5 5 75 8, left
check "ON/OFF", 2, 76 4 30 9
box "Désactivation de modes", 3, 2 15 75 41
text "mode - i après", 4, 7 25 40 8, left
edit %i, 5, 45 24 15 9, limit2
text "Sec.", 6, 62 25 40 8, left
text "mode - m après", 7, 7 35 40 8, left
edit %m, 8, 45 34 15 9, limit2
text "Sec.", 9, 62 35 40 8, left
text "mode - R après", 10, 7 45 40 8, left
edit %R, 11, 45 44 15 9, limit2
text "Sec.", 12, 62 45 40 8, left
box "kick banned nick", 13, 2 57 106 37
text "Message de kick pour les nicks", 14, 5 65 100 7, center
text "qui ont un ban sur le chan", 15, 5 71 100 7, center
edit %kbmsg, 16, 5 80 100 9, autohs
button "valide", 17, 2 95 106 12, ok
box "info", 18, 78 15 30 41
text "Pour plus", 19, 78 25 30 8, center
text "d'info", 20, 78 32 30 8, center
button "INFO", 21, 79 40 28 10
}
dialog winfo {
title "Winfo"
size -1 -1 120 56
option dbu
box "WorldDMT™- World Design Multi Technology", 22, 1 5 118 50
text "WorldDMT Script - © 2008", 23, 5 15 77 8, left
text "E-mail: worlddmt@hotmail.com Web/profile:", 24, 5 23 77 14, left
link "www.ircfr.com/auteur/WORLDDMT/815724.aspx", 25, 5 37 100 18
}
dialog deswf {
title "Désinstaller WantiBNCflood"
size -1 -1 150 40
option dbu
box "ATTENTION!!", 16, 1 2 148 37
text "Cette action supprime l’addon WantiBNCflood V1.0 voulez-vous désinstallé WantiBNCflood ?", 27, 12 9 125 24, Center
button "Oui", 28, 45 25 30 12, ok
button "Non", 29, 75 25 30 12, cancel
}
alias wf {
if ($dialog(wantibncfloodlog)) echo -s la fenêtre WorldDMT Anti BNC Flood est déjà ouverte
else dialog -m wantibncfloodlog wantibncfloodlog
}
alias wi {
if ($dialog(winfo)) return
else dialog -ma winfo winfo
}
alias dwf {
if ($dialog(deswf)) return
else dialog -ma deswf deswf
}
alias wantibncflood {
tokenize 32 $strip($1-)
if ($hfind(fld $+ $chan,$1-,0).data) {
var %v $v1
while (%v) var %nick = %nick $hfind(fld $+ $chan,$1-,%v).data ,%v %v - 1
inc %v
raw mode # +imRbb %nick $address($nick,2)
notice # 4flood detectée 1by WorldDMT Script
if (%i) timer1 1 %i mode # -i
if (%m) timer2 1 %m mode # -m
if (%R) timer3 1 %R mode # -R
}
else if ($len($1-) > 110) hadd -mu1 fld $+ $chan $address($nick,2) $1-
}
on *:dialog:deswf:sclick:28: unload -rs wantibncflood.mrc
on *:dialog:winfo:sclick:25:run www.ircfr.com/auteur/WORLDDMT/815724.aspx
on *:dialog:wantibncfloodlog:sclick:21:wi
on *:dialog:wantibncfloodlog:*:*: {
if ($devent == sclick) {
if ($did(2).state) set %wp 1 | else unset %wp
if ($did(17)) {
if $did(16) != $null { set %kbmsg $did(16) } | else unset %kbmsg
if $did(5) != $null { set %i $did(5) } | else unset %i
if $did(8) != $null { set %m $did(8) } | else unset %m
if $did(11) != $null { set %R $did(11) } | else unset %R
}
}
elseif ($devent == init) {
if (%wp) did -c $dname 2
}
}
on @*:NOTICE:*:#: if (%wp) wantibncflood $1-
on @*:ACTION:*:#: if (%wp) wantibncflood $1-
on @*:TEXT:*:#: if (%wp) wantibncflood $1-
on @*:ban:#: {
var %b 0,%c $ialchan($banmask,#,0).nick,%ban
while %b < %c {
inc %b
%ban = $ialchan($banmask,#,%b).nick
if ($nick != $me) kick # %ban %kbmsg 1by WorldDMT Script
}
}
on *:load: {
echo -a - Chargement de l'Addon WantiBNCflood V1.0 réussit
echo -a -
echo -a - Vous trouvez dans le menu bar WantiBNCflood
echo -a -
echo -a - Cliquez dessus pour la configuration de l'Addon
}
on *:unload: {
echo -a - Désinstallation de l'Addon terminé avec succes
echo -a -
echo -a - merci d'avoir utilisé WantiBNCflood V1.0
echo -a -
echo -a - WorldDMT
}
Conclusion
le fichier zip contient le fichier Wantibncflood.mrc, vous le mettez dans le fichier de votre script
ensuite dans la fenêtre tu tape /load -rs wantibncflood.mrc
après avoir installé dans le menubar tu trouve WantiBNCflood V1.0 tu choisis configurer pour configurer bien sur et désinstaller pour désinstaller
Fichier Zip
Pour les "Membres Club", vous pouvez télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !
Télécharger le zip
Historique
- 18 juin 2008 10:32:41 :
- j'avais oublié quelque chose dans l'explication "kick tout les clones a part les ops"
- 18 juin 2008 13:01:43 :
- j'ai modifié .table ça peu allé sans ça
- 18 juin 2008 22:42:11 :
- kick les ops aussi si ils font parti du banmask
- 19 juillet 2008 13:41:31 :
- .
- 01 août 2008 19:38:57 :
- .
Sources du même auteur
Sources de la même categorie
Sources en rapport avec celle ci
Commentaires et avis
|
Téléchargements
Logiciels à télécharger sur le même thème :
|