Ir para conteúdo
TK News
  • Cadastre-se

Normal AJUDA PARA ALTERAR UM SCRIPT CASSINO ELFBOT

galegotp

Por ,
em Suporte Bots

 Share Seguidores 0

Posts Recomendados

galegotp

galegotp 0

Postado
Postado

Primeira mente boa tarde, dia ou noite sei la kkk =D  
eu to usando um script de cassino, ele ta 100% funcional (funciona tudo sem erros nem bugs) já uso ele a algum tempo porem nesse novo ot que eu to jogando estou com alguns problemas
tipo, eu não fico online muito tempo, passo mais tempo afk, e o ot tem muitos cleans, o que me fode bastante :\ sempre perco o dado e acabo perdendo bastante dinheiro já que niguem consegue jogar.

gostaria que alguem me ajudasse a por pra rodar o dado na mao (left hand) já fiz algumas tentativas por conta propria mas todas sem sucesso já que não manjo muito de programação :s 
se alguem puder me ajudar.

  

[Waypoints]
A 32352 32237 5 SETUP

set $max 100
set $min 2
set $perc 100
set $extrabp 2854

A 32352 32237 5 Place north

set $place $topitem.$posx.[$posy-1].$posz
if [$place == 3499 || $place == 5792 || $place == 5793 || $place == 5794 || $place == 5795 || $place == 5796 || $place == 5797] {gotolabel 'Place ne'}
else {gotolabel 'Place south'}

A 32352 32237 5 Place south

set $place $topitem.$posx.[$posy+1].$posz
if [$place == 3497 || $place == 5792 || $place == 5793 || $place == 5794 || $place == 5795 || $place == 5796 || $place == 5797] {gotolabel 'Place se'}
else {gotolabel 'Place north'}

A 32352 32237 5 Place ne

foreach 'screenplayers' $a { if [$a.posx == $posx-2 && $a.posy == $posy && $a.posz == $posz] {gotolabel 'Attack ne'}
else {gotolabel 'Place nw'} }

A 32352 32237 5 Place nw

foreach 'screenplayers' $a {if [$a.posx == $posx+2 && $a.posy == $posy && $a.posz == $posz && $a.isshootable ==1] {gotolabel 'Attack nw'}
else {gotolabel 'Repeat ne'}}

A 32352 32237 5 Repeat ne

set $place $topitem.$posx.[$posy-1].$posz | if [$place == 3499 || $place == 5792 || $place == 5793 || $place == 5794 || $place == 5795 || $place == 5796 || $place == 5797] {gotolabel 'Place ne'} | else {gotolabel 'Place north'}

A 32352 32237 5 Place se

foreach 'screenplayers' $a {if [$a.posx == $posx-2 && $a.posy == $posy && $a.posz == $posz && $a.isshootable ==1] {gotolabel 'Attack se'}
else {gotolabel 'Place sw'}}

A 32352 32237 5 Place sw

foreach 'screenplayers' $a {if [$a.posx == $posx+2 && $a.posy == $posy && $a.posz == $posz && $a.isshootable ==1] {gotolabel 'Attack sw'}
else {gotolabel 'Repeat se'}}

A 32352 32237 5 Repeat se

set $place $topitem.$posx.[$posy+1].$posz | if [$place == 3497 || $place == 5792 || $place == 5793 || $place == 5794 || $place == 5795 || $place == 5796 || $place == 5797] {gotolabel 'Place se'}
else {gotolabel 'Place north'}

A 32352 32237 5 Attack ne

foreach 'screenplayers' $a {if [$a.posx == $posx-2 && $a.posy == $posy && $a.posz == $posz] {attack $a.id | say 'Bem Vindo $target.name , Faça Sua Aposta! Payout $perc %!' | gotolabel 'Pre bet ne'} else {gotolabel 'Repeat attack ne'}}

A 32352 32237 5 Repeat attack ne

set $place $topitem.$posx.[$posy-1].$posz | if [$place == 3499 || $place == 5792 || $place == 5793 || $place == 5794 || $place == 5795 || $place == 5796 || $place == 5797] {stopattack | clear target | gotolabel 'Attack ne'}
else {clear target | wait 1000 | stopattack | gotolabel 'Place north'}

A 32352 32237 5 Pre bet ne

if [$target.posx == $posx-2 && $target.posy == $posy && $target.posz == $posz] {closeallwindows | wait 200 | set $check [$max/50] | openbeltitem | gotolabel 'Bet ne'}
else {gotolabel 'Repeat attack ne'} 

A 32352 32237 5 Bet ne

while [$check > 0] {collectitems $beltsolt.id 3043 | dec $check | wait 500} | gotolabel 'Bet check ne'

A 32352 32237 5 Bet check ne

countitemsvisible 3043
if [$count > 0] {gotolabel 'Bet money ne'}
else {closeallwindows | gotolabel 'Repeat bet ne'}

A 32352 32237 5 Repeat bet ne

gotolabel 'Pre bet ne'

