[script]
n0=#raw off
n1=raw 352:*:{
n2=  if ( $chr(42) isin $7 ) { inc %ircopnicks 1 }
n3=  if ($left($7,1) == H) { inc %herenicks 1 }
n4=  elseif ($left($7,1) == G) { inc %gonenicks 1 }
n5=}
n6=raw 315:*:{
n7=  if ( %gonenicks == $null ) { set %gonenicks 0 }
n8=  if ( %herenicks == $null ) { set %herenicks 0 }
n9=  if ( %ircopnicks == $null ) { set %ircopnicks 0 } 
n10=  set %herenicks2 $calc($calc(100 / $nick($2,0)) * %herenicks)
n11=  set %gonenicks2 $calc($calc(100 / $nick($2,0)) * %gonenicks)
n12=  set %ircopnicks2 $calc($calc(100 / $nick($2,0)) * %ircopnicks)
n13=  msg %stats.nick  
n14=  msg %stats.nick 0,2      Scan of %stats.chan       
n15=  msg %stats.nick 12,0Here  :1 %herenicks 4(10 $round(%herenicks2,1) $+ % 4)
n16=  msg %stats.nick 12,0Away  :1 %gonenicks 4(10 $round(%gonenicks2,1) $+ % 4)
n17=  msg %stats.nick 12,0IRcops:1 %ircopnicks  4(10 $round(%ircopnicks2,1) $+ % 4)
n18=  unset %herenicks %herenicks2 %gonenicks %gonenicks2 %ircopnicks %ircopnicks2 %stats.chan %stats %stats.nick
n19=  .disable #raw 
n20=}
n21=#raw end
n22=on 100:text:!scan:#:{
n23=  .enable #raw
n24=  set %stats.chan #
n25=  set %stats.nick $nick
n26=  .who #
n27=}
n28=on 100:text:!stats:#:{
n29=  msg $nick   
n30=  msg $nick 0,2      Stats of $chan       
n31=  msg $nick      12,0Ops            :1 $opnick($chan,0) 
n32=  msg $nick      12,0Voice          :1 $vnick($chan,0) 
n33=  msg $nick      12,0Non-Ops/Voice's:1 $opnick($chan,0) 
n34=  msg $nick      12,0===================
n35=  msg $nick      12,0Total          :1 $nick($chan,0) 
n36=}
n37=on 1:text:*:?:{
n38=  if ($left($1,1) != $chr(33)) { .msg #AutoBot < $+ $nick $+ > $1- }
n39=}