Someone

Scan {
  if ($me !ison #ThePC) || ($me !ison #Thepc.staff) { echo 4 -ts Error: I am not on $v2 | halt }
  echo 4 -ts Checking for non IAL entries
  var %x = 1, %y = 0
  while (%x <= $nick(#Thepc,0)) {
    if (!$ial($nick(#Thepc,%x),0)) inc %y
    inc %x
  }
  if (%y = 0) echo 4 -ta All users on #ThePC were found on the IAL.
  else {
    echo 4 -ts Now retrieving hosts from non IAL entries, please run this scan again by typing /CheckChannel $1
    .who #ThePC
    halt
  }
  echo 4 -ts Storing users addressesses...
  remini ThePCaddresses.ini Users
  var %x = 1
  while (%x <= $nick(#thepc,0)) {
    if ($nick(#thepc,%x) == $me) noop
    else writeini ThePCaddresses.ini Users $address($nick(#thepc,%x),2) Yes
    inc %x
  }
  echo 4 -ts Successfully stored the addressesses of %x users
  part #Thepc
  join $1
  if ($me !ison $1) { echo 4 -ts Error: I cannot join $1 | halt }
  echo 4 -ts Now scanning $1 for users who are also in #ThePC
  var %x = 1, %y = 0
  while (%x <= $nick($1,0)) {
    if ($nick(#thepc,%x) == $me) noop
    elseif ($readini(ThePCaddresses.ini,Users,$address($nick($1,%x),2)) == Yes) { inc %y | msg #ThePC.staff $nick($1,%x) is on both $1 and #ThePC Address: $address($nick($1,%x),2) }
    inc %x
  }
  echo 4 -ts %y users in $1 are also in #ThePC, check #ThePC.staff for more details
  part $1
  .timer 1 3 join #ThePC
}