@Urza i hope you don't mind me doing so. but as i use a Bot. i edited it to work for a Bot as well.

on *:TEXT:!Scan *:#: {
  if ($chr(35) !isin $2) && ($chr(35) !isin $chan) { msg $chan 4? Error: No channel specified | halt }
  elseif ($chr(35) isin $2) set %regscan.chan $2
  else { set %regscan.chan $2 }

  who %regscan.chan 
  if ($2) set %regscan.show msg $chan
  elseif ($1) && ($chr(35) !isin $2) set %regscan.show msg $chan
  set %regscan.regcount 0 | set %regscan.nonregcount 0 
  .enable #regscan 
}
#regscan off
raw 352:*: {
  inc %regscan.total
  if (r isin $7) { inc %regscan.regcount | set %regscan.reg %regscan.reg $6 }
  else { inc %regscan.nonregcount | set %regscan.nonreg %regscan.nonreg $6 }
  haltdef
}
raw 315:*: {
  var %regscan.invisible = $calc($nick(%regscan.chan,0) - %regscan.total)
  $iif(%regscan.show,%regscan.show,msg $chan) 4? RegScan results for users in %regscan.chan
  $iif(%regscan.show,%regscan.show,msg $chan) 4? Total:4 %regscan.total - Invisible:4 %regscan.invisible  - Registered:4 %regscan.regcount - UnRegistered:4 %regscan.nonregcount
  $iif(%regscan.show,%regscan.show,msg $chan) 4? Registered Nicks: $replace(%regscan.reg,$chr(32),$chr(44) $+ $chr(32))
  $iif(%regscan.show,%regscan.show,msg $chan) 4? Unregistered Nicks: $replace(%regscan.nonreg,$chr(32),$chr(44) $+ $chr(32))
  unset %regscan.*
  haltdef
  .disable #regscan
}
#regscan end

I hope this is ok. and not breaking the Rules of Hawkee

it works as well as i checked it on my bot. it'll show the selected channel's Registered/Unregistered channels in the channel that the trigger was set in.

Also rated 8/10