/realname alias

By PuNkTuReD on Jan 28, 2009

ok so this was asked for on the forums so i thought i would bring it here too

basically this is to retrieve the "real name" of a nick

Syntax: /realname

and it wont affect normal /whois querys

raw 311:*: {
  if ($($+(%,xx),2) == 1) {
    set -u2 $+(%,checking,.,name) 1
    set -u2 $+(%,$2,.,name) $remove($6-,$chr(58))
    .echo -a $2 Realname: $($+(%,$2,.,name),2)
  }
  haltdef
}
raw 312:*: {
  if ($($+(%,checking,.,name),2) == 1) { haltdef }
}
raw 317:*: {
  if ($($+(%,checking,.,name),2) == 1) { haltdef }
}
raw 318:*: {
  if ($($+(%,checking,.,name),2) == 1) { haltdef }
}
raw 319:*: {
  if ($($+(%,checking,.,name),2) == 1) { haltdef }
}
alias realname { set -u2 %xx 1 | .whois $1 }

Like Page Follow Author

Comments

PuNkTuReD - Jan 29, 2009

lol nice napa182
i thought u would have had
$+($2,$chr(39),s,$chr(32),Realname,$chr(58))

nice real name btw hahahahahaha

Respond

napa182 - Jan 28, 2009

you could use tokens on this to shorten it up some

alias realname { set -u3 %^1 on | whois $$1 }
raw *:*: {
  if (%^1) {
    if ($istok(317 318 313 335 312 319 307 310 378 379,$numeric,32)) { haltdef }
    elseif ($numeric == 311) { echo -a $+($2,'s) Realname: $gettok($1-,2,42) | haltdef }
  }
}

or this

alias realname { set -u5 %^1 on | whois $$1 }
raw *:*: { if (%^1) { $iif($istok(317 318 313 335 312 319 307 310 378 379,$numeric,32),haltdef,$iif($numeric == 311,echo -a $+($2,'s) Realname: $gettok($1-,2,42))) | haltdef } }

napa182's Realname: ,,|,,_(><)__,,|,,
heh

Respond