By Urza on Nov 10, 2005Just a little alias i made to check which users in a channel are registered (and identified - unidentified nicks will show up as unregistered even if they are actually registered)
Usage:
/regscan [#channel] [#channel|nick]
The first #channel is the channel to be scanned, if left out the active channel is used.
The second #channel|nick refers to the channel or nick you want to send the results too. If left out it will just echo in the active window.
Note: If you specify a nick, but no channel, it will scan the active channel and send the results to the specified nick
Examples:
/regscan - scans active window and echo's results
/regscan #urza - scans #urza and echos
/regscan Urza - will scan the active channel and msg the results to Urza.
/regscan #urza #urza - scans #urza and sends the results to the channel
@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
Somethings is mest up.
[17:46] <&[SI]Raid> RegScan results for users in #si
[17:46] <&[SI]Raid> Total: 224 - Invisible: -206 - Registered: 11 - UnRegistered: 7
hmmm didn`t work for me too, averytime no results for registered nicks look...
RegScan results for users in #PU-Informatika
Total: 9 - Invisible: 0 - Registered: 0 - UnRegistered: 9
Registered Nicks:
Unregsistered Nicks: SteeleRmope, ^hAh0vecaway, Malaisacoffee, Gerbil, Peach0ff, Tindor, oliuf_out, azrodzZzZz, CS
maybe the problem is in my server... \"irc.lirex.com\" help me plz ;]
Foamy - do you get any kind of errors?
Make sure you copy it into your remotes section
Raid - for your popup, if you want it to always msg the channel its scanning you can use something like:
.Scan a channel msg that channel: var %c #$$?=\"Scan channel\" | /regscan $! $!
that way you only need to enter the channel name once.
It works great for me, and is kind of cool.
RegScan results for users in #si
Total: 17 - Invisible: 0 - Registered: 12 - UnRegistered: 5
Registered Nicks: [SI]Raid, |SI|SPKTrini, DiNaleKnight, |HM|Halos, |SI|Zombieduelist, Reyz, |SI|Savage_Wolf, [SI]Guts, DarthVader, jAYjAY, Invisible, {GOL}Sp0rkeh
Unregsistered Nicks: |H||SI|br3ak3r, Immortality, |SI|B[a]tt, |SI|Xtry, Lord|SignOff
I\'m being lazy so I added this to the top of the script. On the second just type the channel twice.
Menu Channel {
Registered Scanner
.Scan active and echo:/regscan
.Scan a channel msg that channel:/regscan $?=\"Scan channel\" $?=\"Channel\"
}