SYSTÈME DE MODÉRATION ULTRA COMPLET modération, chan, nick, Source N°43266 IRC

Information sur la source

Catégorie :AddOns Classé sous : modération, chan, nick Niveau : Débutant Date de création : 27/06/2007 Date de mise à jour : 30/06/2007 20:18:23 Vu : 5 294

Auteur : doob666

Ecrire un message privé

Note :
Aucune note

Commentaire sur cette source (19)

Ajouter un commentaire et/ou une note

Description

Cliquez pour voir la capture en taille normale

Toujours dans les vieux trucs qu'on resort et qui servent bien j'ai trouvé ça. je n'en ai pas trouver d'aussi complet donc j'ai tout chamboulé mon vieux script pour retrouver celui là.

Source

Menu channel,nicklist {
[Modération]:Set %modo.channel $active | Set %modo.nick $1 | /dialog -m modo modo
}
dialog modo {
title "Modération"
size -1 -1 500 395
option pixels
tab "Modération chan", 11, 9 10 480 380
button "Masse Modes +", 995, 50 63 90 30, tab 11
button "Masse Modes-", 996, 160 63 90 30, tab 11
box "Channel Modes", 119, 20 35 260 170, tab 11
box "", 225, 32 102 57 92, tab 11
button "+c", 223, 35 110 26 20, tab 11
button "-c", 224, 62 110 26 20, tab 11
button "+i", 226, 35 130 26 20, tab 11
button "-i", 227, 62 130 26 20, tab 11
button "+m", 228, 35 150 26 20, tab 11
button "-m", 229, 62 150 26 20, tab 11
button "+p", 230, 35 170 26 20, tab 11
button "-p", 231, 62 170 26 20, tab 11
button "+s", 232, 95 110 26 20, tab 11
button "-s", 233, 122 110 26 20, tab 11
box "", 234, 92 102 57 92, tab 11
button "+u", 235, 95 130 26 20, tab 11
button "-u", 236, 122 130 26 20, tab 11
button "+iK", 237, 95 150 26 20, tab 11
button "-iK", 238, 122 150 26 20, tab 11
button "+nt", 239, 95 170 26 20, tab 11
button "-nt", 240, 122 170 26 20, tab 11
box "", 243, 152 102 57 92, tab 11
button "+C", 244, 155 112 26 20, tab 11
button "-C", 245, 182 112 26 20, tab 11
button "+G", 246, 155 132 26 20, tab 11
button "-G", 247, 182 132 26 20, tab 11
button "+N", 248, 155 152 26 20, tab 11
button "-N", 249, 182 152 26 20, tab 11
button "+O", 250, 155 172 26 20, tab 11
button "-O", 251, 182 172 26 20, tab 11
button "+R", 252, 215 112 26 20, tab 11
button "-R", 253, 242 112 26 20, tab 11
button "+S", 254, 215 132 26 20, tab 11
button "-S", 255, 242 132 26 20, tab 11
button "+T", 256, 215 152 26 20, tab 11
button "-T", 257, 242 152 26 20, tab 11
box "", 258, 212 102 57 92, tab 11
button "+V", 259, 215 172 26 20, tab 11
button "-V", 260, 242 172 26 20, tab 11
box "Channel Bans", 1010, 335 35 140 170, tab 11
button "Bloqueur de /me", 1013, 341 53 124 20, tab 11
button "Débloquer de /me", 1023, 341 78 124 20, tab 11
button "Changement pseudo +b", 1014, 341 103 124 20, tab 11
button "Changement pseudo -b", 1024, 341 128 124 20, tab 11
button "Ban silencieux", 1015, 341 153 124 20, tab 11
button "UnBan silencieux", 1025, 341 178 124 20, tab 11
box "Autres Modes", 2220, 20 212 260 160, tab 11
text "Input", 2223, 60 227 90 20, tab 11
edit %clé, 2224, 30 240 90 20, tab 11 autohs center
button "+k", 2225, 125 240 26 20, tab 11
button "-k", 2226, 155 240 26 20, tab 11
text "Clé", 2227, 205 240 80 20, tab 11
edit %limit, 2234, 30 265 90 20, tab 11 autohs center
button "+l", 2235, 125 265 26 20, tab 11
button "-l", 2236, 155 265 26 20, tab 11
text "Limite d'user", 2237, 205 265 80 20, tab 11
edit %ulimit, 2244, 30 290 90 20, tab 11 autohs center
button "+L", 2245, 125 290 26 20, tab 11
button "-L", 2246, 155 290 26 20, tab 11
text "Redirection", 2247, 205 290 80 20, tab 11
edit %fs, 2254, 30 315 90 20, tab 11 autohs center
button "+f", 2255, 125 315 26 20, tab 11
button "-f", 2256, 155 315 26 20, tab 11
text "Flood #:#", 2257, 205 315 80 20, tab 11
edit %js, 2264, 30 340 90 20, tab 11 autohs center
button "+j", 2265, 125 340 26 20, tab 11
button "-j", 2266, 155 340 26 20, tab 11
text "Joins #:#", 2267, 205 340 80 20, tab 11
box "Mass Bans", 330, 345 282 130 100, tab 11
button "Masse Bans +", 340, 365 307 90 30, tab 11
button "Masse Bans -", 350, 365 345 90 30, tab 11
check "Anti flood", 2, 352 227 100 20, tab 11
box "Protection", 4, 347 208 128 73, tab 11
check "Anti clone", 3, 352 247 100 20, tab 11
tab "Modération pseudo", 21
box "Modes Pseudo", 219, 20 35 120 230, tab 21
text "Voice", 1201, 25 58 40 20, tab 21
button "+v", 1202, 70 55 25 25, tab 21
button "-v", 1203, 100 55 25 25, tab 21
text "HalfOp", 1301, 25 88 40 20, tab 21
button "+h", 1302, 70 85 25 25, tab 21
button "-h", 1303, 100 85 25 25, tab 21
text "Op", 1401, 25 118 40 20, tab 21
button "+o", 1402, 70 115 25 25, tab 21
button "-o", 1403, 100 115 25 25, tab 21
text "Protect", 1501, 25 148 40 20, tab 21
button "+a", 1502, 70 145 25 25, tab 21
button "-a", 1503, 100 145 25 25, tab 21
text "Owner", 1601, 25 178 40 20, tab 21
button "+q", 1602, 70 175 25 25, tab 21
button "-q", 1603, 100 175 25 25, tab 21
text "Invite", 1701, 25 208 40 20, tab 21
button "+I", 1702, 70 205 25 25, tab 21
button "-I", 1703, 100 205 25 25, tab 21
text "Except", 1801, 25 238 40 20, tab 21
button "+e", 1802, 70 235 25 25, tab 21
button "-e", 1803, 100 235 25 25, tab 21
box "Ban Modes", 2001, 150 35 135 145, tab 21
text "Ban normal", 2007, 160 58 90 20, tab 21
button "+b", 2008, 220 55 25 25, tab 21
button "-b", 2009, 250 55 25 25, tab 21
text "Ban Pseudo", 2010, 165 88 90 20, tab 21
button "+b", 2011, 220 85 25 25, tab 21
button "-b", 2012, 250 85 25 25, tab 21
text "Ban silencieux", 2013, 160 118 90 20, tab 21
button "+b", 2014, 220 115 25 25, tab 21
button "-b", 2015, 250 115 25 25, tab 21
text "Kick Ban", 2016, 165 148 90 20, tab 21
button "+b", 2017, 220 145 25 25, tab 21
button "-b", 2018, 250 145 25 25, tab 21
box "Avertos / Kick / Ban", 100, 293 35 185 100, tab 21
text "Raison", 503, 305 50 90 20, tab 21
edit %raison1, 603, 305 65 160 20, tab 21 autohs center
button "Avertos", 1101, 305 88 42 40, tab 21
button "Kick", 1102, 366 88 40 40, tab 21
button "Ban", 1103, 427 88 40 40, tab 21
box "Invite", 101, 293 136 185 100, tab 21
text "Nick", 2503, 305 153 90 20, tab 21
edit %nick, 2504, 305 168 90 20, tab 21 autohs center
text "Channel", 2505, 305 195 90 20, tab 21
edit %channel, 2506, 305 210 90 20, tab 21 autohs center
button "Invite", 2507, 415 175 50 50, tab 21
combo 1, 293 245 185 100, tab 21
button "Rafraichir", 1111, 293 340 185 30, tab 21
box "Ignore / Silence", 123, 150 185 135 81, tab 21
button "I 15", 124, 155 200 30 25, tab 21
button "I 30", 125, 187 200 30 25, tab 21
button "I 45", 126, 219 200 30 25, tab 21
button "I 60", 127, 252 200 30 25, tab 21
button "S 15", 128, 155 235 30 25, tab 21
button "S 30", 129, 187 235 30 25, tab 21
button "S 45", 130, 219 235 30 25, tab 21
button "S 60", 131, 252 235 30 25, tab 21
box "Masse modes nick", 30, 20 270 120 100, tab 21
button "Masse Modes +", 31, 35 290 90 30, tab 21
button "Masse Modes -", 32, 35 330 90 30, tab 21
box "Masse Bans", 33, 150 270 135 100, tab 21
button "Masse Bans +", 34, 175 290 90 30, tab 21
button "Masse Bans -", 35, 175 330 90 30, tab 21
}
on *:dialog:modo:*:*:{
if ($devent == init) {
set %modo.channel $active
var %total = $nick($active,0) , %x = 1
while ( %x <= %total ) {
did -i $dname 1 %x $nick($active,%x)
inc %x }
}
if ($devent == sclick) {
var %total = $nick($active,0), %x = 1
if ($did == 1111) {
while ( %x <= %total ) {
did -r $dname 1 %x $nick($active,%x)
timer -h 1 1 did -o $dname 1 %x $nick($active,%x)
inc %x
}
}
elseif ($did == 31) mode $active + $+ $$?="Modes?" $$?="Nicks?"
elseif ($did == 32) mode $active - $+ $$?="Modes?" $$?="Nicks?"
elseif ($did == 34) mode $active + $+ $$?="Bans?" $$?="Nicks?"
elseif ($did == 35) mode $active - $+ $$?="Bans?" $$?="Nicks?"
elseif ($did == 124) { ignore $did(1).seltext | echo $active * $did(1).seltext $+ !*@* a été ajouter dans la liste des ignorer pendant 15 minutes | timer 1 900 switch -u | timer 1 902 echo $active * $did(1).seltext $+ !*@* a été effacer de la liste des ignorer }
elseif ($did == 125) { ignore $did(1).seltext | echo $active * $did(1).seltext $+ !*@* a été ajouter dans la liste des ignorer pendant 30 minutes | timer 1 1800 switch -u | timer 1 1802 echo $active * $did(1).seltext $+ !*@* à été effacer de la liste des ignorer }
elseif ($did == 126) { ignore $did(1).seltext | echo $active * $did(1).seltext $+ !*@* a été ajouter dans la liste des ignorer pendant 45 minutes | timer 1 2700 switch -u | timer 1 2702 echo $active * $did(1).seltext $+ !*@* a été effacer de la liste des ignorer }
elseif ($did == 127) { ignore $did(1).seltext | echo $active * $did(1).seltext $+ !*@* a été ajouter dans la liste des ignorer pendant 60 minutes | timer 1 3600 switch -u | timer 1 3602 echo $active * $did(1).seltext $+ !*@* a été effacer de la liste des ignorer }
elseif ($did == 128) { mode $active +b ~q: $+ $address($did(1).seltext,2) | timer 1 900 switch -u }
elseif ($did == 129) { mode $active +b ~q: $+ $address($did(1).seltext,2) | timer 1 1800 switch -u }
elseif ($did == 130) { mode $active +b ~q: $+ $address($did(1).seltext,2) | timer 1 2700 switch -u }
elseif ($did == 131) { mode $active +b ~q: $+ $address($did(1).seltext,2) | timer 1 3600 switch -u }
elseif ($did isnum 223-260) { mode $active $did(modo,$did) }
elseif ($did == 340) { mode $active + $+ $$?="Bans?" $$?="Nicks?" $did(340) }
elseif ($did == 350) { mode $active - $+ $$?="Bans?" $$?="Nicks?" $did(350) }
elseif ($did == 995) { mode $active + $+ $$?="Modes?" $did(995) }
elseif ($did == 996) { mode $active - $+ $$?="Modes?" $did(996) }
elseif ($did == 1013) { mode $active +b ~T:block:ACTION* $did(1013) }
elseif ($did == 1023) { mode $active -b ~T:block:ACTION* $did(1023) }
elseif ($did == 1014) { mode $active +b ~n:*!*@* $did(1014) }
elseif ($did == 1024) { mode $active -b ~n:*!*@* $did(1024) }
elseif ($did == 1015) { mode $active +b ~q:*!*@* $did(1015) }
elseif ($did == 1025) { mode $active -b ~q:*!*@* $did(1025) }
elseif ($did == 1101) { msg $active [Avertos] $did(1).seltext $+ : %raison1 $did(603) | timer 1 3 did -r $dname 603 | timer 1 5 unset -s %raison1 }
elseif ($did == 1102) { kick $active $did(1).seltext %raison1 $did(603) | did -r $dname 603 | unset -s %raison1 }
elseif ($did == 1103) { mode $active +b $address($did(1).seltext,2) | kick $active $did(1).seltext %raison1 $did(603) | did -r $dname 603 | unset -s %raison1 }
elseif ($did isnum 1203-1803) { mode $active $did(modo,$did) $did(1).seltext $did(modo,$did) }
elseif ($did == 2008) { mode $active +b $address($did(1).seltext,2) $did(2008) }
elseif ($did == 2009) { mode $active -b $address($did(1).seltext,2) $did(2009) }
elseif ($did == 2011) { mode $active +b ~n: $+ $address($did(1).seltext,2) $did(2011) }
elseif ($did == 2012) { mode $active -b ~n: $+ $address($did(1).seltext,2) $did(2012) }
elseif ($did == 2014) { mode $active +b ~q: $+ $address($did(1).seltext,2) $did(2014) }
elseif ($did == 2015) { mode $active -b ~q: $+ $address($did(1).seltext,2) $did(2015) }
elseif ($did == 2017) { mode $active +b $address($did(1).seltext,2) $did(2017) | kick $active $did(1).seltext }
elseif ($did == 2018) { mode $active -b $address($did(1).seltext,2) $did(2018) }
elseif ($did == 2225) { mode $active +k %clé $did(2224) | did -r $dname 2224 | unset -s %clé }
elseif ($did == 2226) { mode $active -k %clé $did(2224) | did -r $dname 2224 | unset -s %clé }
elseif ($did == 2235) { mode $active +l %limit $did(2234) | did -r $dname 2234 | unset -s %limit }
elseif ($did == 2236) { mode $active -l %limit $did(2234) | did -r $dname 2234 | unset -s %limit }
elseif ($did == 2245) { mode $active +L %ulimit $did(2244) | did -r $dname 2244 | unset -s %ulimit }
elseif ($did == 2246) { mode $active -L %ulimit $did(2244) | did -r $dname 2244 | unset -s %ulimit }
elseif ($did == 2255) { mode $active +f %fs $did(2254) | did -r $dname 2254 | unset -s %fs }
elseif ($did == 2256) { mode $active -f %fs $did(2254) | did -r $dname 2254 | unset -s %fs }
elseif ($did == 2265) { mode $active +j %js $did(2264) | did -r $dname 2264 | unset -s %js }
elseif ($did == 2266) { mode $active -j %js $did(2264) | did -r $dname 2264 | unset -s %js }
elseif ($did == 2507) { invite %nick %channel $did(2504) $did(2506) | did -r $dname 2504,2506 | unset -s %nick | unset -s %channel }
elseif ($did(2).state == 1) { flood } | else { halt }
elseif ($did(3).state == 1) { clonejoin } | else { halt }
}
}
}
alias flood {
on *:TEXT:*:#:{
inc -u3 %flood. [ $+ [ $nick ] ]
if (%flood. [ $+ [ $nick ] ] == 4) {
ban $chan $address($nick,1)
kick $chan $nick Le flood n'est pas autoriser dans $chan
}
}
on @*:JOIN:#:{
if ($ial == $false) {
.ial on
}
elseif ($chan(#).ial == $false) {
who #
halt
}
.timerclone $+ $nick $+ $chan 1 3 clonejoin $nick $chan $wildsite
}
alias clonejoin {
var %total = $ialchan($3,$2,0)
var %x 1
while (%x <= $ialchan($3,$2,0)) {
if ($left($ialchan($3,$2,%x).pnick,1) == @) {
goto end
}
else {
inc %x
}
}
if (%total > 1 && %total < 2) {
notice $1 $+($chr(2),Attention:,$chr(2)) $+($1,$chr(44)) Les clones ne sont pas autoriser dans $+($2,.) Ne prenez pas d'autre clones ou vous serez banni.
}
elseif (%total > 3) {
ban -u120 $2 $1 2
var %i = 0
while (%i < %total) {
inc %i
var %nick = $ialchan($3,$2,%i).nick
var %all.nicks = $addtok(%all.nicks,%nick,32)
if (%nick !isop $2) {
kick $2 %nick Avoir plus de 2 clones n'est pas autoriser dans # $+ .
}
}
echo 14 -a Attaque de clone détectée $3 $+ : %all.nicks
}
:end
}

