count {
  var %isop = NO | if ($me isop $chan) { var %isop = YES }
  var %vexpr = $nick($chan,0,v) $+ / $+ $nick($chan,0) $+ *100
  var %oexpr = $nick($chan,0,o) $+ / $+ $nick($chan,0) $+ *100
  var %rexpr = $nick($chan,0,r,vo) $+ / $+ $nick($chan,0) $+ *100 
  /msg $chan  12,1«0,1:12:0,1:12,1»0 Server:  $+ $network $+  12,1«0,1:12:0,1:12,1»0 Channel:  $+ $chan $+  12,1«0,1:12:0,1:12,1»0 Total:  $+ $nick($chan,0) $+  (100%) 12,1«0,1:12:0,1:12,1»0 Ops:  $+ $nick($chan,0,o) $+  ( $+ $left($calc(%oexpr),5) $+ $chr(37) $+ ) 12,1«0,1:12:0,1:12,1»0 Voices:  $+ $nick($chan,0,v) $+  ( $+ $left($calc(%vexpr),5) $+ $chr(37) $+ ) 12,1«0,1:12:0,1:12,1»0 Regular:  $+ $nick($chan,0,r,ov) $+  ( $+ $left($calc(%rexpr),5) $+ $chr(37) $+ ) 12,1«0,1:12:0,1:12,1»0 Opped:  $+ %isop $+  12,1«0,1:12:0,1:12,1»0 
}