A 32352 32237 5 Bet money ne

say 'Calculando...' 
wait 500
set $bet $count
if [$bet > $max || $bet < $min ] {say 'Min $min kk Max $max kk' | wait 500 | gotolabel 'Bet backo ne'}
else {wait 500 | gotolabel 'Safe ne'}

A 32352 32237 5 Bet backo ne

set $outtimes [$bet/100]
set $change [$bet-$outtimes*100]
wait 200
dropitemsxyzamount [$posx-2] [$posy-1] $posz 3043 $change
wait 200
while [$outtimes > 0] {wait 200 | dropitemsxyzamount [$posx-2] [$posy-1] $posz 3043 100 | wait 200 | dec $outtimes}
closeallwindows
gotolabel 'Pre bet ne'

A 32352 32237 5 Safe ne

openbpitem
wait 700
moveitems 3043 $backslot.id
wait 700
countitemsvisible 3043
wait 700
set $restack $count
if [$restack <= ($bet*2) || $restack >= 1600 && $winitemcount.'$extrabp' > 0] {gotolabel 'Restack ne'}
closeallwindows
say 'Voce Apostou $bet kk! Fale h ou l'
gotolabel 'Roll ne'

A 32352 32237 5 Restack ne

openitemnew $extrabp 1 $backslot.id
wait 200
countitemsvisible 3043
wait 200
set $comp $count
if [$restack == $comp] {say 'Voce Apostou $bet kk! Fale h ou l!' | wait 200 | closeallwindows | gotolabel 'Roll ne'}
else {gotolabel 'Restack two ne'}

A 32352 32237 5 Restack two ne

set $extimes [$restack/100]
set $exchange [$restack-$extimes*100]
set $dif [$comp-$restack]
set $diftimes [$dif/100]
set $difchange [$dif-$diftimes*100]
if [$restack < ($bet*2)] {gotolabel 'Restack under ne'}
if [$restack >= 1600] {gotolabel 'Restack over ne'}

A 32352 32237 5 Restack under ne

say 'Please wait! Restacking!'
movenitems 3043 $difchange $backslot.id
wait 200
set $numb 5
while [$numb > 0] {wait 500 | movenitems 3043 100 $backslot.id | wait 200 | dec $numb | wait 200}
say 'Voce Apostou $bet kk! Fale h ou l!'
closeallwindows
gotolabel 'Roll ne'

A 32352 32237 5 Restack over ne

say 'Please wait! Restacking!'
movenitems 3043 $exchange $extrabp
wait 200
set $numb 6
while [$numb > 0] {wait 500 | movenitems 3043 100 $extrabp | wait 200 | dec $numb | wait 200}
say 'Voce Apostou $bet kk! Fale h ou l!'
closeallwindows
gotolabel 'Roll ne'

A 32352 32237 5 Roll ne

if [$target.posx == $posx-2 && $target.posy == $posy && $target.posz == $posz] {wait 500 | gotolabel 'Roll high ne'} | else {gotolabel 'Repeat attack ne'}

A 32352 32237 5 Roll high ne

wait 100 | if [$lastmsg.content == 'h' && $lastmsg.sender == $target.name] {wait 500 | gotolabel 'Trash high ne'} | else {wait 100 | gotoloabel 'Roll low ne'}

A 32352 32237 5 Roll low ne

wait 100 | if [$lastmsg.content == 'l' && $lastmsg.sender == $target.name] {wait 500 | gotolabel 'Trash low ne'} | else {gotolabel 'Repeat roll ne'}

A 32352 32237 5 Repeat roll ne

gotolabel 'Roll ne'

A 32352 32237 5 Trash high ne

set $food $topitem.$posx.[$posy-1].$posz | if [$food == 5792 || $food == 5793 || $food == 5794 || $food == 5795 || $food == 5796 || $food == 5797] {gotolabel 'High check ne'} | else {say 'Dice is trashed!' | gotolabel 'Bet back ne'}

A 32352 32237 5 Trash low ne

set $food $topitem.$posx.[$posy-1].$posz | if [$food == 5792 || $food == 5793 || $food == 5794 || $food == 5795 || $food == 5796 || $food == 5797] {gotolabel 'Low check ne'} | else {say 'Dice is trashed!' | gotolabel 'Bet back ne'}

A 32352 32237 5 High check ne

usegroundxyz $posx [$posy-1] $posz | wait 1000 | set $dice $topitem.$posx.[$posy-1].$posz | if [$dice == 5795 || $dice == 5796 || $dice == 5797] {wait 1000 | gotolabel 'Payout ne'} | else {gotolabel 'Trash check high ne'}

A 32352 32237 5 Low check ne

usegroundxyz $posx [$posy-1] $posz | wait 1000 | set $dice $topitem.$posx.[$posy-1].$posz | if [$dice == 5792 || $dice == 5793 || $dice == 5794] {wait 1000 | gotolabel 'Payout ne'} | else {gotolabel 'Trash check low ne'}

A 32352 32237 5 Payout ne