Menu channel,nicklist {
  [Modération]:Set %modo.channel $active | Set %modo.nick $1 | /dialog -m modo modo 
}
dialog modo {
  title "Modération"
  size -1 -1 500 395
  option pixels
  tab "Modération chan", 11, 9 10 480 380
  button "Masse Modes +", 995, 50 63 90 30, tab 11
  button "Masse Modes-", 996, 160 63 90 30, tab 11
  box "Channel Modes", 119, 20 35 260 170, tab 11
  box "", 225, 32 102 57 92, tab 11
  button "+c", 223, 35 110 26 20, tab 11
  button "-c", 224, 62 110 26 20, tab 11
  button "+i", 226, 35 130 26 20, tab 11
  button "-i", 227, 62 130 26 20, tab 11
  button "+m", 228, 35 150 26 20, tab 11
  button "-m", 229, 62 150 26 20, tab 11
  button "+p", 230, 35 170 26 20, tab 11
  button "-p", 231, 62 170 26 20, tab 11
  button "+s", 232, 95 110 26 20, tab 11
  button "-s", 233, 122 110 26 20, tab 11
  box "", 234, 92 102 57 92, tab 11
  button "+u", 235, 95 130 26 20, tab 11
  button "-u", 236, 122 130 26 20, tab 11
  button "+iK", 237, 95 150 26 20, tab 11
  button "-iK", 238, 122 150 26 20, tab 11
  button "+nt", 239, 95 170 26 20, tab 11
  button "-nt", 240, 122 170 26 20, tab 11
  box "", 243, 152 102 57 92, tab 11
  button "+C", 244, 155 112 26 20, tab 11
  button "-C", 245, 182 112 26 20, tab 11
  button "+G", 246, 155 132 26 20, tab 11
  button "-G", 247, 182 132 26 20, tab 11
  button "+N", 248, 155 152 26 20, tab 11
  button "-N", 249, 182 152 26 20, tab 11
  button "+O", 250, 155 172 26 20, tab 11
  button "-O", 251, 182 172 26 20, tab 11
  button "+R", 252, 215 112 26 20, tab 11
  button "-R", 253, 242 112 26 20, tab 11
  button "+S", 254, 215 132 26 20, tab 11
  button "-S", 255, 242 132 26 20, tab 11
  button "+T", 256, 215 152 26 20, tab 11
  button "-T", 257, 242 152 26 20, tab 11
  box "", 258, 212 102 57 92, tab 11
  button "+V", 259, 215 172 26 20, tab 11
  button "-V", 260, 242 172 26 20, tab 11
  box "Channel Bans", 1010, 335 35 140 170, tab 11
  button "Bloqueur de /me", 1013, 341 53 124 20, tab 11
  button "Débloquer de /me", 1023, 341 78 124 20, tab 11
  button "Changement pseudo +b", 1014, 341 103 124 20, tab 11
  button "Changement pseudo -b", 1024, 341 128 124 20, tab 11
  button "Ban silencieux", 1015, 341 153 124 20, tab 11
  button "UnBan silencieux", 1025, 341 178 124 20, tab 11
  box "Autres Modes", 2220, 20 212 260 160, tab 11
  text "Input", 2223, 60 227 90 20, tab 11
  edit %clé, 2224, 30 240 90 20, tab 11 autohs center
  button "+k", 2225, 125 240 26 20, tab 11
  button "-k", 2226, 155 240 26 20, tab 11
  text "Clé", 2227, 205 240 80 20, tab 11
  edit %limit, 2234, 30 265 90 20, tab 11 autohs center
  button "+l", 2235, 125 265 26 20, tab 11
  button "-l", 2236, 155 265 26 20, tab 11
  text "Limite d'user", 2237, 205 265 80 20, tab 11
  edit %ulimit, 2244, 30 290 90 20, tab 11 autohs center
  button "+L", 2245, 125 290 26 20, tab 11
  button "-L", 2246, 155 290 26 20, tab 11
  text "Redirection", 2247, 205 290 80 20, tab 11
  edit %fs, 2254, 30 315 90 20, tab 11 autohs center
  button "+f", 2255, 125 315 26 20, tab 11
  button "-f", 2256, 155 315 26 20, tab 11
  text "Flood #:#", 2257, 205 315 80 20, tab 11
  edit %js, 2264, 30 340 90 20, tab 11 autohs center
  button "+j", 2265, 125 340 26 20, tab 11
  button "-j", 2266, 155 340 26 20, tab 11
  text "Joins #:#", 2267, 205 340 80 20, tab 11
  box "Mass Bans", 330, 345 282 130 100, tab 11
  button "Masse Bans +", 340, 365 307 90 30, tab 11
  button "Masse Bans -", 350, 365 345 90 30, tab 11
  check "Anti flood", 2, 352 227 100 20, tab 11
  box "Protection", 4, 347 208 128 73, tab 11
  check "Anti clone", 3, 352 247 100 20, tab 11
  tab "Modération pseudo", 21
  box "Modes Pseudo", 219, 20 35 120 230, tab 21
  text "Voice", 1201, 25 58 40 20, tab 21
  button "+v", 1202, 70 55 25 25, tab 21
  button "-v", 1203, 100 55 25 25, tab 21
  text "HalfOp", 1301, 25 88 40 20, tab 21
  button "+h", 1302, 70 85 25 25, tab 21
  button "-h", 1303, 100 85 25 25, tab 21
  text "Op", 1401, 25 118 40 20, tab 21
  button "+o", 1402, 70 115 25 25, tab 21
  button "-o", 1403, 100 115 25 25, tab 21
  text "Protect", 1501, 25 148 40 20, tab 21
  button "+a", 1502, 70 145 25 25, tab 21
  button "-a", 1503, 100 145 25 25, tab 21
  text "Owner", 1601, 25 178 40 20, tab 21
  button "+q", 1602, 70 175 25 25, tab 21
  button "-q", 1603, 100 175 25 25, tab 21
  text "Invite", 1701, 25 208 40 20, tab 21
  button "+I", 1702, 70 205 25 25, tab 21
  button "-I", 1703, 100 205 25 25, tab 21
  text "Except", 1801, 25 238 40 20, tab 21
  button "+e", 1802, 70 235 25 25, tab 21
  button "-e", 1803, 100 235 25 25, tab 21
  box "Ban Modes", 2001, 150 35 135 145, tab 21
  text "Ban normal", 2007, 160 58 90 20, tab 21
  button "+b", 2008, 220 55 25 25, tab 21
  button "-b", 2009, 250 55 25 25, tab 21
  text "Ban Pseudo", 2010, 165 88 90 20, tab 21
  button "+b", 2011, 220 85 25 25, tab 21
  button "-b", 2012, 250 85 25 25, tab 21
  text "Ban silencieux", 2013, 160 118 90 20, tab 21
  button "+b", 2014, 220 115 25 25, tab 21
  button "-b", 2015, 250 115 25 25, tab 21
  text "Kick Ban", 2016, 165 148 90 20, tab 21
  button "+b", 2017, 220 145 25 25, tab 21
  button "-b", 2018, 250 145 25 25, tab 21
  box "Avertos / Kick / Ban", 100, 293 35 185 100, tab 21
  text "Raison", 503, 305 50 90 20, tab 21
  edit %raison1, 603, 305 65 160 20, tab 21 autohs center
  button "Avertos", 1101, 305 88 42 40, tab 21
  button "Kick", 1102, 366 88 40 40, tab 21
  button "Ban", 1103, 427 88 40 40, tab 21
  box "Invite", 101, 293 136 185 100, tab 21
  text "Nick", 2503, 305 153 90 20, tab 21
  edit %nick, 2504, 305 168 90 20, tab 21 autohs center
  text "Channel", 2505, 305 195 90 20, tab 21
  edit %channel, 2506, 305 210 90 20, tab 21 autohs center
  button "Invite", 2507, 415 175 50 50, tab 21
  combo 1, 293 245 185 100, tab 21
  button "Rafraichir", 1111, 293 340 185 30, tab 21
  box "Ignore / Silence", 123, 150 185 135 81, tab 21
  button "I 15", 124, 155 200 30 25, tab 21
  button "I 30", 125, 187 200 30 25, tab 21
  button "I 45", 126, 219 200 30 25, tab 21
  button "I 60", 127, 252 200 30 25, tab 21
  button "S 15", 128, 155 235 30 25, tab 21
  button "S 30", 129, 187 235 30 25, tab 21
  button "S 45", 130, 219 235 30 25, tab 21
  button "S 60", 131, 252 235 30 25, tab 21
  box "Masse modes nick", 30, 20 270 120 100, tab 21
  button "Masse Modes +", 31, 35 290 90 30, tab 21
  button "Masse Modes -", 32, 35 330 90 30, tab 21
  box "Masse Bans", 33, 150 270 135 100, tab 21
  button "Masse Bans +", 34, 175 290 90 30, tab 21
  button "Masse Bans -", 35, 175 330 90 30, tab 21
}

