Anonymous

alias power { 
  var %op = 0, %halfop = 0, %voice = 0, %peons = 0, %total = 0, %chans = 0, %reg = 0 
  var %a = 1 
  while (%a <= $scon(0)) { 
    .scon %a 
    var %b = 1 
    inc %chans $chan(0) 
    while (%b <= $chan(0)) { 
      if ($me isop $chan(%b)) { .inc %op | inc %total $nick($chan(%b),0) | inc %peons $nick($chan(%b),0,rh) | inc %b } 
      elseif ($me ishop $chan(%b)) { inc %halfop | inc %total $nick($chan(%b),0) | inc %peons $nick($chan(%b),0,rh) | inc %b } 
      elseif ($me isvoice $chan(%b)) { inc %voice | inc %total $nick($chan(%b),0) | inc %b } 
      elseif ($me isreg $chan(%b)) { inc %reg | inc %total $nick($chan(%b),0) | inc %b } 
      else { inc %total $nick($chan(%b),0) | inc %b } 
    } 
    inc %a 
  } 
  .scon -r 
  msg $chan 15][My Power15][On 4 $+ $chan(0) $+  Chans:15][4OP %op $+ 15][7HOP %halfop $+ 15][12VOICE %voice $+ 15][10REG %reg $+ 15][ I control4 $+(%peons,/,%total) 15][4 $ceil($calc((%peons / %total)*100)) $+ % 15][1 users over 15][4 $scon(0) 1networks 15][
}