set $help [$bet*$perc]
wait 200
set $post [$help/100]
wait 200
set $win [$bet+$post]
wait 200
openbpitem
wait 200
countitemsvisible 3043
wait 200
set $all $count
set $allpiles [$all/100]
set $allchange [$all-$allpiles*100]
wait 200
if [$win < $allchange] {wait 200 | dropitemsxyzamount [$posx-2] [$posy-1] $posz 3043 $win | closeallwindows | gotolabel ' Pre bet ne'}
else {gotolabel 'Payout two ne'}

A 32352 32237 5 Payout two ne

wait 500
dropitemsxyzamount [$posx-2] [$posy-1] $posz 3043 $allchange
wait 200
set $win [$win-$allchange]
set $outtimes [$win/100]
set $change [$win-$outtimes*100]
wait 200
if [$outtimes == 0] {wait 500 | dropitemsxyzamount [$posx-2] [$posy-1] $posz 3043 $win | closeallwindows | gotolabel 'Pre bet ne'}
while [$outtimes > 0] {wait 500 | dropitemsxyzamount [$posx-2] [$posy-1] $posz 3043 100 | dec $outtimes | wait 500}
wait 500
dropitemsxyzamount [$posx-2] [$posy-1] $posz 3043 $change
wait 200
wait 200
closeallwindows
gotolabel 'Pre bet ne'

A 32352 32237 5 Trash check high ne

if [$topitem.$posx.($posy-1).$posz != 5792 && $topitem.$posx.($posy-1).$posz != 5793 && $topitem.$posx.($posy-1).$posz != 5794] {wait 1000 | say 'Dice is trashed. Take your bet back!' | gotolabel 'Bet back ne'} | else {say 'Voce Perdeu, Tente Outra Vez!' | gotolabel 'Repeat bet ne'}

A 32352 32237 5 Trash check low ne

if [$topitem.$posx.($posy-1).$posz != 5795 && $topitem.$posx.($posy-1).$posz != 5796 && $topitem.$posx.($posy-1).$posz != 5797] {wait 1000 | say 'Dice is trashed. Take your bet back!' | gotolabel 'Bet back ne'} | else {say 'Voce Perdeu, Tente Outra Vez!' | gotolabel 'Repeat bet ne'}

A 32352 32237 5 Bet back ne

closeallwindows
openbpitem
wait 500
countitemvisible 3043
wait 500
set $monback $count
set $timeback [$monback/100]
set $chaback [$monback-$timeback*100]
if [$bet < $chaback] {wait 200 | dropitemsxyzamount [$posx-2] [$posy-1] $posz 3043 $bet | closeallwindows | gotolabel 'Pre bet ne'}
wait 200
dropitemsxyzamount [$posx-2] [$posy-1] $posz 3043 $chaback
wait 200
set $bet [$bet-$chaback]
set $outtimes [$bet/100]
set $change [$bet-$outtimes*100]
wait 200
while [$outtimes > 0] {wait 500 | dropitemsxyzamount [$posx-2] [$posy-1] $posz 3043 100 | wait 200 | dec $outtimes}
wait 200
dropitemsxyzamount [$posx-2] [$posy-1] $posz 3043 $change
wait 200
closeallwindows
gotolabel 'Pre bet ne'

A 32352 32237 5 Attack nw

foreach 'screenplayers' $a {if [$a.posx == $posx+2 && $a.posy == $posy && $a.posz == $posz] {attack $a.id | say 'Bem Vindo $target.name , Faça Sua Aposta! Payout $perc %' | gotolabel 'Pre bet nw'} else {gotolabel 'Repeat attack nw'}}

A 32352 32237 5 Repeat attack nw

set $place $topitem.$posx.[$posy-1].$posz | if [$place == 3499 || $place == 5792 || $place == 5793 || $place == 5794 || $place == 5795 || $place == 5796 || $place == 5797] {stopattack | clear target | gotolabel 'Attack nw'}
else {clear target | wait 1000 | stopattack | gotolabel 'Place north'}

A 32352 32237 5 Pre bet nw

if [$target.posx == $posx+2 && $target.posy == $posy && $target.posz == $posz] {closeallwindows | wait 200 | set $check [$max/50] | openbeltitem | gotolabel 'Bet nw'}
else {gotolabel 'Repeat attack nw'} 

A 32352 32237 5 Bet nw

while [$check > 0] {collectitems $beltsolt.id 3043 | dec $check | wait 500} | gotolabel 'Bet check nw'

A 32352 32237 5 Bet check nw

countitemsvisible 3043
if [$count > 0] {gotolabel 'Bet money nw'}
else {closeallwindows | gotolabel 'Repeat bet nw'}

A 32352 32237 5 Repeat bet nw

gotolabel 'Pre bet nw'

A 32352 32237 5 Bet money nw

say 'Calculando...' 
wait 500
set $bet $count
if [$bet > $max || $bet < $min ] {say 'Min $min kk Max $max kk' | wait 500 | gotolabel 'Bet backo nw'}
else {wait 500 | gotolabel 'Safe nw'}