on *:dialog:modo:*:*:{ 
  if ($devent == init) { 
    set %modo.channel $active
    var %total = $nick($active,0) , %x = 1
    while ( %x <= %total ) {
      did -i $dname 1 %x $nick($active,%x)
    inc %x }
  }
  if ($devent == sclick) {
    var %total = $nick($active,0), %x = 1
    if ($did == 1111) {    
      while ( %x <= %total ) {
        did -r $dname 1 %x $nick($active,%x) 
        timer -h 1 1 did -o $dname 1 %x $nick($active,%x) 
        inc %x
      } 
    } 
    elseif ($did == 31)  mode $active + $+ $$?="Modes?"  $$?="Nicks?" 
    elseif ($did == 32)  mode $active - $+ $$?="Modes?"  $$?="Nicks?" 
    elseif ($did == 34)  mode $active + $+ $$?="Bans?"  $$?="Nicks?"   
    elseif ($did == 35)  mode $active - $+ $$?="Bans?"  $$?="Nicks?"  
    elseif ($did == 124)  { ignore $did(1).seltext | echo $active * $did(1).seltext $+ !*@* a été ajouter dans la liste des ignorer pendant 15 minutes | timer 1 900 switch -u | timer 1 902 echo $active * $did(1).seltext $+ !*@* a été effacer de la liste des ignorer }
    elseif ($did == 125) { ignore $did(1).seltext | echo $active *  $did(1).seltext $+ !*@* a été ajouter dans la liste des ignorer pendant 30 minutes | timer 1 1800 switch -u | timer 1 1802 echo $active * $did(1).seltext $+ !*@* à été effacer de la liste des ignorer }
    elseif ($did == 126) { ignore $did(1).seltext | echo $active * $did(1).seltext $+ !*@* a été ajouter dans la liste des ignorer pendant 45 minutes | timer 1 2700 switch -u | timer 1 2702 echo $active * $did(1).seltext $+ !*@* a été effacer  de la liste des ignorer }
    elseif ($did == 127) { ignore $did(1).seltext | echo $active * $did(1).seltext $+ !*@* a été ajouter dans la liste des ignorer pendant 60 minutes | timer 1 3600 switch -u | timer 1 3602 echo $active * $did(1).seltext $+ !*@* a été effacer de la liste des ignorer }
    elseif ($did == 128) { mode $active +b ~q: $+ $address($did(1).seltext,2) | timer 1 900 switch -u }
    elseif ($did == 129) { mode $active +b ~q: $+ $address($did(1).seltext,2) | timer 1 1800 switch -u }
    elseif ($did == 130) { mode $active +b ~q: $+ $address($did(1).seltext,2) | timer 1 2700 switch -u }
    elseif ($did == 131) { mode $active +b ~q: $+ $address($did(1).seltext,2) | timer 1 3600 switch -u }
    elseif ($did isnum 223-260) { mode $active $did(modo,$did) }
    elseif ($did == 340) { mode $active + $+ $$?="Bans?"  $$?="Nicks?" $did(340) } 
    elseif ($did == 350) { mode $active - $+ $$?="Bans?"  $$?="Nicks?" $did(350) }
    elseif ($did == 995) { mode $active + $+ $$?="Modes?" $did(995) }  
    elseif ($did == 996) { mode $active - $+ $$?="Modes?" $did(996) } 
    elseif ($did == 1013) { mode $active +b ~T:block:ACTION* $did(1013) }
    elseif ($did == 1023) { mode $active -b ~T:block:ACTION* $did(1023) }
    elseif ($did == 1014) { mode $active +b ~n:*!*@* $did(1014) }
    elseif ($did == 1024) { mode $active -b ~n:*!*@* $did(1024) }
    elseif ($did == 1015) { mode $active +b ~q:*!*@* $did(1015) }
    elseif ($did == 1025) { mode $active -b ~q:*!*@* $did(1025) }
    elseif ($did == 1101) { msg $active [Avertos] $did(1).seltext  $+ : %raison1 $did(603) | timer 1 3 did -r $dname 603 | timer 1 5  unset -s %raison1  }
    elseif ($did == 1102) { kick $active $did(1).seltext %raison1  $did(603) | did -r $dname 603 | unset -s %raison1  }
    elseif ($did == 1103) { mode $active +b $address($did(1).seltext,2)  | kick $active $did(1).seltext %raison1 $did(603) | did -r $dname 603 | unset -s %raison1 }
    elseif ($did isnum 1203-1803) { mode $active $did(modo,$did) $did(1).seltext $did(modo,$did) }     
    elseif ($did == 2008) { mode $active +b $address($did(1).seltext,2) $did(2008) }
    elseif ($did == 2009) { mode $active -b $address($did(1).seltext,2) $did(2009) }
    elseif ($did == 2011) { mode $active +b ~n: $+ $address($did(1).seltext,2) $did(2011) }
    elseif ($did == 2012) { mode $active -b ~n: $+ $address($did(1).seltext,2) $did(2012) }
    elseif ($did == 2014) { mode $active +b ~q: $+ $address($did(1).seltext,2) $did(2014) }
    elseif ($did == 2015) { mode $active -b ~q: $+ $address($did(1).seltext,2) $did(2015) }
    elseif ($did == 2017) { mode $active +b $address($did(1).seltext,2) $did(2017) | kick $active $did(1).seltext }
    elseif ($did == 2018) { mode $active -b $address($did(1).seltext,2) $did(2018) }
    elseif ($did == 2225) { mode $active +k %clé $did(2224) | did -r $dname 2224 | unset -s %clé }
    elseif ($did == 2226) { mode $active -k %clé $did(2224)  | did -r $dname 2224 | unset -s %clé }
    elseif ($did == 2235) { mode $active +l %limit $did(2234)  | did -r $dname 2234 | unset -s %limit }
    elseif ($did == 2236) { mode $active -l %limit $did(2234)  | did -r $dname 2234 | unset -s %limit }
    elseif ($did == 2245) { mode $active +L %ulimit $did(2244)  | did -r $dname 2244 | unset -s %ulimit }
    elseif ($did == 2246) { mode $active -L %ulimit $did(2244)  | did -r $dname 2244  | unset -s %ulimit }
    elseif ($did == 2255) { mode $active +f %fs $did(2254)  | did -r $dname 2254 | unset -s %fs }
    elseif ($did == 2256) { mode $active -f %fs $did(2254)  | did -r $dname 2254 | unset -s %fs }
    elseif ($did == 2265) { mode $active +j %js $did(2264)  | did -r $dname 2264 | unset -s %js }
    elseif ($did == 2266) { mode $active -j %js $did(2264)  | did -r $dname 2264 | unset -s %js }
    elseif ($did == 2507) { invite %nick %channel $did(2504) $did(2506) | did -r $dname 2504,2506 | unset -s %nick | unset -s %channel }
    elseif ($did(2).state == 1) { flood } | else { halt }
    elseif ($did(3).state == 1) { clonejoin } | else { halt }
    	}
  }
}
alias flood {
on *:TEXT:*:#:{
  inc -u3 %flood. [ $+ [ $nick ] ]
  if (%flood. [ $+ [ $nick ] ] == 4) {
    ban $chan $address($nick,1)
    kick $chan $nick Le flood n'est pas autoriser dans $chan
  }
}
on @*:JOIN:#:{ 
  if ($ial == $false) {
    .ial on 
  }
  elseif ($chan(#).ial == $false) {
    who # 
    halt
  } 
  .timerclone $+ $nick $+ $chan 1 3 clonejoin $nick $chan $wildsite
}
alias clonejoin {
  var %total = $ialchan($3,$2,0)
  var %x 1
  while (%x <= $ialchan($3,$2,0)) {
    if ($left($ialchan($3,$2,%x).pnick,1) == @) {
      goto end
    }
    else {
      inc %x
    }
  }
  if (%total > 1 && %total < 2) { 
    notice $1 $+($chr(2),Attention:,$chr(2)) $+($1,$chr(44)) Les clones ne sont pas autoriser dans $+($2,.) Ne prenez pas d'autre clones ou vous serez banni.
  }
  elseif (%total > 3) { 
    ban -u120 $2 $1 2 
    var %i = 0 
    while (%i < %total) { 
      inc %i 
      var %nick = $ialchan($3,$2,%i).nick 
      var %all.nicks = $addtok(%all.nicks,%nick,32) 
      if (%nick !isop $2) { 
        kick $2 %nick Avoir plus de  2 clones n'est pas autoriser dans # $+ .
      } 
    } 
    echo 14 -a Attaque de clone détectée $3 $+ : %all.nicks 
  }
  :end
}

