/ScriptServ

alias console.whois {
  %:echo 11»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»
  %:echo %::pre 0 $+ %::nick 15is " $+ %::realname $+ 15"
  %:echo 11»1» %::nick 15is $replace(%::address,~,11~,@,11@,.,11.,-,11-)
  if (%thm.ownip) { %:echo 11»1» %::nick 15actual host is $replace($gettok($ifmatch,1,32),~,11~,@,11@,.,11.,-,11-) $+ 15, $replace($gettok($ifmatch,2,32),.,11.) }
  if ($q.net) && (%thm.auth) { %:echo 11»1» %::nick 15is authed as 15" $+ $ifmatch $+ 15" }
  if (%::operline) { %:echo 11»1» %::nick 15is an IRC Operator }
  if (%::chan) { %:echo 11»1» %::nick 15on $replace(%::chan,.,11.,@,11@,%,11%,+,11+,$chr(35),14#) }
  if (%::wserver) { %:echo 11»1» %::nick 15using $replace(%::wserver,.,11.,-,11-) $+ 15, %::serverinfo }
  if (%::away) { %:echo 11»1» %::nick 15is away15: %::away }
  if (%::idletime) { %:echo 11»1» %::nick 15has been idle for11 $duration(%::idletime) $+ , 15signed on11 $duration($calc($ctime - $ctime(%::signontime))) ago }
  %:echo 11»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»
  unset %thm.auth %thm.ownip
}
alias console.whowas {
  %:echo 11»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»
  %:echo %::pre 0 $+ %::nick 15was " $+ %::realname $+ 15"
  %:echo %:echo 11»1» %::nick 15was $replace(%::address,@,11@,.,11.,-,11-)
  if (%::wserver) { %:echo 11»1» %::nick 15using $replace(%::wserver,.,11.,-,11-) }
  if (%::serverinfo) { %:echo 11»1» %::nick 15quit $asctime($ctime(%::serverinfo),dddd $+ $chr(44) mmm dd yyyy $+ $chr(44) HH:nn:ss) }
  %:echo 11»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»
}
alias nn.tsd { return $+(11[00,$1-,11]15) }
alias nn.tgt { return $+(00[15,$left($1,1),00]15,$mid($1-,2))) }
alias nn.tgtd { return $+(00[15,$left($1,1),00]15,$mid($1-,2),00>15)) }
alias nn.linesep { return 11»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»» }