alias scan {
 ^local scops,scvoice,scnormal,sctotal,passusers
 ^local scanops,scanvoice,scannormal
 if ([$0]) { @scchan=[$0] } { @scchan=[$C] }
 fe ($chanusers($scchan)) chanuser {
  if (ischanop($chanuser $scchan)) { @scanops=[$scanops @$chanuser);@scops++} {
   if (isvoice($scchan $chanuser)) { @scanvoice=[$scanops +$chanuser);@scvoice++} {
    @push(scannormal $chanuser);@scnormal++ }
  }
 }
 if (!scops) { @scops=[0] }
 if (!scnormal) { @scnormal=[0] }
 if (!scvoice) { @scvoice=[0] }
 @sctotal=[$scops$scvoice$scnormal]
 echo $cparse("$G $scthem[header][$currsctheme]")
 @passusers=[$scanops $scanvoice $scannormal]
 scan.show $currsctheme $passusers
}