Conclusion

amélioration, bug, commentaires, dites le moi ;)
enjoy =D

Historique

28 juin 2007 15:07:54 :: Petite amélioration sur les conseils d'IsOkA et de Wims
28 juin 2007 16:06:08 :: screenshot + amélioration
29 juin 2007 13:48:18 :: rajout d'une protection contre le flood et contre les attaques de clones.
30 juin 2007 20:18:23 :: changement de l'alias flood

Sources du même auteur

AUTO-CONNEXION/AUTO-JOIN MULTI-IDENT ET MULTI-SERVER COMPLET

AUTO JOIN MULTI SERVEUR EN HASH TABLE

COMMANDES EVA EN DIALOG

Toutes les sources de doob666

Sources de la même categorie

LAZER (JEU EN PICWIN) par Zova

MP3 EN DIALOG ET INPUT par Vor4x

WORLDDMT - DETECTEUR DE PSEUDOS ET DE CLONES + AFFICHEUR DE ... par WorldDMT

TELECHARGEMENT DE FICHIER PAR PROTOCOLE HTTP 1.0 VIA SOCKET par hisoka2501

LISTE COACH/FONDATEURS/MEMBRES POUR ORANGE par m0zilla

Toutes les sources de la catégorie AddOns

Sources en rapport avec celle ci

