just use /pow

alias pow { 
  %x = 1
  while (%x <= $chan(0)) {
    if ($me isop $chan(%x)) { var %opc $addtok(%opc,$chan(%x),32) | var %cpl $calc(%cpl + $nick($chan(%x),0)) }
    if ($me isvoice $chan(%x)) { var %vc $addtok(%vc,$chan(%x),32) }
    if ($me isreg $chan(%x)) { var %rc $addtok(%rc,$chan(%x),32) }
    inc %x 
  }
  echo -a [Power]: You're control %cpl users on $network $+ .
  echo -a [Opped]: %opc chans. :|: [Voiced]: %vc chans. :|: [Reg]: %rc chans.
  echo -a [Totaly]: You're on $chan(0) channels, make sure you got enough respect. (+/@)
}