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 }