SCRIPT POUR ADMIN STRESSÉ AFFRONTANT UNE URGENCE. par ouroumov

LOGCHAN BY DIIMS :: POUR BOT :: TOTALEMENT CONFIGURABLE par sodims

NICK SCAN SUR TOUT LES SALONS :) par ExtenZ93

NICK PRÉCÉDENT. par raptorolympe

WHOIS CHAN SÉQUENTIEL par watchmeimfamous

Commentaires et avis

Commentaire de ISoKa le 27/06/2007 21:33:27

Si je me trompe pas on devrait pouvoir raccourcir de la facon suivante :

# if ($did == 223) { /mode $active +c }
# if ($did == 224) { /mode $active -c }
# if ($did == 226) { /mode $active +i }
# if ($did == 227) { /mode $active -i }
# if ($did == 228) { /mode $active +m }
# if ($did == 229) { /mode $active -m }
# if ($did == 230) { /mode $active +p }
# if ($did == 231) { /mode $active -p }
# if ($did == 232) { /mode $active +s }
# if ($did == 233) { /mode $active -s }
# if ($did == 235) { /mode $active +u }
# if ($did == 236) { /mode $active -u }
# if ($did == 237) { /mode $active +iK }
# if ($did == 238) { /mode $active -iK }
# if ($did == 239) { /mode $active +nt }
# if ($did == 240) { /mode $active -nt }
# if ($did == 241) { /mode $active +A }
# if ($did == 242) { /mode $active -A }
# if ($did == 244) { /mode $active +C }
# if ($did == 245) { /mode $active -C }
# if ($did == 246) { /mode $active +G }
# if ($did == 247) { /mode $active -G }
# if ($did == 248) { /mode $active +N }
# if ($did == 249) { /mode $active -N }
# if ($did == 250) { /mode $active +O }
# if ($did == 251) { /mode $active -O }
# if ($did == 252) { /mode $active +R }
# if ($did == 253) { /mode $active -R }
# if ($did == 254) { /mode $active +S }
# if ($did == 255) { /mode $active -S }
# if ($did == 256) { /mode $active +T }
# if ($did == 257) { /mode $active -T }
# if ($did == 259) { /mode $active +V }
# if ($did == 260) { /mode $active -V }

