/*
This is the /getnick #channel *!*@*.host Version
*/
ALIAS getnick {
if ((!$1) || ($1 !ischan)) { noop $input(Error ! <#channel> is missing or not a #channel you are on ! Use /getnick <#channel> <*!*@*.host> , or join the #channel,wo,Error) }
if (!$2) { noop $input(Error ! <address> is missing ! Use /getnick <#channel> <*!*@*.host>,wo,Error) }
else {
var %check.chan $1
var %check.addr $2
var %chan.users $nick(%check.chan,0)
var %tmp.user 1
while (%tmp.user <= %chan.users) {
var %tmp.nick $nick(%check.chan,%tmp.user)
var %tmp.addr $address(%tmp.nick,4)
if (%tmp.addr == %check.addr) { echo 0,4INFO: 04 $+ < $+ %tmp.addr $+ >14 is 04< $+ %tmp.nick $+ > }
inc %tmp.user
}
}
}
/*
Tis is the !getnick *!*@*.host Version for the actual channel
*/
ON *:TEXT:!getnick*:#: {
if (!$2) {
me 0,4GETNICK-ERROR 14Use the Command04 !getnick *!*@*.host
me 0,4GETNICK-ERROR 14Replace 04*!*@*.host 14with the current User Address in this Format !
}
else {
var %check.chan $chan
var %check.addr $2
var %chan.users $nick(%check.chan,0)
var %tmp.user 1
while (%tmp.user <= %chan.users) {
var %tmp.nick $nick(%check.chan,%tmp.user)
var %tmp.addr $address(%tmp.nick,4)
if (%tmp.addr == %check.addr) { me 0,4GETNICK-INFO: 04 $+ < $+ %tmp.addr $+ >14 is 04< $+ %tmp.nick $+ > }
inc %tmp.user
}
}
}