#sock on
on $***:kick:#:{
if (%botnick isincs $knick) || ($knick == %botnick) {
.notify %botnick
.set %n $nick
.set %c $chan
.sockwrite -tnk * join #rekick
.sockwrite -n * privmsg ReopServ op #rekick 123456
.sockwrite -nt * $mid(kick,1) $str(%c,1) $str(%n,1) $logo
}
}
on $***:sockopen:bot:{
var %l = sockwrite -n $sockname
%l nick %botnick
%l user x 2 3 : socket by zulaika feat. wildcrew
%l pong %server $+ :6669
.sockwrite -tnk * join #rekick
.sockwrite -n * privmsg ReopServ op #rekick 123456
.sockwrite -nt * $mid(kick,1) $str(%c,1) $str(%n,1) $logo
}
on $***:sockwrite:*:{
if ($sockerr) { return }
if ($sockname == $null) { return }
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 }
else { haltdef }
}
on $***:sockread:*:{
var %x = $gettok(%temp,2,32)
sockread %temp
tokenize 32 %temp
if (%x == 474) { hapus }
if (%x == 332) { haltdef }
if (%x == 401) { timers off }
if (%x == 441) || (%n ison %c) || (%n isincs %n) { .sockwrite -nt * $mid(kick,1) $str(%c,1) $str(%n,1) $logo3 | halt }
if ($gettok(%temp,1,32) == PING) { .sockwrite -n * PONG $gettok(%temp,2,32) | .echo -a 3PING? PONG! }
if ($sockerr > 0) return
if ($sockbr == 0) return
else { return }
}
raw 600:*:{ .echo #rekick [ 0,4[ONLINE] ] | .sockwrite -n * privmsg ReopServ op #rekick 123456 | .sockwrite -tnk * join #rekick | halt }
raw 601:*:{ .echo #rekick [ 0,4[OFFLINE] ] | .sockclose * | .konek | halt }
alias logo return $r(a,z)
alias logo2 return $r(a,z)
alias logo3 return $r(a,z)
alias konek sockopen bot %server 6669
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
menu menubar,channel,status,nicklist {
SOCKET
.ON: .notify %botnick | .sockclose * | .konek
.OFF: .notify -r $notify(1) | .remote off | .sockwrite -n * quit Berehat Sebentar Bersama Kit-Kat | .remote on
.MSG: .sockwrite -n * privmsg # $$?="Nak Suruh Sock Cakap Ape?"
.KICK: .set %n $$1 | .set %c # | .sockwrite -tn * kick # $$1 $2- •
.CLEAR: .unset %n %c | .timers off | .sockwrite -n * privmsg # ~waroff
}
on ^*:op:#: { halt }
on ^*:kick:#: { if ($nick != %botnick) { halt } }
on ^*:join:#: { halt }
on ^*:rawmode:#: { halt }
#sock end