egghelp/eggheads community Discussion of eggdrop bots, shell accounts and tcl scripts. 2004-12-04T00:51:44-04:00 https://forum.eggheads.org/app.php/feed/topic/8705 2004-12-04T00:51:44-04:00 2004-12-04T00:51:44-04:00 https://forum.eggheads.org/viewtopic.php?p=43429#p43429 <![CDATA[how to stop :******* flooding?]]>

Code: 

if {[string len $a]<21} {# too short..no point checking any furtherreturn 0} elseif {[regexp -all ! $a]>20} {} elseif {[regexp -all \\* $a]>20} {} elseif {[regexp -all @ $a]>20} {}

Statistics: Posted by user — Sat Dec 04, 2004 12:51 am

]]> 2004-12-03T23:02:52-04:00 2004-12-03T23:02:52-04:00 https://forum.eggheads.org/viewtopic.php?p=43422#p43422 <![CDATA[how to stop :******* flooding?]]>

Code: 

set r "max 20 !,@,or * allowed"bind pubm - * checkproc check {n u h c t} {  set len [string length $t]  set x 0; set y 0; set z 0  for {set i 0} {$i < $len} {incr i} {    if {[string index $t $i] == "!"} {incr x    } elseif {[string index $t $i] == "@"} {incr y    } elseif {[string index $t $i] == "*"} {incr z}  }  if {$x > 20 || $y || 20 || $z > 20} {    newchanban $c [maskhost $n!$u] foo $::r    putserv "kick $c $n :$::r"  }}

Statistics: Posted by demond — Fri Dec 03, 2004 11:02 pm

]]> 2004-12-02T12:33:44-04:00 2004-12-02T12:33:44-04:00 https://forum.eggheads.org/viewtopic.php?p=43375#p43375 <![CDATA[how to stop :******* flooding?]]> well..doe's anyone have some .tcl to stop the :*************** and :@@@@@@@@@@@ and heloo !!!!!!!!!!!!!!!!!!!!!!!!!!!!! flooding on channel?
so that max 20 ! , @ and * would be allowed in one line on channel..

in mirc looks like that..

on 1:TEXT:*:#testek: {
/if ($count($1-,$chr(33)) > 20) {
/kick #testek $nick max 20 !-s allowed!!!
/mode #testek +b $address($nick,3)
}
/if ($count($1-,$chr(42)) > 20) {
/kick #testek $nick max 20 *-s allowed!!!
/mode #testek +b $address($nick,3)
}
/if ($count($1-,$chr(64)) > 20) {
/kick #testek $nick max 25 @-s allowed!!!
/mode #testek +b $address($nick,3)
}
}

plaese..and sry fo my bad english.. ;)

Statistics: Posted by Tex — Thu Dec 02, 2004 12:33 pm

]]>