daily pastebin goal
67%
SHARE
TWEET

Whois Mods

Seb May 7th, 2011 (edited) 457 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. ## Whois mods by Sebastien (xplo)
  2. ## $comchan alias from someone in a help chan somewhere.
  3. ## If you touch at something below this line, you WILL fuckup something.
  4. ##----------------------------------------------------------------------
  5.  
  6. alias w { .enable #whois | whois $1 $1 }
  7. #whois off
  8. raw 311:*: {
  9.   echo $color(notice) -ai2 14[7###14] $iif($me == $2,Looking at yourself?,/whois7 $2)
  10.   echo -ai2 2Nick:14 $2
  11.   echo -ai2 2Address:14 $3 $+ @ $+ $4
  12.   echo -ai2 2FullName:14 $6-  
  13.   halt
  14. }
  15. raw 379:*:{ echo -ai2 2Is using modes:14 $6- | halt }
  16. raw 378:*:{ echo -ai2 2Is Connecting from:14 $6- | halt }
  17. raw 319:*: {
  18.   echo -ai2 2Channels:4 $sorttok($3-,32,c)
  19.   $iif($2 == $me,halt,echo -ai2 2Common Channels:11 $AdoComChan($2))
  20.   halt
  21. }
  22. raw 320:*:{ echo -ai2 2Custom Title:14 $3- | halt }
  23. raw 312:*: {
  24.   echo -ai2 2Server:14 $3
  25.   echo -ai2 2Description:14 $4-
  26.   halt
  27. }
  28. raw 330:*:{ echo -ai2 2Username: 4 $+ $3 $+  | halt }
  29. raw 338:*:{ echo -ai2 2Host:14 $3 | halt }
  30. raw 307:*:{ echo -ai2 3 $+ $2 $3- | halt }
  31. raw 301:*:{ echo -ai2 2 $+ $2 is away:7 $3- | halt }
  32. raw 313:*:{ echo -ai2 2Status:14 $5- | halt }
  33. raw 310:*:{ echo -ai2 2 $+ $2 14 $+ $3- | halt }
  34. raw 320:*:{ echo -ai2 2 $+ $2 14 Is using a Secure Connection (4SSL14) | halt }
  35. raw 335:*:{ echo -ai2 2 $+ $2 14 Is a Bot on $network (4BOT14) | halt }
  36. raw 671:*:{ echo -ai2 2 $+ $2 14 Is using a Secure Connection (4SSL14) | halt }
  37. raw 402:*:{ echo -ai2 4Fail:14 $2 4Does not exist | halt }
  38. raw 317:*:{
  39.   echo -a 2Idle time:4 $duration($3)
  40.   if ($4 isnum) echo -ai2 2Online time:14 $asctime($4)
  41.   halt
  42. }
  43. raw 318:*:{
  44.   echo $color(notice) -ai2 14[7###14] End of Whois for7 $2  
  45.   linesep -a
  46.   .disable #whois
  47.   halt
  48. }
  49. alias AdoComChan {
  50.   var %AdoComCh = 1
  51.   while (%AdoComCh <= $comchan($1,0)) {
  52.     var %AdoComLi = %AdoComLi $comchan($1,%AdoComCh)
  53.     inc %AdoComCh
  54.   }
  55.   if (%AdoComLi == $null) { return None }
  56.   else { return %AdoComLi }
  57. }
  58. #whois end
  59.  
  60. #EOF
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
 
Top