caps kicker
mIRC Code
+ 0 likes
Please Register to submit score.
| Average Score | 4.0 |
| Scores Submitted | 1 |
| Date Added | Sep 30, 2007 |
| Last Updated | Sep 30, 2007 |
| Tags | caps kicker |
|
|
Introduction
mIRC Snippet:
caps kicker
Posted on Sep 30, 2007 10:20 pm
Posted on Sep 30, 2007 10:20 pm
you can use
then you can have a way to set the percent of caps you want to kick for like
or what ever
| Code: |
| if ($len($1-) > 5) { var %percent $calc($regex($1-,/[A-Z]/g)/$len($1-)*100) if (%percent > %caps) { |
then you can have a way to set the percent of caps you want to kick for like
| Code: |
| alias capset { set %caps $1 | echo -a I will Now Kick For $1 $+ % Caps } |
or what ever
mIRC Snippet:
caps kicker
Posted on Oct 1, 2007 2:13 pm
Posted on Oct 1, 2007 2:13 pm
you don't really need th $allowedcaps. You can just have a local variable. And you should use $regex as napa said. Really nice work BytchAmy. =)
mIRC Snippet:
caps kicker
Posted on Oct 3, 2007 10:49 pm
Posted on Oct 3, 2007 10:49 pm
First thing. You can't kick someone who's talking to you in a query. You can do this however:
if ($chan) { kick $v1 $nick blah blah }
else { close -m $nick }
Also, the above would work, but you can use this for shorter code too:
on *:TEXT:*:#: {
var %x = 1,%y
while (%x <= $len($1-)) {
if ($right($left($1-,%x),1) isupper) inc %y
inc %x
}
if (%y > $calc($len($1-) * .5)) { do action... }
}
if ($chan) { kick $v1 $nick blah blah }
else { close -m $nick }
Also, the above would work, but you can use this for shorter code too:
on *:TEXT:*:#: {
var %x = 1,%y
while (%x <= $len($1-)) {
if ($right($left($1-,%x),1) isupper) inc %y
inc %x
}
if (%y > $calc($len($1-) * .5)) { do action... }
}
mIRC Snippet:
caps kicker
Posted on Oct 3, 2007 10:50 pm
Posted on Oct 3, 2007 10:50 pm
Whoops I meant .7 not .5 :)
mIRC Snippet:
caps kicker
Posted on Jan 28, 2008 10:44 pm
Posted on Jan 28, 2008 10:44 pm
thanks for your comments :)