A 32352 32237 5 Bet backo nw

set $outtimes [$bet/100]
set $change [$bet-$outtimes*100]
wait 200
dropitemsxyzamount [$posx+2] [$posy-1] $posz 3043 $change
wait 200
while [$outtimes > 0] {wait 500 | dropitemsxyzamount [$posx+2] [$posy-1] $posz 3043 100 | wait 200 | dec $outtimes}
closeallwindows
gotolabel 'Pre bet nw'

A 32352 32237 5 Safe nw

openbpitem
wait 700
moveitems 3043 $backslot.id
wait 700
countitemsvisible 3043
wait 700
set $restack $count
if [$restack <= ($bet*2) || $restack >= 1600 && $winitemcount.'$extrabp' > 0] {gotolabel 'Restack nw'}
closeallwindows
say 'Voce Apostou $bet kk! Fale h ou l'
gotolabel 'Roll nw'

A 32352 32237 5 Restack nw

openitemnew $extrabp 1 $backslot.id
wait 200
countitemsvisible 3043
wait 200
set $comp $count
if [$restack == $comp] {say 'Voce Apostou $bet kk! Fale h ou l!' | wait 200 | closeallwindows | gotolabel 'Roll nw'}
else {gotolabel 'Restack two nw'}

A 32352 32237 5 Restack two nw

set $extimes [$restack/100]
set $exchange [$restack-$extimes*100]
set $dif [$comp-$restack]
set $diftimes [$dif/100]
set $difchange [$dif-$diftimes*100]
if [$restack < ($bet*2)] {gotolabel 'Restack under nw'}
if [$restack >= 1600] {gotolabel 'Restack over nw'}

A 32352 32237 5 Restack under nw

say 'Please wait! Restacking!'
movenitems 3043 $difchange $backslot.id
wait 200
set $numb 5
while [$numb > 0] {wait 500 | movenitems 3043 100 $backslot.id | wait 200 | dec $numb | wait 200}
say 'Voce Apostou $bet kk! Fale h ou l!'
closeallwindows
gotolabel 'Roll nw'

A 32352 32237 5 Restack over nw

say 'Please wait! Restacking!'
movenitems 3043 $exchange $extrabp
wait 200
set $numb 6
while [$numb > 0] {wait 500 | movenitems 3043 100 $extrabp | wait 200 | dec $numb | wait 200}
say 'Voce Apostou $bet kk! Fale h ou l!'
closeallwindows
gotolabel 'Roll nw'

A 32352 32237 5 Roll nw

if [$target.posx == $posx+2 && $target.posy == $posy && $target.posz == $posz] {wait 500 | gotolabel 'Roll high nw'} | else {gotolabel 'Repeat attack nw'}

A 32352 32237 5 Roll high nw

wait 100 | if [$lastmsg.content == 'h' && $lastmsg.sender == $target.name] {wait 500 | gotolabel 'Trash high nw'} | else {wait 100 | gotoloabel 'Roll low nw'}

A 32352 32237 5 Roll low ne

wait 100 | if [$lastmsg.content == 'l' && $lastmsg.sender == $target.name] {wait 500 | gotolabel 'Trash low nw'} | else {gotolabel 'Repeat roll nw'}

A 32352 32237 5 Repeat roll nw

gotolabel 'Roll nw'

A 32352 32237 5 Trash high nw

set $food $topitem.$posx.[$posy-1].$posz | if [$food == 5792 || $food == 5793 || $food == 5794 || $food == 5795 || $food == 5796 || $food == 5797] {gotolabel 'High check nw'} | else {gotolabel 'Bet back nw'}

A 32352 32237 5 Trash low nw

set $food $topitem.$posx.[$posy-1].$posz | if [$food == 5792 || $food == 5793 || $food == 5794 || $food == 5795 || $food == 5796 || $food == 5797] {gotolabel 'Low check nw'} | else {gotolabel 'Bet back nw'}

A 32352 32237 5 High check nw

usegroundxyz $posx [$posy-1] $posz | wait 1000 | set $dice $topitem.$posx.[$posy-1].$posz | if [$dice == 5795 || $dice == 5796 || $dice == 5797] {wait 1000 | gotolabel 'Payout nw'} | else {gotolabel 'Trash check high nw'}

A 32352 32237 5 Low check nw

usegroundxyz $posx [$posy-1] $posz | wait 1000 | set $dice $topitem.$posx.[$posy-1].$posz | if [$dice == 5792 || $dice == 5793 || $dice == 5794] {wait 1000 | gotolabel 'Payout nw'} | else {gotolabel 'Trash check low nw'}

A 32352 32237 5 Payout nw