devient :
if ($did isnum 223-260) { mode $active $did(modo,$did) }

# if ($did == 1202) { /mode $active +v $did(1).seltext $did(1202) }
# if ($did == 1203) { /mode $active -v $did(1).seltext $did(1203) }
# if ($did == 1302) { /mode $active +h $did(1).seltext $did(1302) }
# if ($did == 1303) { /mode $active -h $did(1).seltext $did(1303) }
# if ($did == 1402) { /mode $active +o $did(1).seltext $did(1402) }
# if ($did == 1403) { /mode $active -o $did(1).seltext $did(1403) }
# if ($did == 1502) { /mode $active +a $did(1).seltext $did(1502) }
# if ($did == 1503) { /mode $active -a $did(1).seltext $did(1503) }
# if ($did == 1602) { /mode $active +q $did(1).seltext $did(1602) }
# if ($did == 1603) { /mode $active -q $did(1).seltext $did(1603) }
# if ($did == 1702) { /mode $active +I $did(1).seltext $did(1702) }
# if ($did == 1703) { /mode $active -I $did(1).seltext $did(1703) }
# if ($did == 1802) { /mode $active +e $did(1).seltext $did(1802) }
# if ($did == 1803) { /mode $active -e $did(1).seltext $did(1803) }

devient :
if ($did isnum 1203-1803) { mode $active $did(modo,$did) $did(1).seltext $did(modo,$did)}

