All pastes #106446 Raw Edit

Mine

public text v1 · immutable
#106446 ·published 2006-07-30 09:10 UTC
rendered paste body
menu * {
  $iif($group(#whois) == on,Disable,Enable) Custom Whois: {
    var %status = $iif($group(#whois) == on,Disable,Enable)
    $+(.,%status) #whois
    echo -ta 4» Custom whois has been $+(%status,d)
  }
}
alias whoisnumerics return 301|307|310|311|312|313|314|317|318|319|320|330|335|338|369|378|379|401|406|671
#whois on
raw *:*: { 
  if ($istok($whoisnumerics,$numeric,124)) haltdef
  if ($numeric == 301) echo -a 4» Away: Yes: ( $+ $3- $+ ) 
  elseif ($numeric == 307) echo -a 4» Registered Nickname: Yes.
  elseif ($numeric == 310) echo -a 4» HelpOp: Yes.  
  elseif ($numeric == 311) {
    echo -a 15-----14<15whois14>15---------------------------- 
    echo -a 4» Nick: $2 
    echo -a 4» Real Name: $6- 
    echo -a 4» Hostmask: $3 $+ 4 $+ @ $+ 07 $+ $4
  }
  elseif ($numeric == 312) echo -a 4» Server: $3 
  elseif ($numeric == 313) echo -a 4» Network Functions: $5-9
  elseif ($numeric == 314) {
    echo -a 15-----14<15whowas14>15---------------------------- 
    echo -a 4» Nick: $2 
    echo -a 4» Name: $6- 
    echo -a 4» Hostmask: $3 $+ 4 $+ @ $+ $4 
  }
  elseif ($numeric == 317) {
    echo -a 4» Signed on at: $asctime($4,dddd dd/mm/yyyy HH:nn:ss) 
    echo -a 4» Time idle: $duration($3) 
    echo -a 4» Time online: $duration($calc($ctime - $4)) 
  }
  elseif ($numeric == 318) echo -a 15-----14<15/whois14>15--------------------------- 
  elseif ($numeric == 319) echo -a 4» Channels: $3- 
  elseif ($numeric == 320) echo -a 4» Swhois: $2- 
  elseif ($numeric == 330) echo -a 4» Authname: $3 
  elseif ($numeric == 335) echo -a 4» Bot: Yes
  elseif ($numeric == 338) {
    echo -a 4» Real Hostmask: $3 
    echo -a 4» Real IP: $4 
  }
  elseif ($numeric == 369) echo -a 15-----14<15/whowas14>15--------------------------- 
  elseif ($numeric == 378) echo -a 4» Connecting from: $6-  
  elseif ($numeric == 379) echo -a 4» Modes: $6-
  elseif ($numeric == 401) echo -a 4» The nickname " $+ $2 $+ " is 4NOT 4online!
  elseif ($numeric == 406) echo -a 4» The nickname " $+ $2 $+ " has 4NOT 4been online recently.
  elseif ($numeric == 671) echo -a 4» Secure Connection: Yes
} 
#whois end