caps problem - 20/11/04 10:30 PM
I have this code:
but from time to time it "miss fire", it kick a user that dont use caps, somone that have a bether way to do this ? not nice to kick people that dont derseve it :tongue:
they get the user level CAPS1 by the same code, but thats triggered by everyone.. so no need to paste that part too here..
Code:
on CAPS1:TEXT:*:#:{ if ($me isop $chan) { var %1- .echo -q $regsub($1-,/[^a-zA-Z0-9ÄÖ]/g,,%1-) if (%dkickop == off) && ($nick isop $chan) { return } if (%dkickvo == off) && ($nick isvo $chan) { return } if ($ulevel == 200) && (%ctcp.op == Enabled) { return } if ($ulevel == 125) && (%Group.AutoOp == Enabled) { return } if ($ulevel == 100) && (%friend == Enabled) { return } if ($ulevel == 75) && (%a.voice == Enabled) { return } else { if ($read($mircdir\dontckick.mrc,w,* $+ $chan $+ *)) { return } if ($int($calc(($regex(%1-,/[A-ZÄÖ]/g) / $len(%1-)) * 100)) > 75) { .ruser CAPS1 $nick | ban -u $+ %caps.b # $nick %bs | kick $chan $nick You have been warned. turn off your CAPSLOCK. } } } }
but from time to time it "miss fire", it kick a user that dont use caps, somone that have a bether way to do this ? not nice to kick people that dont derseve it :tongue:
they get the user level CAPS1 by the same code, but thats triggered by everyone.. so no need to paste that part too here..