set $help [$bet*$perc]
wait 200
set $post [$help/100]
wait 200
set $win [$bet+$post]
wait 200
openbpitem
wait 200
countitemsvisible 3043
wait 200
set $all $count
set $allpiles [$all/100]
set $allchange [$all-$allpiles*100]
wait 200
if [$win < $allchange] {wait 200 | dropitemsxyzamount [$posx+2] [$posy-1] $posz 3043 $win | closeallwindows | gotolabel ' Pre bet nw'}
else {gotolabel 'Payout two nw'}

A 32352 32237 5 Payout two nw

wait 500
dropitemsxyzamount [$posx+2] [$posy-1] $posz 3043 $allchange
wait 200
set $win [$win-$allchange]
set $outtimes [$win/100]
set $change [$win-$outtimes*100]
wait 200
if [$outtimes == 0] {wait 500 | dropitemsxyzamount [$posx+2] [$posy-1] $posz 3043 $win | closeallwindows | gotolabel 'Pre bet nw'}
while [$outtimes > 0] {wait 500 | dropitemsxyzamount [$posx+2] [$posy-1] $posz 3043 100 | dec $outtimes | wait 500}
wait 500
dropitemsxyzamount [$posx+2] [$posy-1] $posz 3043 $change
wait 200
closeallwindows
gotolabel 'Pre bet nw'

A 32352 32237 5 Trash check high nw

if [$topitem.$posx.($posy-1).$posz != 5792 && $topitem.$posx.($posy-1).$posz != 5793 && $topitem.$posx.($posy-1).$posz != 5794] {wait 1000 | say 'Dice is trashed. Take your bet back!' | gotolabel 'Bet back nw'} | else {say 'Voce Perdeu, Tente Outra Vez!' | gotolabel 'Repeat bet nw'}

A 32352 32237 5 Trash check low nw

if [$topitem.$posx.($posy-1).$posz != 5795 && $topitem.$posx.($posy-1).$posz != 5796 && $topitem.$posx.($posy-1).$posz != 5797] {wait 1000 | say 'Dice is trashed. Take your bet back!' | gotolabel 'Bet back nw'} | else {say 'Voce Perdeu, Tente Outra Vez!' | gotolabel 'Repeat bet nw'}

A 32352 32237 5 Bet back nw

closeallwindows
openbpitem
wait 500
countitemvisible 3043
wait 500
set $monback $count
set $timeback [$monback/100]
set $chaback [$monback-$timeback*100]
if [$bet < $chaback] {wait 200 | dropitemsxyzamount [$posx+2] [$posy-1] $posz 3043 $bet | closeallwindows | gotolabel 'Pre bet nw'}
wait 200
dropitemsxyzamount [$posx+2] [$posy-1] $posz 3043 $chaback
wait 200
set $bet [$bet-$chaback]
set $outtimes [$bet/100]
set $change [$bet-$outtimes*100]
wait 200
while [$outtimes > 0] {wait 500 | dropitemsxyzamount [$posx+2] [$posy-1] $posz 3043 100 | wait 200 | dec $outtimes}
wait 200
dropitemsxyzamount [$posx+2] [$posy-1] $posz 3043 $change
wait 200
closeallwindows
gotolabel 'Pre bet nw'

A 32352 32237 5 Attack se

foreach 'screenplayers' $a {if [$a.posx == $posx-2 && $a.posy == $posy && $a.posz == $posz] {attack $a.id | say 'Bem Vindo $target.name , Faça Sua Aposta! Payout $perc %' | gotolabel 'Pre bet se'} else {gotolabel 'Repeat attack se'}}

A 32352 32237 5 Repeat attack se

set $place $topitem.$posx.[$posy+1].$posz | if [$place == 3497 || $place == 5792 || $place == 5793 || $place == 5794 || $place == 5795 || $place == 5796 || $place == 5797] {stopattack | clear target | gotolabel 'Attack se'}
else {clear target | wait 1000 | stopattack | gotolabel 'Place north'}

A 32352 32237 5 Pre bet se

if [$target.posx == $posx-2 && $target.posy == $posy && $target.posz == $posz] {closeallwindows | wait 200 | set $check [$max/50] | openbeltitem | gotolabel 'Bet se'}
else {gotolabel 'Repeat attack se'}

A 32352 32237 5 Bet se

while [$check > 0] {collectitems $beltsolt.id 3043 | dec $check | wait 500} | gotolabel 'Bet check se'

A 32352 32237 5 Bet check se

countitemsvisible 3043
if [$count > 0] {gotolabel 'Bet money se'}
else {closeallwindows | gotolabel 'Repeat bet se'}

A 32352 32237 5 Repeat bet se

gotolabel 'Pre bet se'

A 32352 32237 5 Bet money se

say 'Calculando...' 
wait 500
set $bet $count
if [$bet > $max || $bet < $min ] {say 'Min $min kk Max $max kk' | wait 500 | gotolabel 'Bet backo se'}
else {wait 500 | gotolabel 'Safe se'}

A 32352 32237 5 Bet backo se

