Try this:

Code:

alias power {
  var %an = 0, %ao = 0, %ah = 0, %av = 0, %ch
  var %cs = 0, %n = 0, %nn = $scon(0)
  while (%n < %nn) {
    inc %n
    scon %n

    var %c = 0, %cc = $chan(0)
    while (%c < %cc) {
      inc %c
      inc %cs
      %ch = $chan(%c)

      if ($me isop %ch) inc %an $nick(%ch,0,a,o)
      elseif ($me ishop %ch) inc %an $nick(%ch,0,a,oh)

      if ($me isop %ch) inc %ao
      if ($me ishop %ch) inc %ah
      if ($me isvoice %ch) inc %av
    }
  }
  scon -r

  msg $active $+($_a(Connected Here Via:) $_b($server),$_a(. I Have:) $_c(%ao,%cs) $_a(Ops) $_c(%ah,%cs) $&
    $_a(Help-Ops and) $_c(%av,%cs) $_a(Voices. I Am On) $_c(%nn) $_a(Network $+ $iif(%nn != 1,s) $+ .) $&
    $_a(I Have Control Over) $_c(%an) $_a(Mortal Victims.) $drdev_pwrlogo 7By $drdev_teamlogo)
}
alias _a return $regsubex($1-,/([\s-]|^)([a-z.])/gi,$+(\1,15,\2,14)) $+ 
alias _b return $+(10< 12,$1-, 10>)
alias _c return $+(10< 04,$1,$iif($2 != $null,$+(3/04,$2)), 10>)


It goes in the Remotes section.

-genius_at_work