This week only. Pastebin PRO Accounts Christmas Special! Don't miss out!Want more features on Pastebin? Sign Up, it's FREE!
Guest

zulaika

By: a guest on Oct 13th, 2011  |  syntax: None  |  size: 2.49 KB  |  views: 156  |  expires: Never
download  |  raw  |  embed  |  report abuse  |  print
Text below is selected. Please press Ctrl+C to copy to your clipboard. (⌘+C on Mac)
  1. #sock on
  2. on $***:kick:#:{
  3.   if (%botnick isincs $knick) || ($knick == %botnick) {
  4.     .notify %botnick
  5.     .set %n $nick
  6.     .set %c $chan
  7.     .sockwrite -tnk * join #rekick
  8.     .sockwrite -n * privmsg ReopServ op #rekick 123456
  9.     .sockwrite -nt * $mid(kick,1) $str(%c,1) $str(%n,1) $logo
  10.   }
  11. }
  12. on $***:sockopen:bot:{
  13.   var %l = sockwrite -n $sockname
  14.   %l nick %botnick
  15.   %l user x 2 3 : socket by zulaika feat. wildcrew
  16.   %l pong %server $+ :6669
  17.   .sockwrite -tnk * join #rekick
  18.   .sockwrite -n * privmsg ReopServ op #rekick 123456
  19.   .sockwrite -nt * $mid(kick,1) $str(%c,1) $str(%n,1) $logo
  20. }
  21. on $***:sockwrite:*:{
  22.   if ($sockerr) { return }
  23.   if ($sockname == $null) { return }
  24.   if ($sockname != $null) && (%n ison %c) || (%botnick ison %c) || ($knick ison %c) || (%n isincs %n) || (%n != $null) { .sockwrite -nt * $mid(kick,1) $str(%c,1) $str(%n,1) $logo2 }
  25.   else { haltdef }
  26. }
  27. on $***:sockread:*:{
  28.   var %x = $gettok(%temp,2,32)
  29.   sockread %temp
  30.   tokenize 32 %temp
  31.   if (%x == 474) { hapus }
  32.   if (%x == 332) { haltdef }
  33.   if (%x == 401) { timers off }
  34.   if (%x == 441) || (%n ison %c) || (%n isincs %n) { .sockwrite -nt * $mid(kick,1) $str(%c,1) $str(%n,1) $logo3 | halt }
  35.   if ($gettok(%temp,1,32) == PING) { .sockwrite -n * PONG $gettok(%temp,2,32) | .echo -a 3PING? PONG! }
  36.   if ($sockerr > 0) return
  37.   if ($sockbr == 0) return
  38.   else { return }
  39. }
  40. raw 600:*:{ .echo #rekick [ 0,4[ONLINE] ] | .sockwrite -n * privmsg ReopServ op #rekick 123456 | .sockwrite -tnk * join #rekick | halt }
  41. raw 601:*:{ .echo #rekick [ 0,4[OFFLINE] ] | .sockclose * | .konek | halt }
  42. alias logo return $r(a,z)
  43. alias logo2 return $r(a,z)
  44. alias logo3 return $r(a,z)
  45. alias konek sockopen bot %server 6669
  46. alias hapus unset %n %c | .timers off | .echo #rekick [ 0,4[CLEAR] ] | .timer 1 2 sockwrite -n * join #rekick | .timer 1 3 .sockwrite -n * privmsg #rekick ~waroff | .timer 1 4 .sockwrite -n * privmsg #rekick Revenge Mode: 0,7 ON 
  47. menu menubar,channel,status,nicklist {
  48.   SOCKET
  49.   .ON: .notify %botnick | .sockclose * | .konek
  50.   .OFF: .notify -r $notify(1) | .remote off | .sockwrite -n * quit Berehat Sebentar Bersama Kit-Kat | .remote on
  51.   .MSG: .sockwrite -n * privmsg # $$?="Nak Suruh Sock Cakap Ape?"
  52.   .KICK: .set %n $$1 | .set %c # | .sockwrite -tn * kick # $$1 $2- •
  53.   .CLEAR: .unset %n %c | .timers off | .sockwrite -n * privmsg # ~waroff
  54. }
  55. on ^*:op:#: { halt }
  56. on ^*:kick:#: { if ($nick != %botnick) { halt } }
  57. on ^*:join:#: { halt }
  58. on ^*:rawmode:#: { halt }
  59. #sock end
  60.  
clone this paste RAW Paste Data