set $outtimes [$bet/100]
set $change [$bet-$outtimes*100]
wait 200
dropitemsxyzamount [$posx-2] [$posy+1] $posz 3043 $change
wait 200
while [$outtimes > 0] {wait 500 | dropitemsxyzamount [$posx-2] [$posy+1] $posz 3043 100 | wait 200 | dec $outtimes}
closeallwindows
gotolabel 'Pre bet se'

A 32352 32237 5 Safe se

openbpitem
wait 700
moveitems 3043 $backslot.id
wait 700
countitemsvisible 3043
wait 700
set $restack $count
if [$restack <= ($bet*2) || $restack >= 1600 && $winitemcount.'$extrabp' > 0] {gotolabel 'Restack se'}
closeallwindows
say 'Voce Apostou $bet kk! Fale h ou l'
gotolabel 'Roll se'

A 32352 32237 5 Restack se

openitemnew $extrabp 1 $backslot.id
wait 200
countitemsvisible 3043
wait 200
set $comp $count
if [$restack == $comp] {say 'Voce Apostou $bet kk! Fale h ou l!' | wait 200 | closeallwindows | gotolabel 'Roll se'}
else {gotolabel 'Restack two se'}

A 32352 32237 5 Restack two se

set $extimes [$restack/100]
set $exchange [$restack-$extimes*100]
set $dif [$comp-$restack]
set $diftimes [$dif/100]
set $difchange [$dif-$diftimes*100]
if [$restack < ($bet*2)] {gotolabel 'Restack under se'}
if [$restack >= 1600] {gotolabel 'Restack over se'}

A 32352 32237 5 Restack under se

say 'Please wait! Restacking!'
movenitems 3043 $difchange $backslot.id
wait 200
set $numb 5
while [$numb > 0] {wait 500 | movenitems 3043 100 $backslot.id | wait 200 | dec $numb | wait 200}
say 'Voce Apostou $bet kk! Fale h ou l!'
closeallwindows
gotolabel 'Roll se'

A 32352 32237 5 Restack over se

say 'Please wait! Restacking!'
movenitems 3043 $exchange $extrabp
wait 200
set $numb 6
while [$numb > 0] {wait 500 | movenitems 3043 100 $extrabp | wait 200 | dec $numb | wait 200}
say 'Voce Apostou $bet kk! Fale h ou l!'
closeallwindows
gotolabel 'Roll se'

A 32352 32237 5 Roll se

if [$target.posx == $posx-2 && $target.posy == $posy && $target.posz == $posz] {wait 500 | gotolabel 'Roll high se'} | else {gotolabel 'Repeat attack se'}

A 32352 32237 5 Roll high se

wait 100 | if [$lastmsg.content == 'h' && $lastmsg.sender == $target.name] {wait 500 | gotolabel 'Trash high se'} | else {wait 100 | gotoloabel 'Roll low se'}

A 32352 32237 5 Roll low se

wait 100 | if [$lastmsg.content == 'l' && $lastmsg.sender == $target.name] {wait 500 | gotolabel 'Trash low se'} | else {gotolabel 'Repeat roll se'}

A 32352 32237 5 Repeat roll se

gotolabel 'Roll se'

A 32352 32237 5 Trash high se

set $food $topitem.$posx.[$posy+1].$posz | if [$food == 5792 || $food == 5793 || $food == 5794 || $food == 5795 || $food == 5796 || $food == 5797] {gotolabel 'High check se'} | else {gotolabel 'Bet back se'}

A 32352 32237 5 Trash low se

set $food $topitem.$posx.[$posy+1].$posz | if [$food == 5792 || $food == 5793 || $food == 5794 || $food == 5795 || $food == 5796 || $food == 5797] {gotolabel 'Low check se'} | else {gotolabel 'Bet back se'}

A 32352 32237 5 High check se

usegroundxyz $posx [$posy+1] $posz | wait 1000 | set $dice $topitem.$posx.[$posy+1].$posz | if [$dice == 5795 || $dice == 5796 || $dice == 5797] {wait 1000 | gotolabel 'Payout se'} | else {gotolabel 'Trash check high se'}

A 32352 32237 5 Low check se

usegroundxyz $posx [$posy+1] $posz | wait 1000 | set $dice $topitem.$posx.[$posy+1].$posz | if [$dice == 5792 || $dice == 5793 || $dice == 5794] {wait 1000 | gotolabel 'Payout se'} | else {gotolabel 'Trash check low se'}

A 32352 32237 5 Payout se

set $help [$bet*$perc]
wait 200
set $post [$help/100]
wait 200
set $win [$bet+$post]
wait 200
openbpitem
wait 200
countitemsvisible 3043
wait 200
set $all $count
set $allpiles [$all/100]
set $allchange [$all-$allpiles*100]
wait 200
if [$win < $allchange] {wait 200 | dropitemsxyzamount [$posx-2] [$posy+1] $posz 3043 $win | closeallwindows | gotolabel ' Pre bet se'}
else {gotolabel 'Payout two se'}

A 32352 32237 5 Payout two se