et je pense que sur ce mm genre de principe on doit pouvoir raccourcir le code, de plus essai de poser des elseif au lieu de tous tes if
sinon ca a l'air à peu prés complet oui.

Commentaire de wims le 27/06/2007 22:10:14

Tu peux utiliser le switch -u pour les commande /ban et /ignore, qui retire l'ignore/ban apres le temps que tu as spécifié

Commentaire de ISoKa le 28/06/2007 01:11:11

ha oui j'y pense pour un truc vraiment complet un system anti flood ,attaque de clones et autres plaisirs du genre parametrables pourrai etre sympa :)

Commentaire de COOLMAN002 le 28/06/2007 03:52:39

Bonsoir,

Un screen du dialog serait pas trop mal pour donner un aperçu...

J'avais un dialog a l'epoque que j'avais docké sur la gauche et qui contenait
dans une liste:
Les salons sur lequel j'étais.
Les gens sur le chan actif/selectionnés

et des boutons:
Qui s'activait (ou non) suivant mon status (halfop/op/ircop)

avec un edit pour pouvoir mettre la raison des kicks/ban..

et tout ca était en mass... (voice/devoice/halfop/op/kick/ban/mode ect.)
améliore ca, poste un screen, et comme te l'a signalé Wims (le vilain d'ailleur) utilise le switch -u, et comme t'a dit ISoKa, anti flood, attaque de clone et autre se serait pas mal... avec pk pas, une alias genre sF10 (Shift+F10) pour kick si l'user flood une fois, ban si déjà pris kick ect.

Ps: Wims est très très vilain.

Commentaire de wims le 28/06/2007 04:05:16

Lol ! viens donc jouer avec MM & $me ;x (new jeux)

histoire de pas faire un commentaire pour rien (merci CM) vires les {} inutiles, quand tu n'effectue qu'une seule commande, ça accélère le traitement

Commentaire de doob666 le 28/06/2007 14:23:42

sans le switch : timer 1 900 ignore -r $did(1).seltext // avec le switch : timer 1 900 switch -u $did(1).seltext
pour tes raccourcis IsOkA ça marche
Le reste des améliorations ça se fera quand j'aurais finis l'autre source (très peu de temps en ce moment)

Commentaire de doob666 le 28/06/2007 16:25:12

pour la protection du flood elle y est déjà
edit %fs, 2254, 30 315 90 20, tab 11 autohs center
button "+f", 2255, 125 315 26 20, tab 11
button "-f", 2256, 155 315 26 20, tab 11
text "Flood #:#", 2257, 205 315 80 20, tab 11

j'en rajoute une pour voila car il ne prend pas ce mode ( grrr il peuvent pas faire comme les autres)

Commentaire de COOLMAN002 le 28/06/2007 18:35:52

cette anti flood n'est pas terrible... certe il permet de configurer beaucoup de chose, encore faut-il se renseigner sur le site d'unrealircd!

Alors qu'un antiflood que tu fais et qu'on configure via un dialog ce sera certe, un peu long, mais plus clair pour les gens qui veulent pas lire les infos d'unrealircd.

Commentaire de doob666 le 28/06/2007 19:31:46

Coolman02, je comprend bien, c'est pour ça que je le refait. Je vais me servir de hash table, il sera actif sur tous les chans ou on sera op et on pourra configurer au dessus de quel nombre de phrase on kick ban 5min.

cela est-il suffisant ou il faut que je lui rajoute certaine fonctionnalité?

qu'entends tu par "et autre"? je sèche là. l'attaque de clone je ne l'avais pas fait car je l'ai sur un autre addon que je vais implémenter sur celui là. sinon je vois pas. dit m'en plus sur ce que tu pense utile de voir apparaitre.

Commentaire de COOLMAN002 le 29/06/2007 21:34:06

Quand je dis "autre" je pense à "l'anti majuscule" et à "l'anti spam" (par exemple)

