- Code: Select all
/*
Number/Letter counter
By PuNkTuReD
http://www.sassirc.com
*/
on 1:input:*: {
var %a = 0:1:2:3:4:5:6:7:8:9:a:b:c:d:e:f:g:h:i:j:k:l:m:n:o:p:q:r:s:t:u:v:w:x:y:z, %b = $numtok(%a,58), %d = %b
while (%b) { var %c = $gettok(%a,%b,58) | inc $+(%,c,%c) $count($1-,%c) | dec %b }
while (%d) { var %e = $gettok(%a,%d,58), %f = %e = $+($($+(%,c,%e),2),$chr(44)) %f | dec %d }
set %mIRCstats My total number/letter count: %f
}
to check ur stats
//echo -a %mIRCstats
or
//msg $active %mIRCstats