wait 500
dropitemsxyzamount [$posx-2] [$posy+1] $posz 3043 $allchange
wait 200
set $win [$win-$allchange]
set $outtimes [$win/100]
set $change [$win-$outtimes*100]
wait 200	
if [$outtimes == 0] {wait 500 | dropitemsxyzamount [$posx-2] [$posy+1] $posz 3043 $win | closeallwindows | gotolabel 'Pre bet se'}
while [$outtimes > 0] {wait 500 | dropitemsxyzamount [$posx-2] [$posy+1] $posz 3043 100 | dec $outtimes | wait 500}
wait 500
dropitemsxyzamount [$posx-2] [$posy+1] $posz 3043 $change
wait 200
wait 200
closeallwindows
gotolabel 'Pre bet se'

A 32352 32237 5 Trash check high se

if [$topitem.$posx.($posy+1).$posz != 5792 && $topitem.$posx.($posy+1).$posz != 5793 && $topitem.$posx.($posy+1).$posz != 5794] {wait 1000 | say 'Dice is trashed. Take your bet back!' | gotolabel 'Bet back se'} | else {say 'Voce Perdeu, Tente Outra Vez!' | gotolabel 'Repeat bet se'}

A 32352 32237 5 Trash check low se

if [$topitem.$posx.($posy+1).$posz != 5795 && $topitem.$posx.($posy+1).$posz != 5796 && $topitem.$posx.($posy+1).$posz != 5797] {wait 1000 | say 'Dice is trashed. Take your bet back!' | gotolabel 'Bet back se'} | else {say 'Voce Perdeu, Tente Outra Vez!' | gotolabel 'Repeat bet se'}

A 32352 32237 5 Bet back se

closeallwindows
openbpitem
wait 500
countitemvisible 3043
wait 500
set $monback $count
set $timeback [$monback/100]
set $chaback [$monback-$timeback*100]
if [$bet < $chaback] {wait 200 | dropitemsxyzamount [$posx-2] [$posy+1] $posz 3043 $bet | closeallwindows | gotolabel 'Pre bet se'}
wait 200
dropitemsxyzamount [$posx-2] [$posy+1] $posz 3043 $chaback
wait 200
set $bet [$bet-$chaback]
set $outtimes [$bet/100]
set $change [$bet-$outtimes*100]
wait 200
while [$outtimes > 0] {wait 500 | dropitemsxyzamount [$posx-2] [$posy+1] $posz 3043 100 | wait 200 | dec $outtimes}
wait 200
dropitemsxyzamount [$posx-2] [$posy+1] $posz 3043 $change
wait 200
closeallwindows
gotolabel 'Pre bet se'

A 32352 32237 5 Attack sw

foreach 'screenplayers' $a {if [$a.posx == $posx+2 && $a.posy == $posy && $a.posz == $posz] {attack $a.id | say 'Bem Vindo $target.name , Faça Sua Aposta! Payout $perc %' | gotolabel 'Pre bet sw'} else {gotolabel 'Repeat attack sw'}}

A 32352 32237 5 Repeat attack sw

set $place $topitem.$posx.[$posy+1].$posz | if [$place == 3497 || $place == 5792 || $place == 5793 || $place == 5794 || $place == 5795 || $place == 5796 || $place == 5797] {stopattack | clear target | gotolabel 'Attack sw'}
else {clear target | wait 1000 | stopattack | gotolabel 'Place north'}

A 32352 32237 5 Pre bet sw

if [$target.posx == $posx+2 && $target.posy == $posy && $target.posz == $posz] {closeallwindows | wait 200 | set $check [$max/50]  | openbeltitem | gotolabel 'Bet sw'}
else {gotolabel 'Repeat attack sw'} 

A 32352 32237 5 Bet sw

while [$check > 0] {collectitems $beltsolt.id 3043 | dec $check | wait 500} | gotolabel 'Bet check sw'

A 32352 32237 5 Bet check sw

countitemsvisible 3043
if [$count > 0] {gotolabel 'Bet money sw'}
else {closeallwindows | gotolabel 'Repeat bet sw'}

A 32352 32237 5 Repeat bet sw

gotolabel 'Pre bet sw'

A 32352 32237 5 Bet money sw

say 'Calculando...' 
wait 500
set $bet $count
if [$bet > $max || $bet < $min ] {say 'Min $min kk Max $max kk' | wait 500 | gotolabel 'Bet backo sw'}
else {wait 500 | gotolabel 'Safe sw'}

A 32352 32237 5 Bet backo sw

set $outtimes [$bet/100]
set $change [$bet-$outtimes*100]
wait 200
dropitemsxyzamount [$posx+2] [$posy+1] $posz 3043 $change
wait 200
while [$outtimes > 0] {wait 500 | dropitemsxyzamount [$posx+2] [$posy+1] $posz 3043 100 | wait 200 | dec $outtimes}
closeallwindows
gotolabel 'Pre bet sw'

A 32352 32237 5 Safe sw

set $extimes [$restack/100]sx.($posy+1).$posz != 5793 &&


