so aku post je la..
==================================================================================
on ^*!1:text:*:#: {
if (Bot isin $nick) {
if (SEDIA isin $2-) { return }
if (Saham yang dibuka isin $strip($1-)) { .set %laburbsb $remove($replace($strip($8-), ,$chr(32)),|-[,]-[,]-|)
var %:² = 1 | var %laburbsb1 = 3 | while (%:² <= $numtok(%laburbsb,32)) { .timerlabur $+ $r(1,9) $+ $r(1,9) 1 $calc(%:² + %laburbsb1) msg # !labur $gettok(%laburbsb,%:²,32) 1000 | inc %laburbsb1 3 | .inc %:² } | return } if (Senarai nombor kuda isin $strip($1-)) { var %:² = 1 | while (%:² <= $calc($numtok($strip($10-),32) - 1)) { if ([ !isin $right($gettok($strip($10-),%:²,32),1)) || (] !isin $left($gettok($strip($10-),%:²,32),1)) { msg # !kuda $gettok($strip($10-),%:²,32) 100 } | .inc %:² } | return } if (Peryertaan adalah PERCUMA isin $strip($1-)) { msg # !serta | return } if (kita akan berjudi hari ini isin $strip($1-)) { msg # !jackpot $r(1,15) | msg # !jackpot $r(16,35) | msg # !jackpot $r(36,50) | return } if (Sila Taip !ambil isin $strip($1-)) { var %i = 1, %:l = $len($gettok($strip($1-),$0,32)) | while (%i <= %:l) { var %n = $instok(%n,$mid($gettok($strip($1-),$0,32),%i,1),$calc($numtok(%n,165) +1),165) | inc %i } | while (%:l) { var %r = $r(1,%:l), %:e = %:e $+ $gettok(%n,%r,165), %:n = $gettok(%n,%r,165), %n = $deltok(%n,%r,165) | .dec %:l } | .set %ambil $gettok($strip($1-),$0,32) | msg # !ambil %:e | return } if ($me : nombor yang anda !ambil telah diambil oleh isin $strip($1-)) { var %i = 1, %:l = $len(%ambil) | while (%i <= %:l) { var %n = $instok(%n,$mid(%ambil,%i,1),$calc($numtok(%n,165) +1),165) | inc %i } | while (%:l) { var %r = $r(1,%:l), %:e = %:e $+ $gettok(%n,%r,165), %:n = $gettok(%n,%r,165), %n = $deltok(%n,%r,165) | .dec %:l } | msg # !ambil %:e | return } if (Sila pilih nama tikaman isin $strip($1-)) { var %:² = 1 | while (%:² <= 5) { if ([ != $gettok($strip($10-),%:²,32)) || (] != $gettok($strip($10-),%:²,32)) { msg # !Tikam $gettok($strip($10-),$r(1,10),32) } | .inc %:² } | return } if (tiba masanya membeli nombor toto isin $strip($1-)) { msg # !toto $r(0,9) $+ $r(0,9) | msg # !toto $r(0,9) $+ $r(0,9) | msg # !toto $r(0,9) $+ $r(0,9) | msg # !toto $r(0,9) $+ $r(0,9) | return } if (Anda berjaya sampai dulu ke garisan penamat isin $strip($1-)) { msg # !masuk bmw | timer -m 1 800 /msg # !full on } if (Ini merupakan banjir bagi mengesan penipuan isin $strip($1-)) { msg # $read(hadis.txt) 4,0 P rotection I nside M aximum P rotector } if ($me : nombor isin $strip($1-)) { msg # !jackpot $r(1,50) | return } if (Senarai Pasukan Live Malam ini isin $strip($1-)) { msg # !bet Ac Milan ..aku nak ac milan je..Nak Jugak!! } if (Sorry Game ini masih belum siap isin $strip($1-)) { /msg # aku tau la..aku yang buat game ni wahai $nick } } } ===================================================================================
