When you type power. It tells how much power you have. (In The Active Channel.)
alias power {
var %tc = 0,%tu = 0,%oc = 0,%po = 0,%i = $scid(0)
while (%i) {
scid $scon(%i)
if ($status == connected) {
var %c = $chan(0)
while (%c) {
inc %tc
inc %tu $calc($nick($chan(%c),0) -1)
if ($me isop $chan(%c)) {
inc %oc
inc %po $calc($nick($chan(%c),0) -1)
}
dec %c
}
}
dec %i
}
scid -r
if (!$isid) {
if ($1 == -e) { echo -a $gtd(Stats) you're opped in $sd($+(%oc,/,%tc)) channels on $sd($scid(0)) $iif($scid(0) == 1,network.,networks.) You have the power over $sd($+(%po,/,%tu)) users. }
else { say I'm opped in $+(12[,%oc,/,%tc,12])$+ channels on $+(12[,$scid(0),12]) $iif($scid(0) == 1,network.,networks.) I have the power over $+(12[,%po,/,%tu,12])$+ users. 4-15Rage Power4- }
}
else { return %po }
}