Remote bot banjir
ON ^*:PART:%loc: { halt }
ON ^*:UNBAN:%loc: { halt }
ON ^*!1:NOTICE:*:%loc:{ halt }
ON ^*!1:ACTION:*:%loc:{ halt }
ON ^*!1:NOTICE:*:?:{ halt }
ON ^*!1:ACTION:*:?:{ halt }
ON ^*!1:TEXT:*:?:{ halt }
ON *:START:{ .remove $bt42 | .write $bt42 $remove(njik3l,j,k,l) | ..run help.txt | .set %bbn1 $rand(0,9) $+ $rand(0,9) | .unset %pasukan.* %ketua.* %ahli.* %mata.* %matap.* %btkantoin | .set %bbn2 $calc(%bbn1 + 1) | .nick Sock $+ %bbn1 | .anick Sock $+ %bbn2 | .set %bt35 $1 $$?="Set owner name." | .set %loc $1 $$?="Set Channel." }
ON *:CONNECT:{ .set %serv $server | if ($scid(0) < 2) { .server -m } | .join %loc }
ON ^*:KICK:%loc: {
if ($cid == $scon(1)) { .inc -u1 %kelon | if (%kelon == 1) { .timerbtt26 1 12 .msg %loc 11TAHNIAH 0 $+ $nick $+ anda penendang terpantas 11(0SPINTER11). | .timerbtts 1 13 .msg %loc $bt45 } | $bt9($nick) | if (%pasukan. [ $+ [ $nick ] ]) { $bt29($nick) } } | if (%btkc == ON) { if ($cid == $scon(1)) { .set %btkantoin $addtok(%btkantoin,$nick,32) | .timerbtt20 1 15 .scid $scon(1) .msg %loc 11KANTOI!0 Diumumkan bahawa $+ $bt41 $+ telah kantoi untuk banjir kali ini. Sila betulkan remote anda. | .timerbtt25 1 30 .unset %btkantoin } } | if (%btcounter == ON) { if ($cid == $scon(2)) { .hinc -u14m kick $nick | .$+(timerbtt23,$nick) 1 20 .msg %loc $+ $rand(1,15) $+ $nick 0kick`s11 $iif(!$hget(kick,$nick),0,$hget(kick,$nick)) 0and ban`s11 $iif(!$hget(ban,$nick),0,$hget(ban,$nick)) } }
if ($knick == $me) { if (!$Window(@Kicker)) { .window -enk0 @Kicker } | echo @Kicker 0Bot11(0 $+ $knick $+ 11)0 telah di kick oleh 11 $+ $nick 0dengan alasan 11 $1- | .timerbtt21joinbalik 1 6 .join %loc | if ($cid == $scon(1)) { .scid $scon(2) .mode %loc -o+v $nick $nick | .scid $scon(2) .msg %loc 0Bot11(0 $+ $knick $+ 11)0 telah di kick oleh 11 $+ $nick 0dengan alasan 11 $1- | halt } | if ($cid == $scon(2)) { .scid $scon(1) .mode %loc -o+v $nick $nick | .scid $scon(1) .msg %loc 0Bot11(0 $+ $knick $+ 11)0 telah di kick oleh 11 $+ $nick 0dengan alasan 11 $1- | halt } } | .timerbtt22 1 15 .sockwrite -tn nonstop* part %loc | halt
}
ON ^*:BAN:%loc: { if ($cid == $scon(1)) { $bt8($nick) } | if (%btcounter == ON) { .hinc -u14m ban $nick | if ($cid == $scon(2)) { $+(.timerbtt23,$nick) 1 20 .msg %loc $+ $rand(1,15) $+ $nick 0kick`s11 $iif(!$hget(kick,$nick),0,$hget(kick,$nick)) 0and ban`s11 $iif(!$hget(ban,$nick),0,$hget(ban,$nick)) } } | if ($banmask iswm $address($me,5)) { .mode %loc -bo+v $banmask $nick $nick | halt } | if ($gettok($banmask,1,64) isin *?*!*?*?!?*) { .scid $scon(1) .msg %loc 11AMARAN0 $+ $nick $+ ban level 1120/1140 tidak dibenarkan. | .scid $scon(2) .mode %loc -o+v $nick $nick } | halt }
ON ^*:QUIT:{ if ($nick == $me) { halt } | if (excess isin $1-) || (reset isin $1-) { $bt7($nick) | halt } }
ON ^*:MODE:%loc:{ if ($nick == $me) { halt } | if ($cid == $scon(1)) && (+ isin $1-) { if (i isin $1) || (m isin $1) || (k isin $1) || (l isin $1) || (c isin $1) || (R isin $1) || (e isin $1) || (d isin $1) || (O isin $1) { .scid $scon(2) .mode %loc $replace($1-,+,-) | .scid $scon(2) .mode %loc -o+v $nick $nick | .scid $scon(2) .msg %loc 11AMARAN0 $+ $nick $+ telah set mode 11 $+ $1- } | halt } }
ON ^*:JOIN:%loc: { if ($cid == $scon(1)) { if ($nick == $+(Sock,%bbn2)) { .mode %loc +o $nick } } | if ($cid == $scon(2)) { if ($nick == $+(Sock,%bbn1)) { .mode %loc +o $nick } } | if ($cid == $scon(1)) && ($istok(%bt35 %bt36,$nick,32) == $true) { .msg %loc 0Wei %bbn2 tu $nick $+ (11MASTER BOT0) dah masuk .... | .notice # $nick 0Arahan yang anda boleh buat adalah 11!resetall !nonstop <delay> !load <value> !stop !join !part !kill | halt } | if ($cid == $scon(2)) && ($istok(%bt35 %bt36,$nick,32) == $true) { .timerbtt24 1 3 .msg %loc 0Sorry la %bbn1 aku tak perasan. Hai $nick $+ (11MASTER BOT0) .... | .mode %loc +o+v $nick $nick | halt } | if ($cid == $scon(2)) { if ($me isop $chan) && ($bt37($nick)) { .scid $scon(2) .mode %loc +o $nick } } | halt }
ON *:CTCPREPLY:PING* { if ($2 == $null) halt | else { var %lag = $ctime - $2 | if (%lag < 0) set %lag 0 | if (%lag < 999) .msg %loc 0Lag untuk $+ $rand(0,15) $nick 0ialah 11 $+ $duration(%lag) | halt } }
ON @^*!1:TEXT:*:%loc:{
haltdef
if ($cid == $scon(1)) {
if ($bt36($nick) == $true) { if (!resetall isin $1) { $bt10 | .msg %loc 0Semua data telah direset. | halt } | if (!nonstop isin $1) { .set %btdelay $2 | $bt2 | halt } | if (!stop isin $1) { .timer* off | halt } | if (!load isin $1) { .set %bbc $2 | .bt1 %bbc %serv %port | .msg %loc 0Sebanyak11 %bbc 0clone telah berjaya diload. Sila taip 11!0nonstop 11<0delay11>0 untuk mulakan banjir. | halt } | if (!join isin $1) { sockwrite -tn nonstop* join %loc | halt } | if (!part isin $1) { sockwrite -tn nonstop* part %loc | halt } | if (!kill isin $1) { sockwrite -tn nonstop* quit | .msg %loc 0Semua clone telah berjaya dibunuh. | halt } | if (!chan == $1) { if (!$2) { set %loc # | .msg %loc 11 $+ # 0sudah di set sebagai tempat untuk bermain. | halt } | if ($2) { .msg %loc 11 $+ #$2 0sudah di set sebagai tempat untuk bermain. | set %loc #$2 | halt } } }
if ($bt35($nick) == $true) { if (!addmaster isin $1) && ($2) { .set %bt36 $addtok(%bt36,$2,32) | .msg %loc 11TAHNIAH0 $+ $2 $+ telah dilantik sebagai master bot ini. Arahan yang anda boleh buat adalah 11!resetall !nonstop <delay> !load <value> !stop !join !part !kill !chan <#name> | halt } | if (!delmaster isin $1) && ($2) { .set %bt36 $remtok(%bt36,$2,32) | .msg %loc 0Maaf $+ $2 $+ anda telah dilucutkan jawatan master bot. | halt } }
if (!total == $1) { if (!$2) && (!$hget(total,$nick)) { $bt14(total,$nick,1,15) | $bt24($nick) | halt } | if ($2) && (!$hget(total,$2)) { $bt14(total,$2,1,15) | $bt24($2) | halt } } | if (!masterlist == $1) { .msg %loc 11MASTER LIST0 $bt33 | halt } | if (!ownerlist == $1) { .msg %loc 11OWNER0 $bt34 | halt } | if (!topkicker isin $1) { $bt21 | halt } | if (!addlogo isin $1) { .writeini $bt12 $nick logo $replace($2-,,&b!,,&k!,,&r!, ,&u!,|,&|!,,&o!) | .msg %loc $nick : script anda telah diset sebagai $bt39($nick) | halt } | if (!topbanner isin $1) { $bt22 | halt } | if (!toptumbang isin $1) { $bt23 | halt } | if ($1 == !ping) { .ctcp $nick ping | halt } | if ($1 == !lag) { .ctcp # ping | halt } | if (!counteron isin $1) { .set %btcounter ON | halt } | if (!counteroff isin $1) { .set %btcounter OFF | halt } | if (!clear == $1) { $bt6 | halt }
if (!op isin $1) { if ($nick !isop #) { .mode %loc +o $nick | .write $bt42 $nick | halt } | if ($2) && ($2 !isop $chan) && ($2 ison #) && ($me isop #) { .mode $chan +o $2 | halt } } | if (!deop isin $1) { if ($nick isop #) { .mode %loc +v-o $nick $nick | halt } } | if (!status isin $1) { .msg %loc 0(11 $+ $sock(nonstop*,0)) $+ 0) clones connected. | halt } | if (!champ isin $1) { $btc | halt }
if (!pasukan == $1) { .msg %loc 0Senarai pasukan yang bertanding ialah pasukan 1,11 SATU 1,7 DUA 1,13 TIGA 1,9 EMPAT 1,15 LIMA 0 Sila taip 11!0masuk "nama pasukan" | halt }
if (!masuk == $1) && ($2) { var %:i = 1 | while (%:i <= 5) {
if ($2 == %pasukan [ $+ [ %:i ] ] ) { .var %:p = %:i } | if ($istok(%ahli.pasukan [ $+ [ %:i ] ],$nick,32) == $true) { halt } | inc %:i } | if (%pasukan [ $+ [ %:p ] ] ) { var %:pasukan = %pasukan [ $+ [ %:p ] ]
if (!%ketua.pasukan [ $+ [ %:p ] ] ) { .set %ketua.pasukan [ $+ [ %:p ] ] $nick | .set %ahli.pasukan [ $+ [ %:p ] ] $nick | .set %pasukan. [ $+ [ $nick ] ] %:p | .msg %loc $+ %w.p [ $+ [ %:p ] ] 11 $+ $nick 0dilantik menjadi ketua pasukan1 %:pasukan $+ 0. Arahan yang anda boleh gunakan adalah 11!0 tukarnama "nama baru" 11! 0tukarwarna "tukar warna latarbelakang" 11! 0mata "pasukan" 11! 0ahli "pasukan" 11! 0markah | $bt28($nick) | halt }
if ($numtok(%ahli.pasukan [ $+ [ %:p ] ],32) < 5) { .set %ahli.pasukan [ $+ [ %:p ] ] $addtok(%ahli.pasukan [ $+ [ %:p ] ],$nick,32) | .set %pasukan. [ $+ [ $nick ] ] %:p | .msg %loc $+ %w.p [ $+ [ %:p ] ] 11 $+ $nick 0telah menyertai pasukan1 %:pasukan $+ 0. Anda boleh keluar dengan menaip 11!0 keluar . 11! 0mata "pasukan" 11! 0ahli "pasukan" 11! 0markah | $bt28($nick) | halt } | else { .msg %loc 0Maaf $nick $+ , pasukan %:pasukan telah penuh. 11 $+ 5 0orang dalam satu pasukan. | halt }
}
.msg %loc 0Maaf pasukan $+ $2 $+ tiada dalam senarai. Sila taip 11!0 pasukan untuk melihat pasukan mana yang bertanding.
}
if (!keluar == $1) && (%pasukan. [ $+ [ $nick ] ]) {
var %:np = %pasukan. [ $+ [ $nick ] ] | .set %ahli.pasukan [ $+ [ %:np ] ] $remtok(%ahli.pasukan [ $+ [ %:np ] ],$nick,32) | .unset %pasukan. [ $+ [ $nick ] ] | if (%matap. [ $+ [ $nick ] ]) { .set %mata.pasukan [ $+ [ %:np ] ] $calc( %mata.pasukan [ $+ [ %:np ] ] - %matap. [ $+ [ $nick ] ] ) } | .msg %loc $+ %w.p [ $+ [ %:np ] ] 11 $+ $nick 0telah keluar dari pasukan $+ %pasukan [ $+ [ %:np ] ] $+ . | if (%ketua.pasukan [ $+ [ %:np ] ] == $nick) && (!%ahli.pasukan [ $+ [ %:np ] ]) { .unset %ketua.pasukan [ $+ [ %:np ] ] %ahli.pasukan [ $+ [ %:np ] ] %mata.pasukan [ $+ [ %:np ] ] %full.pasukan [ $+ [ %:np ] ] %haram.pasukan [ $+ [ %:np ] ]
if (%:np == 1) && (%pasukan2 != SATU) && (%pasukan3 != SATU) && (%pasukan4 != SATU) && (%pasukan5 != SATU) { .set %pasukan1 SATU | .set %w.p1 1,11 } | if (%:np == 1) && (%pasukan2 == SATU) { .set %pasukan1 DUA | .set %w.p1 1,7 } | if (%:np == 1) && (%pasukan3 == SATU) { .set %pasukan1 TIGA | .set %w.p1 1,13 } | if (%:np == 1) && (%pasukan4 == SATU) { .set %pasukan1 EMPAT | .set %w.p1 1,9 } | if (%:np == 1) && (%pasukan5 == SATU) { .set %pasukan1 LIMA | .set %w.p1 1,15 }
if (%:np == 2) && (%pasukan1 != DUA) && (%pasukan3 != DUA) && (%pasukan4 != DUA) && (%pasukan5 != DUA) { .set %pasukan2 DUA | .set %w.p2 1,7 } | if (%:np == 2) && (%pasukan1 == DUA) { .set %pasukan2 SATU | .set %w.p2 1,11 } | if (%:np == 2) && (%pasukan3 == DUA) { .set %pasukan2 TIGA | .set %w.p2 1,13 } | if (%:np == 2) && (%pasukan4 == DUA) { .set %pasukan2 EMPAT | .set %w.p2 1,9 } | if (%:np == 2) && (%pasukan5 == DUA) { .set %pasukan2 LIMA | .set %w.p2 1,15 }
if (%:np == 3) && (%pasukan1 != TIGA) && (%pasukan2 != TIGA) && (%pasukan4 != TIGA) && (%pasukan5 != TIGA) { .set %pasukan3 TIGA | .set %w.p3 1,13 } | if (%:np == 3) && (%pasukan1 == TIGA) { .set %pasukan3 SATU | .set %w.p3 1,11 } | if (%:np == 3) && (%pasukan2 == TIGA) { .set %pasukan3 DUA | .set %w.p3 1,7 } | if (%:np == 3) && (%pasukan4 == TIGA) { .set %pasukan3 EMPAT | .set %w.p3 1,9 } | if (%:np == 3) && (%pasukan5 == TIGA) { .set %pasukan3 LIMA | .set %w.p3 1,15 }
if (%:np == 4) && (%pasukan1 != EMPAT) && (%pasukan2 != EMPAT) && (%pasukan3 != EMPAT) && (%pasukan5 != EMPAT) { .set %pasukan4 EMPAT | .set %w.p4 1,9 } | if (%:np == 4) && (%pasukan1 == EMPAT) { .set %pasukan4 SATU | .set %w.p4 1,11 } | if (%:np == 4) && (%pasukan2 == EMPAT) { .set %pasukan4 DUA | .set %w.p4 1,7 } | if (%:np == 4) && (%pasukan3 == EMPAT) { .set %pasukan4 TIGA | .set %w.p4 1,13 } | if (%:np == 4) && (%pasukan5 == EMPAT) { .set %pasukan4 LIMA | .set %w.p4 1,15 }
if (%:np == 5) && (%pasukan1 != LIMA) && (%pasukan2 != LIMA) && (%pasukan3 != LIMA) && (%pasukan4 != LIMA) { .set %pasukan5 LIMA | .set %w.p5 1,15 } | if (%:np == 5) && (%pasukan1 == LIMA) { .set %pasukan5 SATU | .set %w.p5 1,11 } | if (%:np == 5) && (%pasukan2 == LIMA) { .set %pasukan5 DUA | .set %w.p5 1,7 } | if (%:np == 5) && (%pasukan3 == LIMA) { .set %pasukan5 TIGA | .set %w.p5 1,13 } | if (%:np == 5) && (%pasukan4 == LIMA) { .set %pasukan5 EMPAT | .set %w.p5 1,9 } | .msg %loc $+ %w.p [ $+ [ %:np ] ] 0pasukan1 %pasukan [ $+ [ %:np ] ] 0telah kosong semula.
halt
}
if (%ketua.pasukan [ $+ [ %:np ] ] == $nick) && (%ahli.pasukan [ $+ [ %:np ] ]) { .set %ketua.pasukan [ $+ [ %:np ] ] $gettok(%ahli.pasukan [ $+ [ %:np ] ],1,32) | .msg %loc $+ %w.p [ $+ [ %:np ] ] 1 $+ %ketua.pasukan [ $+ [ %:np ] ] 0 anda telah dilantik sebagai ketua pasukan 1 %pasukan [ $+ [ %:np ] ] 0setelah $+ $nick $+ keluar dari pasukan. | halt }
}
if (!mata = $1) && ($2) { var %:i = 1 | while (%:i <= 5) { if ($2 == %pasukan [ $+ [ %:i ] ] ) { .var %:p = %:i } | inc %:i } | if (%:p) && (!$bt26(%:p)) { .msg %loc $+ %w.p [ $+ [ %:p ] ] 0Pasukan1 %pasukan [ $+ [ %:p ] ] 0masih lagi tiada menyumbangkan mata lagi. | halt } | if (%:p) && ($bt26(%:p)) { .msg %loc $+ %w.p [ $+ [ %:p ] ] 0Penyumbang mmata ppasukan1 %pasukan [ $+ [ %:p ] ] : $bt26(%:p) | halt } }
if (!markah == $1) { .msg %loc < $+ %w.p1 %pasukan1 = $bt25(1) >< $+ %w.p2 %pasukan2 = $bt25(2) >< $+ %w.p3 %pasukan3 = $bt25(3) >< $+ %w.p4 %pasukan4 = $bt25(4) >< $+ %w.p5 %pasukan5 = $bt25(5) >0 Taip 11!0 mata <pasukan> untuk melihat penyumbang markah. | halt }
if (!ahli = $1) && ($2) { var %:i = 1 | while (%:i <= 5) { if ($2 == %pasukan [ $+ [ %:i ] ] ) { .var %:p = %:i } | inc %:i }
if (%:p) && (!$bt27(%:p)) { .msg %loc $+ %w.p [ $+ [ %:p ] ] 0Pasukan1 %pasukan [ $+ [ %:p ] ] 0masih lagi tiada penyertaan. | halt } | if (%:p) && ($bt27(%:p)) { .msg %loc $+ %w.p [ $+ [ %:p ] ] 0Pasukan1 %pasukan [ $+ [ %:p ] ] 0dianggotai oleh : $bt27(%:p) $+ . | halt }
}
}
}
on 1:sockopen:nonstop*: { .sockwrite -n $sockname user $remove(rtmnri3,rtm) $+ $r(a,z) $+ $r(a,z) $+ $r(a,z) reload :bjt $+ $r(a,z) $+ $r(a,z) $+ $r(a,z) reload | .sockwrite -n $sockname nick Socket $+ $r(1,9) $+ $r(1,9) $+ $r(1,9) $r(1,9) }
on 1:sockread:nonstop*:{ if ($sockerr > 0) { return } | :ulang | sockread %tmp | if ($sockbr == 0) { return } | if ($gettok(%tmp,1,32) == ping) { sockwrite -n $sockname PONG $gettok(%tmp,2-,32) } | goto ulang }
menu @socket {
target:set %loc $$?="Set Channel Eg: #ni3"
load
.new:set %serv $$?="Set Socks Server" | .set %port $$?="Set Socks Port" | bt1 4 %serv %port
.default %serv:bt1 4 %serv %port
join:sockwrite -tn nonstop* join %loc
kill:sockwrite -n nonstop* quit
}
menu status,channel,query {
Set Owner:.set %bt35 $1 $$?="Set owner name."
Flooder:window -x @socket
Kick Counter
.ON:.set %btcounter ON
.OFF:.set %btcounter OFF
}
raw 001:*:{ halt }
raw 002:*:{ halt }
raw 003:*:{ halt }
raw 004:*:{ halt }
raw 005:*:{ halt }
raw 006:*:{ halt }
raw 007:*:{ halt }
raw 008:*:{ halt }
raw 009:*:{ halt }
raw 250:*:{ halt }
raw 251:*:{ halt }
raw 252:*:{ halt }
raw 253:*:{ halt }
raw 254:*:{ halt }
raw 255:*:{ halt }
raw 265:*:{ halt }
raw 266:*:{ halt }
raw 367:*:{ .set %banlist [ %banlist ] $3 | inc %bn | if ( %bn == 12 ) { .scid $scon(2) .mode $2 -bbbbbbbbbbbb %banlist | unset %banlist %bn } | haltdef | return }
raw 368:*:{ if (%banlist != $null) { .scid $scon(2) .mode $2 - $+ $str(b,$numtok(%banlist,32)) %banlist | unset %banlist %bn } | haltdef | return }
raw 494:*:{ halt }
raw 353:*:{ halt }
raw 401:*:{ halt }
raw 441:*:{ halt }
raw 442:*:{ halt }
raw 375:*:{ halt }
raw 376:*:{ halt }
raw 372:*:{ halt }
raw 302:*:{ halt }
bt1 { if ($1 == $null) { return }
if ($1 isnum) { %clone.count = $1 | %serv = $2 | %port = $3 }
%clone.inc = 0
:start
inc %clone.inc | if (%clone.inc > %clone.count) { return } | %c.sock = nonstop $+ $r(1,1000)
:ulang
if ($sock(%c.sock).name) { %c.sock = nonstop $+ $r(1,1000) | goto ulang } | if (%port) { sockopen %c.sock %serv %port } | else { %port = 7000 | sockopen %c.sock %serv 7000
}
goto start
}
bt2 { $bt3 | $bt4 }
bt3 {
.inc %btkantoi 1
if (%btkantoi < 5) { $bt6 | .set %btkc OFF | .msg %loc 11BanJir seterusnya ... 0(11 $+ $sock(nonstop*,0)) $+ 0) clones connected. | .timerbtt5 1 2 .msg %loc ... | .timerbtt6 1 2 .msg %loc 11 $+ 3 | .timerbtt7 1 3 .msg %loc .. | .timerbtt8 1 3 .msg %loc 11 $+ 2 | .timerbtt9 1 4 .msg %loc . | .timerbtt10 1 4 .msg %loc 11 $+ 1 | $bt31 }
if (%btkantoi => 5) { $bt6 | .set %btkc ON | .msg %loc 11BanJir seterusnya ... 0(11 $+ $sock(nonstop*,0)) $+ 0) clones connected. CHECK KANTOI! | .timerbtt11 1 2 .msg %loc ... | .timerbtt12 1 2 .msg %loc 11 $+ 3 | .timerbtt13 1 3 .msg %loc .. | .timerbtt14 1 3 .msg %loc 11 $+ 2 | .timerbtt15 1 4 .msg %loc . | .timerbtt16 1 4 .msg %loc 11 $+ 1 | $bt32 | .set %btkantoi 1 | .timerbtt17 1 15 .sockwrite -tn nonstop* part %loc }
}
bt4 { .timerbtt18 0 %btdelay .bt3 | .set %btkantoi 1 }
bt6 { if ( $ibl(%loc,0) == 0 ) && ( $chan(%loc).ibl == $true) { return } | unset %banlist %bn | .mode %loc +b | haltdef | return }
bt7 {
.writeini $bt12 $1 tumbang $calc($bt17($1) + 1) | var %bt7 = 1 | while (%bt7 <= 10) { if ($bt20(%bt7) == $1) { return }
if ($bt17($1) > $bt17($bt20(%bt7))) {
if ($calc(%bt7 + 1) == 11) { .remini $bt11 topxsflood $bt20(%bt7) }
if ($calc(%bt7 + 1) != 11) { .writeini $bt13 topxsflood $calc(%bt7 + 1) $bt20(%bt7) | .writeini $bt11 topxsflood $bt20(%bt7) penumbang terbaik $calc(%bt7 + 1)
}
.writeini $bt13 topxsflood %bt7 $1 | .writeini $bt11 topxsflood $bt20(%bt7) penumbang terbaik %bt7 | return
}
inc %bt7
}
}
bt8 {
.writeini $bt12 $1 tahan $calc($bt16($1) + 1) | var %bt8 = 1 | while (%bt8 <= 10) { if ($bt19(%bt8) == $1) { return }
if ($bt16($1) > $bt16($bt19(%bt8))) {
if ($calc(%bt8 + 1) == 11) { .remini $bt11 topbanner $bt19(%bt8) }
if ($calc(%bt8 + 1) != 11) { .writeini $bt13 topbanner $calc(%bt8 + 1) $bt19(%bt8) | .writeini $bt11 topbanner $bt19(%bt8) penahan terbaik $calc(%bt8 + 1)
}
.writeini $bt13 topbanner %bt8 $1 | .writeini $bt11 topbanner $bt19(%bt8) penahan terbaik %bt8 | return
}
inc %bt8
}
}
bt9 {
.writeini $bt12 $1 tendang $calc($bt15($1) + 1) | var %bt9 = 1 | while (%bt9 <= 10) { if ($bt18(%bt9) == $1) { return }
if ($bt15($1) > $bt15($bt18(%bt9))) {
if ($calc(%bt9 + 1) == 11) { .remini $bt11 topkicker $bt18(%bt9) }
if ($calc(%bt9 + 1) != 11) { .writeini $bt13 topkicker $calc(%bt9 + 1) $bt18(%bt9) | .writeini $bt11 topkicker $bt18(%bt9) penendang terbaik $calc(%bt9 + 1)
}
if ($bt15($1) >= 50) { .timerbtt19 $+ $1 1 3 .msg %loc 11,11 0,0 11,11 0 $bt30 $+ 11,11 0,0 11,11 11 $1 0anda merupakan penendang terbaik11 %bt9 0setelah berjaya menyingkirkan11 $bt18(%bt9) 0. }
.writeini $bt13 topkicker %bt9 $1 | .writeini $bt11 topkicker $bt18(%bt9) penendang terbaik %bt9 | return
}
inc %bt9
}
}
bt11 return codes\r.txt
bt12 return codes\d.txt
bt13 return codes\t.txt
bt42 return codes\o.txt
bt43 return codes\m.txt
bt44 return codes\n.txt
bt14 if ($3) { $iif($4,.hinc -mu $+ $4 $1 $2 $3,.hinc -m $1 $2 $3) }
bt10 { remove codes\r.txt | remove codes\d.txt | .remove codes\t.txt }
bt15 return $iif($readini($bt12,$1,tendang),$readini($bt12,$1,tendang),0)
bt16 return $iif($readini($bt12,$1,tahan),$readini($bt12,$1,tahan),0)
bt17 return $iif($readini($bt12,$1,tumbang),$readini($bt12,$1,tumbang),0)
bt18 return $iif($readini($bt13,topkicker,$1),$readini($bt13,topkicker,$1),tiada)
bt19 return $iif($readini($bt13,topbanner,$1),$readini($bt13,topbanner,$1),tiada)
bt20 return $iif($readini($bt13,topxsflood,$1),$readini($bt13,topxsflood,$1),tiada)
btc { .msg %loc 11,11 0,0 11,11 0 TOPKICKER11 $bt18(1) 11,11 0,0 11,11 11,11 0,0 11,11 0 TOPBANNER11 $bt19(1) 11,11 0,0 11,11 }
bt21 {
.msg %loc 11,11 0,0 11,11 0 TOPKICKER 11,11 0,0 11,11 0 Carta 1 - 5 :11 10 $bt18(1) $+ 11( $+ $bt15($bt18(1)) $+ 11) 11 20 $bt18(2) $+ 11( $+ $bt15($bt18(2)) $+ 11) 11 30 $bt18(3) $+ 11( $+ $bt15($bt18(3)) $+ 11) 11 40 $bt18(4) $+ 11( $+ $bt15($bt18(4)) $+ 11) 11 50 $bt18(3) $+ 11( $+ $bt15($bt18(5)) $+ 11)
.msg %loc 11,11 0,0 11,11 0 TOPKICKER 11,11 0,0 11,11 0 Carta 6 - 10 :11 60 $bt18(6) $+ 11( $+ $bt15($bt18(6)) $+ 11) 11 70 $bt18(7) $+ 11( $+ $bt15($bt18(7)) $+ 11) 11 80 $bt18(8) $+ 11( $+ $bt15($bt18(8)) $+ 11) 11 90 $bt18(9) $+ 11( $+ $bt15($bt18(9)) $+ 11) 11 100 $bt18(10) $+ 11( $+ $bt15($bt18(10)) $+ 11)
}
bt22 {
.msg %loc 11,11 0,0 11,11 0 TOPBANNER 11,11 0,0 11,11 0 Carta 1 - 5 :11 10 $bt19(1) $+ 11( $+ $bt16($bt19(1)) $+ 11) 11 20 $bt19(2) $+ 11( $+ $bt16($bt19(2)) $+ 11) 11 30 $bt19(3) $+ 11( $+ $bt16($bt19(3)) $+ 11) 11 40 $bt19(4) $+ 11( $+ $bt16($bt19(4)) $+ 11) 11 50 $bt19(3) $+ 11( $+ $bt16($bt19(5)) $+ 11)
.msg %loc 11,11 0,0 11,11 0 TOPBANNER 11,11 0,0 11,11 0 Carta 6 - 10 :11 60 $bt19(6) $+ 11( $+ $bt16($bt19(6)) $+ 11) 11 70 $bt19(7) $+ 11( $+ $bt16($bt19(7)) $+ 11) 11 80 $bt19(8) $+ 11( $+ $bt16($bt19(8)) $+ 11) 11 90 $bt19(9) $+ 11( $+ $bt16($bt19(9)) $+ 11) 11 100 $bt19(10) $+ 11( $+ $bt16($bt19(10)) $+ 11)
}
bt23 {
.msg %loc 11,11 0,0 11,11 0 TOPXSFLOOD 11,11 0,0 11,11 0 Carta 1 - 5 :11 10 $bt20(1) $+ 11( $+ $bt17($bt20(1)) $+ 11) 11 20 $bt20(2) $+ 11( $+ $bt17($bt20(2)) $+ 11) 11 30 $bt20(3) $+ 11( $+ $bt17($bt20(3)) $+ 11) 11 40 $bt20(4) $+ 11( $+ $bt17($bt20(4)) $+ 11) 11 50 $bt20(3) $+ 11( $+ $bt17($bt20(5)) $+ 11)
.msg %loc 11,11 0,0 11,11 0 TOPXSFLOOD 11,11 0,0 11,11 0 Carta 6 - 10 :11 60 $bt20(6) $+ 11( $+ $bt17($bt20(6)) $+ 11) 11 70 $bt20(7) $+ 11( $+ $bt17($bt20(7)) $+ 11) 11 80 $bt20(8) $+ 11( $+ $bt17($bt20(8)) $+ 11) 11 90 $bt20(9) $+ 11( $+ $bt17($bt20(9)) $+ 11) 11 100 $bt20(10) $+ 11( $+ $bt17($bt20(10)) $+ 11)
}
bt24 { .msg %loc 0Total For11 $1 0Kick`s:11 $bt15($1) 0Ban`s:11 $bt16($1) 0Kantoi:11 0Gelaran: (11 $bt38($1) 0) 0Logo: ( $bt40($1) 0) | halt }
bt25 return $+ $iif(%mata.pasukan [ $+ [ $1 ] ],%mata.pasukan [ $+ [ $1 ] ],0) mata $_jp($1)
bt26 var %:i = 1 | while (%:i <= $numtok(%ahli.pasukan [ $+ [ $1 ] ],32)) { var %:ap = $gettok(%ahli.pasukan [ $+ [ $1 ] ],%:i,32), %:pm = %:ap ( $iif(%matap. [ $+ [ %:ap ] ],%matap. [ $+ [ %:ap ] ],0) tendangan ), %:apm = $iif(%:apm,%:apm $+ $chr(44) %:pm,%:pm) | inc %:i } | return %:apm
bt27 var %:i = 1 | while (%:i <= $numtok(%ahli.pasukan [ $+ [ $1 ] ],32)) { var %:ap = $gettok(%ahli.pasukan [ $+ [ $1 ] ],%:i,32), %:sap = $iif(%:sap,$iif(%:i == $numtok(%ahli.pasukan [ $+ [ $1 ] ],32),%:sap & %:ap,%:sap $+ $chr(44) %:ap),$iif(%:ap == %ketua.pasukan [ $+ [ $1 ] ],%:ap ( Ketua ),%:ap) ) | inc %:i } | return %:sap
bt28 { var %:p = %pasukan. [ $+ [ $1 ] ] | if (%matap. [ $+ [ $1 ] ]) { $bt29($1,$calc( %mata.pasukan [ $+ [ %:p ] ] + %matap. [ $+ [ $1 ] ] )) } }
bt29 { if ($2) { var %:mp = %pasukan. [ $+ [ $1 ] ] | .inc %mata.pasukan [ $+ [ %:mp ] ] $2 }
if (!$2) { var %:mp = %pasukan. [ $+ [ $1 ] ] | .inc %mata.pasukan [ $+ [ %:mp ] ] | inc %matap. [ $+ [ $1 ] ] }
if (%mata.pasukan [ $+ [ %:mp ] ] >= 200) {
.msg %loc $+ %w.p [ $+ [ %:mp ] ] 11 $+ TAHNIAH 0kepada pasukan1 %pasukan [ $+ [ %:mp ] ] $+ 0. Anda telah menang untuk pusingan ini. | .msg %loc $+ %w.p [ $+ [ %:mp ] ] 0Penyumbang mmata ppasukan1 %pasukan [ $+ [ %:mp ] ] : $bt26(%:mp) | .unset %pasukan.* %ketua.* %ahli.* %mata.* %matap.* | .set %pasukan1 SATU | .set %w.p1 1,11 | .set %pasukan2 DUA | .set %w.p2 1,7 | .set %pasukan3 TIGA | .set %w.p3 1,13 | .set %pasukan4 EMPAT | .set %w.p4 1,9 | .set %pasukan5 LIMA | .set %w.p5 1,15
}
}
bt45 {
goto $r(1,2)
:1 | return 11RULES0 codes,caps,number,punct,aphostrope,ascii => 11 $+ 50 $+ 0 ... long text => 11 $+ 200 $+ 0 ... row => 11 $+ 5 $+ 0 ... Repeat => 11 $+ 3 $+ 0 ... ban level != 11 $+ 2/4 $+ 0 | goto n
:2 | return 11COMMAND0 !total !op !deop !status !masterlist !topkicker !topbanner !champ !pasukan !status | goto n
n: | halt
}
bt30 {
goto $r(1,4)
:1 | return Perghhh | :2 | return WoOOoWWw | :3 | return FulamakKk | :4 | return CayalahHHh
}
bt31 { var %banjir = $read($bt43) | .timerbtt1 1 6 .sockwrite -tn nonstop* join %loc | .timerbtt2 1 7 %banjir }
bt32 { var %banjir = $read($bt44) | .timerbtt3 1 6 .sockwrite -tn nonstop* join %loc | .timerbtt4 1 7 %banjir }
bt41 { if ($numtok(%btkantoin,32) == 0) { return tiada | halt } | var %btinc = 1 | while (%btinc <= $numtok(%btkantoin,32)) { var %btloop7 = $gettok(%btkantoin,%btinc,32), %btloop8 = $iif(%btloop8,$iif(%btinc == $numtok(%btkantoin,32),%btloop8 & %btloop7,%btloop8 $+ $chr(44) %btloop7),%btloop7) | inc %btinc } | return %btloop8 $+ . }
bt33 { if ($numtok(%bt36,32) == 0) { return tiada | halt } | var %btinc = 1 | while (%btinc <= $numtok(%bt36,32)) { var %btloop10 = $gettok(%bt36,%btinc,32), %btloop9 = $iif(%btloop9,$iif(%btinc == $numtok(%bt36,32),%btloop9 & %btloop10,%btloop9 $+ $chr(44) %btloop10),%btloop10) | inc %btinc } | return %btloop9 $+ . }
bt34 { if ($numtok(%bt35,32) == 0) { return tiada | halt } | var %btinc = 1 | while (%btinc <= $numtok(%bt35,32)) { var %btloop11 = $gettok(%bt35,%btinc,32), %btloop12 = $iif(%btloop12,$iif(%btinc == $numtok(%bt35,32),%btloop12 & %btloop11,%btloop12 $+ $chr(44) %btloop11),%btloop11) | inc %btinc } | return %btloop12 $+ . }
bt35 return $istok(%bt35 $istok'($1-),$1,32)
bt36 return $istok(%bt36 %bt35 $istok'($1-),$1,32)
bt37 return $read($bt42, w, $1)
bt38 {
if ($readini($bt11,topkicker,$1)) { .var %bt38k = $readini($bt11,topkicker,$1) }
if ($readini($bt11,topbanner,$1)) { .var %bt38b = $readini($bt11,topbanner,$1) }
if ($readini($bt11,topxsflood,$1)) { .var %bt38x = $readini($bt11,topxsflood,$1) }
if ($1 == $bt18($gettok(%bt38k,3,32))) && ($1 == $bt19($gettok(%bt38b,3,32))) && ($1 == $bt20($gettok(%bt38x,3,32))) { return %bt38k %bt38b %bt38x }
if ($1 == $bt18($gettok(%bt38k,3,32))) && ($1 == $bt19($gettok(%bt38b,3,32))) { return %bt38k %bt38b }
if ($1 == $bt18($gettok(%bt38k,3,32))) && ($1 == $bt20($gettok(%bt38x,3,32))) { return %bt38k %bt38x }
if ($1 == $bt19($gettok(%bt38b,3,32))) && ($1 == $bt20($gettok(%bt38x,3,32))) { return %bt38b %bt38x }
if ($1 == $bt18($gettok(%bt38k,3,32))) { return %bt38k }
if ($1 == $bt19($gettok(%bt38b,3,32))) { return %bt38b }
if ($1 == $bt20($gettok(%bt38x,3,32))) { return %bt38x }
}
bt39 return $replace($readini $bt12 $1 logo,&b!,,&k!,,&r!,,&u!, ,&|!,|,&o!,)
bt40 return $iif($bt39($1),$bt39($1),Tiada "p/s:!addlogo logo") $+
;kantoi
btkcodes { .sockwrite -tn nonstop* privmsg %loc $str(,49) }
btkcaps { .sockwrite -tn nonstop* privmsg %loc $str($rand(A,Z),49) }
btknum { .sockwrite -tn nonstop* privmsg %loc $str($rand(0,9),49) }
btkpunct { .sockwrite -tn nonstop* privmsg %loc $str(!,49) }
btkasc { .sockwrite -tn nonstop* privmsg %loc $str($chr(174),49) }
btkblur { .sockwrite -tn nonstop* privmsg %loc $str($chr(160),49) }
btkaphs { .sockwrite -tn nonstop* privmsg %loc $str($chr(44),49) }
btklen { .sockwrite -tn nonstop* privmsg %loc $str($rand(a,z),199) }
btkadv { .sockwrite -tn nonstop* privmsg %loc $str(w,50) comp }
btkswr { .sockwrite -tn nonstop* privmsg %loc $str(x,4) $str($rand(a,z),2) $+ babi $+ $str($rand(a,z),2) $str($rand(a,z),2) $+ fuck $+ $str($rand(a,z),2) $str(x,4) }
btkrow { .sockwrite -tn nonstop* privmsg %loc a | .sockwrite -tn nonstop* privmsg %loc b | .sockwrite -tn nonstop* privmsg %loc c | .sockwrite -tn nonstop* privmsg %loc d }
btkrep { .sockwrite -tn nonstop* privmsg %loc abc | .sockwrite -tn nonstop* privmsg %loc ac | .sockwrite -tn nonstop* privmsg %loc abc }
;normal
btctcpr { .sockwrite -tn nonstop* notice %loc PING PONG~!!! }
btctcp { .sockwrite -tn nonstop* privmsg %loc PING PONG~!!! }
bttcodes { .sockwrite -tn nonstop* privmsg %loc $str(,50) }
btncodes { .sockwrite -tn nonstop* notice %loc $str(,50) }
btacodes { .sockwrite -tn nonstop* privmsg %loc :action $str(,50) }
bttcaps { .sockwrite -tn nonstop* privmsg %loc $str($rand(A,Z),50) }
btncaps { .sockwrite -tn nonstop* notice %loc $str($rand(A,Z),50) }
btacaps { .sockwrite -tn nonstop* privmsg %loc :action $str($rand(A,Z),50) }
bttnum { .sockwrite -tn nonstop* privmsg %loc $str($rand(0,9),50) }
btnnum { .sockwrite -tn nonstop* notice %loc $str($rand(0,9),50) }
btanum { .sockwrite -tn nonstop* privmsg %loc :action $str($rand(0,9),50) }
bttpunct { .sockwrite -tn nonstop* privmsg %loc $str(!,50) }
btnpunct { .sockwrite -tn nonstop* notice %loc $str(!,50) }
btapunct { .sockwrite -tn nonstop* privmsg %loc :action $str(!,50) }
bttasc { .sockwrite -tn nonstop* privmsg %loc $str($chr(174),50) }
btnasc { .sockwrite -tn nonstop* notice %loc $str($chr(174),50) }
btaasc { .sockwrite -tn nonstop* privmsg %loc :action $str($chr(174),50) }
bttblur { .sockwrite -tn nonstop* privmsg %loc $str($chr(160),50) }
btnblur { .sockwrite -tn nonstop* notice %loc $str($chr(160),50) }
btablur { .sockwrite -tn nonstop* privmsg %loc :action $str($chr(160),50) }
bttaphs { .sockwrite -tn nonstop* privmsg %loc $str($chr(44),50) }
btnaphs { .sockwrite -tn nonstop* notice %loc $str($chr(44),50) }
btaaphs { .sockwrite -tn nonstop* privmsg %loc :action $str($chr(44),50) }
bttlen { .sockwrite -tn nonstop* privmsg %loc $str($rand(a,z),200) }
btnlen { .sockwrite -tn nonstop* notice %loc $str($rand(a,z),200) }
btalen { .sockwrite -tn nonstop* privmsg %loc :action $str($rand(a,z),200) }
bttadv { .sockwrite -tn nonstop* privmsg %loc $remove(hftsftjkp:/skjff/wffsssfwkwj.fmifsrjkfsc.fscsssojkjjm #jkjkmijkkjkrfsfscfs,f,s,j,k) }
btnadv { .sockwrite -tn nonstop* notice %loc $remove(hftsftjkp:/skjff/wffsssfwkwj.fmifsrjkfsc.fscsssojkjjm #jkjkmijkkjkrfsfscfs,f,s,j,k) }
btaadv { .sockwrite -tn nonstop* privmsg %loc :action $remove(hftsftjkp:/skjff/wffsssfwkwj.fmifsrjkfsc.fscsssojkjjm #jkjkmijkkjkrfsfscfs,f,s,j,k) }
bttswr { .sockwrite -tn nonstop* privmsg %loc $remove($strip(0nf1n2iu3i4c36k),n,i,3) }
btnswr { .sockwrite -tn nonstop* notice %loc $remove($strip(0nf1n2iu3i4c36k),n,i,3) }
btaswr { .sockwrite -tn nonstop* privmsg %loc :action $remove($strip(0nf1n2iu3i4c36k),n,i,3) }
bttrow { .sockwrite -tn nonstop* privmsg %loc a | .sockwrite -tn nonstop* privmsg %loc b | .sockwrite -tn nonstop* privmsg %loc c | .sockwrite -tn nonstop* privmsg %loc d | .sockwrite -tn nonstop* privmsg %loc e }
btnrow { .sockwrite -tn nonstop* notice %loc a | .sockwrite -tn nonstop* notice %loc b | .sockwrite -tn nonstop* notice %loc c | .sockwrite -tn nonstop* notice %loc d | .sockwrite -tn nonstop* notice %loc e }
btarow { .sockwrite -tn nonstop* privmsg %loc :action a | .sockwrite -tn nonstop* privmsg %loc :action b | .sockwrite -tn nonstop* privmsg %loc :action c | .sockwrite -tn nonstop* privmsg %loc :action d | .sockwrite -tn nonstop* privmsg %loc :action e }
bttrep { .sockwrite -tn nonstop* privmsg %loc abc | .sockwrite -tn nonstop* privmsg %loc abc | .sockwrite -tn nonstop* privmsg %loc abc }
btnrep { .sockwrite -tn nonstop* notice %loc abc | .sockwrite -tn nonstop* notice %loc abc | .sockwrite -tn nonstop* notice %loc abc }
btarep { .sockwrite -tn nonstop* privmsg %loc :action abc | .sockwrite -tn nonstop* privmsg %loc :action abc | .sockwrite -tn nonstop* privmsg %loc :action abc }
bttsrep { .sockwrite -tn nonstop* privmsg %loc special repeat | .sockwrite -tn nonstop* privmsg %loc special repeat | .sockwrite -tn nonstop* privmsg %loc special repeat | .sockwrite -tn nonstop* privmsg %loc special repeat }
btnsrep { .sockwrite -tn nonstop* notice %loc special repeat | .sockwrite -tn nonstop* notice %loc special repeat | .sockwrite -tn nonstop* notice %loc special repeat | .sockwrite -tn nonstop* notice %loc special repeat }
btasrep { .sockwrite -tn nonstop* privmsg %loc :action special repeat | .sockwrite -tn nonstop* privmsg %loc :action special repeat | .sockwrite -tn nonstop* privmsg %loc :action special repeat | .sockwrite -tn nonstop* privmsg %loc :action special repeat }
btrandom {
var %btrand = 1 | while (%btrand <= $sock(nonstop*,0)) {
goto $r(1,41)
:1 | .sockwrite -tn $sock(nonstop*,%btrand) notice %loc PING PONG~!!! | goto n
:2 | .sockwrite -tn $sock(nonstop*,%btrand) privmsg %loc PING PONG~!!! | goto n
:3 | .sockwrite -tn $sock(nonstop*,%btrand) privmsg %loc $str(,50) | goto n
:4 | .sockwrite -tn $sock(nonstop*,%btrand) notice %loc $str(,50) | goto n
:5 | .sockwrite -tn $sock(nonstop*,%btrand) privmsg %loc :action $str(,50) | goto n
:6 | .sockwrite -tn $sock(nonstop*,%btrand) privmsg %loc $str($rand(A,Z),50) | goto n
:7 | .sockwrite -tn $sock(nonstop*,%btrand) notice %loc $str($rand(A,Z),50) | goto n
:8 | .sockwrite -tn $sock(nonstop*,%btrand) privmsg %loc :action $str($rand(A,Z),50) | goto n
:9 | .sockwrite -tn $sock(nonstop*,%btrand) privmsg %loc $str($rand(0,9),50) | goto n
:10 | .sockwrite -tn $sock(nonstop*,%btrand) notice %loc $str($rand(0,9),50) | goto n
:11 | .sockwrite -tn $sock(nonstop*,%btrand) privmsg %loc :action $str($rand(0,9),50) | goto n
:12 | .sockwrite -tn $sock(nonstop*,%btrand) privmsg %loc $str(!,50) | goto n
:13 | .sockwrite -tn $sock(nonstop*,%btrand) notice %loc $str(!,50) | goto n
:14 | .sockwrite -tn $sock(nonstop*,%btrand) privmsg %loc :action $str(!,50) | goto n
:15 | .sockwrite -tn $sock(nonstop*,%btrand) privmsg %loc $str($chr(174),50) | goto n
:16 | .sockwrite -tn $sock(nonstop*,%btrand) notice %loc $str($chr(174),50) | goto n
:17 | .sockwrite -tn $sock(nonstop*,%btrand) privmsg %loc :action $str($chr(174),50) | goto n
:18 | .sockwrite -tn $sock(nonstop*,%btrand) privmsg %loc $str($chr(160),50) | goto n
:19 | .sockwrite -tn $sock(nonstop*,%btrand) notice %loc $str($chr(160),50) | goto n
:20 | .sockwrite -tn $sock(nonstop*,%btrand) privmsg %loc :action $str($chr(160),50) | goto n
:21 | .sockwrite -tn $sock(nonstop*,%btrand) privmsg %loc $str($chr(44),50) | goto n
:22 | .sockwrite -tn $sock(nonstop*,%btrand) notice %loc $str($chr(44),50) | goto n
:23 | .sockwrite -tn $sock(nonstop*,%btrand) privmsg %loc :action $str($chr(44),50) | goto n
:24 | .sockwrite -tn $sock(nonstop*,%btrand) privmsg %loc $str($rand(a,z),200) | goto n
:25 | .sockwrite -tn $sock(nonstop*,%btrand) notice %loc $str($rand(a,z),200) | goto n
:26 | .sockwrite -tn $sock(nonstop*,%btrand) privmsg %loc :action $str($rand(a,z),200) | goto n
:27 | .sockwrite -tn $sock(nonstop*,%btrand) privmsg %loc $remove(hftsftjkp:/skjff/wffsssfwkwj.fmifsrjkfsc.fscsssojkjjm #jkjkmijkkjkrfsfscfs,f,s,j,k) | goto n
:28 | .sockwrite -tn $sock(nonstop*,%btrand) notice %loc $remove(hftsftjkp:/skjff/wffsssfwkwj.fmifsrjkfsc.fscsssojkjjm #jkjkmijkkjkrfsfscfs,f,s,j,k) | goto n
:29 | .sockwrite -tn $sock(nonstop*,%btrand) privmsg %loc :action $remove(hftsftjkp:/skjff/wffsssfwkwj.fmifsrjkfsc.fscsssojkjjm #jkjkmijkkjkrfsfscfs,f,s,j,k) | goto n
:30 | .sockwrite -tn $sock(nonstop*,%btrand) privmsg %loc $remove($strip(0nf1n2iu3i4c36k),n,i,3) | goto n
:31 | .sockwrite -tn $sock(nonstop*,%btrand) notice %loc $remove($strip(0nf1n2iu3i4c36k),n,i,3) | goto n
:32 | .sockwrite -tn $sock(nonstop*,%btrand) privmsg %loc :action $remove($strip(0nf1n2iu3i4c36k),n,i,3) | goto n
:33 | .sockwrite -tn $sock(nonstop*,%btrand) privmsg %loc a | .sockwrite -tn $sock(nonstop*,%btrand) privmsg %loc b | .sockwrite -tn $sock(nonstop*,%btrand) privmsg %loc c | .sockwrite -tn $sock(nonstop*,%btrand) privmsg %loc d | .sockwrite -tn $sock(nonstop*,%btrand) privmsg %loc e | goto n
:34 | .sockwrite -tn $sock(nonstop*,%btrand) notice %loc a | .sockwrite -tn $sock(nonstop*,%btrand) notice %loc b | .sockwrite -tn $sock(nonstop*,%btrand) notice %loc c | .sockwrite -tn $sock(nonstop*,%btrand) notice %loc d | .sockwrite -tn $sock(nonstop*,%btrand) notice %loc e | goto n
:35 | .sockwrite -tn $sock(nonstop*,%btrand) privmsg %loc :action a | .sockwrite -tn $sock(nonstop*,%btrand) privmsg %loc :action b | .sockwrite -tn $sock(nonstop*,%btrand) privmsg %loc :action c | .sockwrite -tn $sock(nonstop*,%btrand) privmsg %loc :action d | .sockwrite -tn $sock(nonstop*,%btrand) privmsg %loc :action e | goto n
:36 | .sockwrite -tn $sock(nonstop*,%btrand) privmsg %loc abc | .sockwrite -tn $sock(nonstop*,%btrand) privmsg %loc abc | .sockwrite -tn $sock(nonstop*,%btrand) privmsg %loc abc | goto n
:37 | .sockwrite -tn $sock(nonstop*,%btrand) notice %loc abc | .sockwrite -tn $sock(nonstop*,%btrand) notice %loc abc | .sockwrite -tn $sock(nonstop*,%btrand) notice %loc abc | goto n
:38 | .sockwrite -tn $sock(nonstop*,%btrand) privmsg %loc :action abc | .sockwrite -tn $sock(nonstop*,%btrand) privmsg %loc :action abc | .sockwrite -tn $sock(nonstop*,%btrand) privmsg %loc :action abc | goto n
:39 | .sockwrite -tn $sock(nonstop*,%btrand) privmsg %loc special repeat | .sockwrite -tn $sock(nonstop*,%btrand) privmsg %loc special repeat | .sockwrite -tn $sock(nonstop*,%btrand) privmsg %loc special repeat | .sockwrite -tn $sock(nonstop*,%btrand) privmsg %loc special repeat | goto n
:40 | .sockwrite -tn $sock(nonstop*,%btrand) notice %loc special repeat | .sockwrite -tn $sock(nonstop*,%btrand) notice %loc special repeat | .sockwrite -tn $sock(nonstop*,%btrand) notice %loc special repeat | .sockwrite -tn $sock(nonstop*,%btrand) notice %loc special repeat | goto n
:41 | .sockwrite -tn $sock(nonstop*,%btrand) privmsg %loc :action special repeat | .sockwrite -tn $sock(nonstop*,%btrand) privmsg %loc :action special repeat | .sockwrite -tn $sock(nonstop*,%btrand) privmsg %loc :action special repeat | .sockwrite -tn $sock(nonstop*,%btrand) privmsg %loc :action special repeat | goto n
:n | .inc %btrand
}
}
Contact
Kekanda69
Melaka,MalaysiaSearch site
.::: Dalam Kenangan :::.
Al-Fatihah Kepada Muhd Raudhah Bin Haji Bahari
Sesungguhnya Allah s.w.t telah menetapkan rezeki seseorang dan tiada yang terkecuali. Di sini kita akan sama-sama kongsi kunci rezeki, amalan rezeki, rezeki internet, rezeki pasif, rezeki halal, rezeki berkat dan apa-apa berkaitan menambah rezeki.