/ScriptServ

alias ls.whois {
  %:echo 04•››››››››››››››››››››››››››››››››› ››››› ››› ›› ›› ›› › ›
  %:echo %::pre 04Whois report for 14( $+ %::nick $+ 14) ( $+ %::address $+ 14)
  %:echo %::pre 04Name:14 %::realname $+ $iif($q.net && %thm.auth,04 $+ $chr(44) 14authed as $ifmatch)
  if (%thm.ownip) { %:echo %::pre 04Real host:14 $gettok($ifmatch,1,32) $+ 04,14 $gettok($ifmatch,2,32) }
  if (%::operline) { %:echo %::pre 04Status:14 IRC Operator }
  if (%::chan) { %:echo %::pre 04Channels:14 $replace(%::chan,$chr(35),$+(,%::c1,$chr(35),14),@,15@14,%,15%14,+,15+14) }
  if (%::wserver) { %:echo %::pre 04Server:14 %::wserver $+ , %::serverinfo }
  if (%::away) { %:echo %::pre 04Away:14 %::away }
  if (%::idletime) {
    %:echo %::pre 04Idle:14 $duration(%::idletime)
    if (%::signontime) { %:echo %::pre 04SignOn:14 $duration($calc($ctime - $ctime(%::signontime))) ago }
  }
  %:echo 04•››››››››››››››››››››››››››››››››› ››››› ››› ›› ›› ›› › ›
  unset %thm.auth %thm.ownip
}
alias ls.whowas {
  %:echo 04•››››››››››››››››››››››››››››››››› ››››› ››› ›› ›› ›› › ›
  %:echo %::pre 04Whowas14 report for 14( $+ %::nick $+ 14)
  %:echo %::pre 04Address:14 %::address
  %:echo %::pre 04Name:14 %::realname
  if (%::wserver) { %:echo %::pre 04Server:14 %::wserver }
  if (%::serverinfo) { %:echo %::pre 04Quit:14 $asctime($ctime(%::serverinfo),dddd $+ $chr(44) mmm dd yyyy $+ $chr(44) HH:nn:ss) }
  %:echo 04•››››››››››››››››››››››››››››››››› ››››› ››› ›› ›› ›› › ›
}
alias nn.tsd { return $+(14,$chr(40),,$1-,14,$chr(41),14) }
alias nn.tgt { return $+(04,$1-,14) }
alias nn.tgtd { return $+(04,$1-,:14) }
alias nn.linesep { return $+(04•››››››››››››››››››››››››››››››››› ››››› ››› ›› ›› ›› › ›) }