Channel Stats Count
xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx Channel Stats Count xxxxxxxxxxxxxxxxxxxxxxxxxxx
Instruction:
Load This File In Your Mirc Scripts Editor
Then Right Click At Channel Center Screen
Then Press Channel Stat
xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx EyiezInc xxxxxxxxxxxxxxxxxxxxxxxxxxx
menu channel {
Channel Stat: msg $chan $count
}
alias count {
var %h = 1
set %opnick $opnick(#,0)
set %vnick $vnick($chan,0)
set %total $nick(#,0)
while (%h <= %opnick) {
if ($opnick(#,%h) isvo $chan) { dec %vnick }
.set %uop $calc(%total - %opnick - %vnick - $nvnick(#,0))
inc %h
}
return 4[ $+ total user in $remove($chan,$chr(35)) %total $+ 4] 12( $+ %opnick op = $per(%opnick) $+ % $+ 12) 12( $+ %vnick voice = $per(%vnick) $+ % $+ 12) 12( $+ %uop uop = $per(%uop) $+ % $+ 12) 12( $+ $nvnick(#,0) regular = $per($nvnick(#,0)) $+ % $+ 12)
}
alias per {
return $round($calc( $1 / %total * 100),0)
}
hi
/help $nick
$nick(#,N/nick,aohvr,aohvr)
a = all nicks, o = ops, h = halfops, v = voiced, r = regular
$nick(#chan,0,o) return the total number of ops on #chan
$nick(#chan,1,o) return the first op on #chan
$nick(#chan,0,a,o) return the total number of nicks not including ops on #chan
so your code can be
menu channel {
Channel Stat:msg # $count
}
alias -l per return $round($calc( $1 / $nick(#,0) * 100),0) $+ %
alias count {
var %all $nick(#,0),%op $nick(#,0,o),%v $nick(#,0,v),%reg $nick(#,0,r)
return 4[ $+ total user in $remove($chan,$chr(35)) %all $+ 4] 12( $+ %op op = $per(%op) $+ 12) 12( $+ %v voice = $per(%v) $+ 12) 12( $+ %reg regular = $per(%reg) $+ 12)
}