[CavebotOptions]
Rope: Rope
Shovel: Shovel
SkipNearbyNodes: 0
OpenNextBp: no
LootNearbyTargets: no
LootDistantTargets: no

[Alerts]
PlayerOnScreen: 
GmDetected: 
PlayerAttacking: 
DefaultMessage: 
PrivateMessage: 
Disconnected:

Se forem testar o script não liguem com o Min e Max na aposta, na verdade o min  é 20k e o max é 1kk. ele fala min 2kk e max 100kk pq a moeda no ot que eu estou jogando é editada =)

se eu estiver postando no local errado e algum moderador puder me mover eu agradeço ;*

a espera de um milagre :rolleyes:

Link para o post
Compartilhar em outros sites
Wakon

Wakon 912

Postado
Postado

Esta é uma mensagem automática! Este tópico foi movido para a área correta.
Pedimos que você leia as regras do fórum.

Spoiler

This is an automated message! This topic has been moved to the correct area.
Please read the forum rules.

 

 

 

➥ Regras | Seções OTServ | Seções BOT

Link para o post
Compartilhar em outros sites

Participe da conversa

Você pode postar agora e se cadastrar mais tarde. Se você tem uma conta, faça o login para postar com sua conta.

Visitante
Responder

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emojis são permitidos.

×   Seu link foi automaticamente incorporado.   Mostrar como link

×   Seu conteúdo anterior foi restaurado.   Limpar o editor

×   Não é possível colar imagens diretamente. Carregar ou inserir imagens do URL.

×
 Share
Seguidores 0
Ir para a lista de tópicos

  • Quem Está Navegando   0 membros estão online

    Nenhum usuário registrado visualizando esta página.

  • Conteúdo Similar

    • Jaurez
      .
      Por Jaurez
      .
    • Cat
      Tibia 8.60 v2 Map Editor Release (Corrige erro: Could not locate Tibia.dat and/or Tibia.spr, please navigate to your Tibia 8.60 installation folder)
      Por Cat
      Em alguns casos, o tibia 8.60 comum não abre de jeito nenhum no map editor, mesmo desmarcando check file signatures e configurando o path corretamente.
       
      Este é o client 8.60 adaptado para o Remere's Map Editor. Resolvi postar já que ele foi removido do site oficial do RME. (ficou apenas a versão para linux lá)
      Se estiver tendo problemas para abrir a versão 8.60, tente utilizar este.
                                                                                                                     
      Baixar o Tibia Client 8.60 que funciona no Remere’s Map Editor
      Essa versão do Tibia 8.60 client resolve o erro unsupported client version ou Could not locate tibia.dat and/or tibia.spr, please navigate to your tibia 8.60 installation folder.
       
      Downloads
      https://tibiaking.com/applications/core/interface/file/attachment.php?id=47333

      Scan: https://www.virustotal.com/gui/file/333e172ac49ba2028db9eb5889994509e7d2de28ebccfa428c04e86defbe15cc
       
    • danilo belato
      (Resolvido)Problema com Dat Editor (Sprites que e exportada n abri)
      Por danilo belato
      Fala Galera To Com um problema aki 
       
      quero exporta umas sprites de um server para colocar em outro 
       
      eu clico na sprites ai aparece tds a forma delas do lado de la >>
       
      ai eu clico nela e ponho a opiçao de export mais quando salvo a sprite ela n abri 
       
      aparece isso quando tento vê-la 
       
      visualização não disponível ( no formatos png e bitmap)
       
      Agora no formato idc fala que o paint n pode ler 
       
      me ajudem ae...
    • Vitor Bicaleto
      (Resolvido)Script addon bugado
      Por Vitor Bicaleto
      Galera to com o script do addon doll aqui, quando eu digito apenas "!addon" ele aparece assim: Digite novamente, algo está errado!"
      quando digito por exemplo: "!addon citizen" ele não funciona e não da nenhum erro
       
      mesma coisa acontece com o mount doll.. 
    • Ayron5
      (Resolvido)Cannot load boost
      Por Ayron5
      Substitui uma stone no serve, deu tudo certo fora  esse  erro ajudem  Valendo  Rep+  Grato  

      Erro: data/actions/scripts/boost.lua:557: table index is nil
       [Warning - Event::loadScript] Cannot load script (data/actions/scripts/boost.lua)

      Script:

TibiaKing

Open Tibia Server

Quer aprender a criar seu próprio servidor de Tibia? Então está no lugar certo, aqui você encontrará milhares de tutorias, scripts, códigos, mapas e utilitários para que você possa fazer o seu próprio servidor de Tibia começando do zero.

Redes Sociais

Anuncie no TibiaKing

Precisa de mais visibilidade em seus projetos? Quer fazer um plano publicitário para o seu servidor? Anuncie no OTKing e faça sua divulgação, possuímos centenas de acessos simultâneos e milhares diários, com certeza será a sua solução!

×
×
  • Criar Novo...

Informação Importante

Confirmação de Termo

  Eu aceito