Ton alias flood... comment dirais-je... elle fonctionne !?
Ton alias clone tu peux la mettre en local (-l), a quoi sert le ":begin", plutôt que de "if" "if" et encore "if", utilises:
if
elseif
else

Voilà ^^

Commentaire de doob666 le 30/06/2007 20:23:57

voili voilou j'ai changer l'alias flood (je pensais que ça pourrait marcher mais vu que je ne fait aucun test j'en étais pas sur)
je fais l'antispam :
on @*:text:*:#:{
if ( $len($1-) >= 15 ) && ( $nick isreg # ) {
if ( $calc($regex($1-,/[A-Z]/g) / $regex($1-,/[A-Z]/gi) * 100) >= 60 ) kick # $nick $v1 $+ % Flood de majuscule
}
}
normallement ça doit marcher. il faut que je modifie le dialog et que je fasse l'antispam et normallement ça sera bon. autre chose Coolman002?

pour le switch -u y'as un truc qui foire ça m'énèrve...j'ai passer le code à un pote et.... ça ne désignore/débanni pas...

Commentaire de COOLMAN002 le 01/07/2007 19:34:34

Euh, tu peux alléger le code...
regarde le nombre de fois où tu utilises "$address($did(1).seltext,2)"... une petit var et hop, le tour est joué.

Mets tes alias en local (pour éviter un confli avec d'autre alias que la personne aurait dans son script)

vérifie que le dialog n'est pas déjà ouvert quand la personne veut l'ouvrir

Commentaire de ISoKa le 02/07/2007 01:41:58

bsr,
ton antiflood est correct en parti à mon avi, je m'explique, si tu as :
(pseudo) skljhv
(pseudo) lkjhg
(pseudo) vzjfzk
(pseudo) jblfkbfkl
et cela trés vite ca se declenche ok, mais si il y a :
(pseudo)gggggggggggggggggggggggggggggggggggggggggggggggggggggg
(pseudo)gggggggggggggggggggggggggggggggggggggggggggggggggggggg
ou encore :
(pseudo) n,fklfnlkfnlkb posjvpdsjvpjo kjhhoipjpo
(pseudo) lnvlnvljn jvksjvksjvp lklmkjkljhuiguig
là tu vois rien avec ton systeme je pense dons qu'il faudrait envisager ces cas là :)

Commentaire de SnOOpss le 02/07/2007 17:20:16

Personnellement je trouve ca tres lourd.
Pourquoi un boutton +o et un -o il suffit de faire un boutton "hop/dehop" et le script hope ou dehope en fonction du status deja present, vu que ce remote ne traite qu'un seul pseudo et ne gere pas la multiselection.
Pareil pour les modes du salon (+x et -x) la plupart des remotes de ce genre possedent un simple check a cocher ou decocher.
Tu veut gerer les ignores ? Dans ce cas offre la possiblité d'ignorer juste en pv ou juste en notice.
Sinon j'ai une question con (désolé je suis plus au jus), avec la protection anti-flood deja integrée aux serveurs, qu'apporte le silence de plus que l'ignore vu que le client pourra supporter les envois massif de données d'un user (A moins que cette protection n'existe pas sur tout les serveurs)

Commentaire de SnOOpss le 02/07/2007 17:30:54

if (%total > 1 && %total < 2) {
..
elseif (%total > 3) {

et si %total = 2 ou 3 ????

Commentaire de COOLMAN002 le 03/07/2007 16:15:55

bah si %total = 2 ou 3, c'est que 2 ou 3 clones sont autorisés :)

Commentaire de wims le 03/07/2007 17:10:34

if (%total > 1 && %total < 2) {

%total peux etre un décimaux ? entre 1 et 2 ? parce que un nombre entier supérieur a 1 et inférieur a 2, tu vas avoir du mal a valider cette condition non ^^ ?

Ps: CM est vilain

Commentaire de SnOOpss le 04/07/2007 17:21:57

Dans son test, sa teste si le total est inferieur a 2 ou si il est superieur a 3 mais pas si il est egal a 2 ou egal a 3.

Commentaire de runinho le 16/07/2008 15:24:29

ton code est interressant mais on peut le raccourcir

Ajouter un commentaire

Discussions en rapport avec ce code source dans le forum

Nick du chan en gras [ par Cyberdeeder ] J'aimerai savoir quel est l'on input pour que quand le pseudo de quelqu'un qui est sur le chan est dans une phrase, que le pseudo apparaisse en gras ? Réponse à un changement de nick particulier [ par Tizrael ] Salut,Je voudrais savoir quelle est le commande a utiliser pour que mon bot réponde par une phrase spéciale a un changement de nickname particulier.Du optimiser mon code [ par docLegi ] bon, voilà j'ai commencé à scripter il y a quelque temps, j'ai deja scripté un certain nombre de trucs et j'aimerais optimiser mon code, parce que je msg abienvenue friendlist [ par retaks666 ] voila, j'aimerais dire bonjour a certaine personne kan elels se connecte sur un chan.. j'ai dabors pensez en récupérant leur nick avec on *:join:#: { isop [ par wbr ] on *^:text:*:#:{ inc $+(%,flood,$address,$chan) 1 if ($eval($+(%,flood,$address,$chan),2) <= 5) { .timer $+ $address 1 3 unset $+(%,flood,$hos COmment installé une sources [ par evilpikashoot69 ] Erfe rf erf , tetre ke cette question a deja ete pose , mais je capte rien voila comment ona jout des sources a mirc 6.02 ???j'aimeré rajouté :on @1:B bon ba jmé tt ds le msg c mieu :) [ par ckemoua2 ] j'kommence par ce que j'ai fais çà sera plus compréhensible.j'ai fai un tit remote anti pub tout " kon " genreon 1:text:$(*.fr*):#:{ if (blabla isin Message de bienvenue [ par trasher ] Salut ! Voila je voulais savoir comment faire pour faire un message de bienvenue :Quand un gar entre sur mon chan, je voudrais lui dire Salut NICK !J' on:text: [ par karukeranet ] Bonjour,Mon Probleme est que je voulais mettre une liste de commande disponible quand un utilisateur tape !help Mais avec la façon que j'ai scripter j J'ai plus l'heure devant les nick !! [ par Bouclette_cathy ] En fouillant dans le forum j'ai trouvé une solution pour l'affichage des @ et des + sur le géné du tchat ... (mon script ne possèdant pas cette foncti