SKRYPT NA KASYNO

[Maczo]

@Maczo
Pisząc o tym na helpie nie pisałeś o przerobieniu tego, a dodaniu nowego, w każdym razie nawet za to przerobienie jestem Ci w stanie dać 400/500pp, bo od paru dni nikomu innemu się tego robić nie chciało, przynajmniej nie publicznie.

Hehe , lepsze to niż nic   w takim razię poproszę 500.

[Mrozu]

@Maczo
Tylko, że z tego co wiem od graczy, to ten skrypt nie działa poprawnie.

[Maczo]

Boce juz ponad kilka godzin na 2 harach na tym skrypcie

Kod: [Zaznacz]

set $main 'Backpack'
 
 
 
 
auto 200 if [$beltslot.id == 3040] unequip 'belt' 'empty'
auto 200 countitemsvisible 3040  | if [$count == 100] {set $play 0} | if [$count <= 80] {set $play 1}

auto 500 if [$count > 99] useitem 3040

auto 100 set $cc $topitem.[$self.posx-1].[$self.posy].[$self.posz] | set $cc2 $topitem.[$self.posx-1].[$self.posy-1].[$self.posz] | set $cc3 $topitem.[$self.posx].[$self.posy].[$self.posz] | set $cc4 $topitem.[$self.posx-1].[$self.posy+1].[$self.posz]
auto 100 if [$cc != 10053 && $cc != 3043] {moveitemonground [$posx-1] $posy $posz [$posx+($rand.1.5)] [$posy-($rand.0.2)] $posz} | if [$cc2 != 2772 || $cc2 != 2733] {moveitemonground [$posx-1] [$posy-1] $posz [$posx+($rand.1.5)] [$posy-($rand.0.2)] $posz} | if [$cc3 != 564 && $cc3 != 3043] {moveitemonground $posx $posy $posz [$posx-($rand.1.5)] [$posy-($rand.0.2)] $posz} | if [$cc4 != 2114 && $cc4 != 3043] {moveitemonground [$posx-1] [$posy+1] $posz [$posx-($rand.1.5)] [$posy-($rand.0.2)] $posz}
auto 200 if [$cc4 != 3043 && $play == 1] equipbelt 3043 | if [$beltslot.count >= 50 && $beltslot.id == 3043] unequip 'belt' 'empty'
auto 200 countitemsvisible 3043 | set $liczenie [$count-$count/100*100] | if [$cc == 10053 && $count < 101] {useitem 3040 | wait 100 | unequip 'belt' 'empty'}
auto 500 if [$itemcount.3043 > 599] {openitem 3043 3 '$main'}
auto 5 if [$itemcount.3043 > 100 && $kasynoz != 1 && $play == 1 && $licze == 0] {dropitemsxyzamount [$posx-1] [$posy+1] [$posz] 3043 50 | set $kasynoz 1} | if [$kasynoz == 1] {usegrounditem 2772 | usegrounditem 2773 | set $kasynoz 3}  | if [$kasynoz == 3] {collectitems 'empty' 3043 | wait 203 |collectitems 'empty' 3043 | set $kasynoz 0}
auto 65 countitemsvisible 3043 | if [$count > 600] {set $licze 1} | if  [$count < 600] {set $licze 0}
auto 65 countitemsvisible 3040 | if [$count > 201] {openitem 3040 2 'Yellow Backpack'}

I wszystko działa poprawnie...  Nagle wszystkie kasyna zajęte jak opublikowałem skrypt obczaj sobie...
 Nie działa nieogarom tylko jak zawsze

[blaesy]

o siemka zmartwychwstałem

jakas aktualizacja do filmiku potrzebna?

[CzingCzang]

UWAGA! ABY SKRYPT DZIALAL TRZEBA USTAWIC GLOWNY BACKPACK INNY NIZ YELLOW

ORAZ RZECZY W BP TAK:

DRUGI BACKPACK TO YELLOW I NIE WIECEJ NIZ 1

Dla mniej ogarnietych proponuje dodac auto ustawianie glownego bp   

Kod: [Zaznacz]

if [$backslot.id == 2853] {set $main 'Bag'}
if [$backslot.id == 2857] {set $main 'Green Bag'}
if [$backslot.id == 2858] {set $main 'Yellow Bag'}
if [$backslot.id == 2859] {set $main 'Red Bag'}
if [$backslot.id == 2860] {set $main 'Purple Bag'}
if [$backslot.id == 2861] {set $main 'Blue Bag'}
if [$backslot.id == 2862] {set $main 'Grey Bag'}
if [$backslot.id == 2863] {set $main 'Golden Bag'}
if [$backslot.id == 10325] {set $main 'Expedition Bag'}
if [$backslot.id == 5950] {set $main 'Beach Bag'}
if [$backslot.id == 8861] {set $main 'Brocade Bag'}
if [$backslot.id == 2864] {set $main 'Camouflage Bag'}
if [$backslot.id == 7343] {set $main 'Fur Bag'}
if [$backslot.id == 9603] {set $main 'Orange Bag'}
if [$backslot.id == 5927] {set $main 'Pirate Bag'}
if [$backslot.id == 8860] {set $main 'Brocade Backpack'}
if [$backslot.id == 2854] {set $main 'Backpack'}
if [$backslot.id == 2865] {set $main 'Green Backpack'}
if [$backslot.id == 2866 || $main == 'Yellow Backpack'] {statusmessage 'Glowny backpack nie moze byc Zolty! Zmien go na inny i sprobuj ponownie'. | if [$exp >= 5000] {pm $self.name 'Glowny backpack nie moze byc Zolty! Zmien go na inny i sprobuj ponownie.'} | if [$exp < 5000] {say 'Glowny backpack nie moze byc Zolty! Zmien go na inny i sprobuj ponownie.'}}
if [$backslot.id == 2867] {set $main 'Red Backpack'}
if [$backslot.id == 2868] {set $main 'Purple Backpack'}
if [$backslot.id == 2869] {set $main 'Blue Backpack'}
if [$backslot.id == 2870] {set $main 'Grey Backpack'}
if [$backslot.id == 2871] {set $main 'Golden Backpack'}
if [$backslot.id == 3253] {set $main 'Backpack of Holding'}
if [$backslot.id == 5926] {set $main 'Pirate Backpack'}
if [$backslot.id == 9602] {set $main 'Orange Backpack'}
if [$backslot.id == 10326] {set $main 'Dragon Backpack'}
if [$backslot.id == 10324] {set $main 'Expedition Backpack'}
if [$backslot.id == 10346] {set $main 'Santa Backpack'}
if [$backslot.id == 10202] {set $main 'Heart Backpack'}
if [$backslot.id == 10327] {set $main 'Minotaur Backpack'}
if [$backslot.id == 9604] {set $main 'Moon Backpack'}
if [$backslot.id == 5949] {set $main 'Beach Backpack'}
if [$backslot.id == 9601] {set $main 'Demon Backpack'}
if [$backslot.id == 9605] {set $main 'Crown Backpack'}
if [$backslot.id == 7342] {set $main 'Fur Backpack'}
if [$backslot.id == 5801] {set $main 'Jewelled Backpack'}
if [$backslot.id == 10346] {set $main 'Santa Backpack'}
if [$backslot.id == 2872] {set $main 'Camouflage Backpack'}


Ew. dodac samo ostrzezenie gdy glowny bp = yellow

Kod: [Zaznacz]

if [$backslot.id == 2866 || $main == 'Yellow Backpack'] {statusmessage 'Glowny backpack nie moze byc Zolty! Zmien go na inny i sprobuj ponownie'. | if [$exp >= 5000] {pm $self.name 'Glowny backpack nie moze byc Zolty! Zmien go na inny i sprobuj ponownie.'} | if [$exp < 5000] {say 'Glowny backpack nie moze byc Zolty! Zmien go na inny i sprobuj ponownie.'}}

[Lejpodmur]

Z nudy i braku wolnych miejsc - kasyno w Galaxii z dźwignią z góry:

Kod: [Zaznacz]

/////NAZWIJ SWOJ GLOWNY BACKPACK (INNY NIZ YELLOW)


set $main 'backpack'
auto 200 if [$beltslot.id == 3040] unequip 'belt' 'empty'
auto 200 countitemsvisible 3040  | if [$count >= 95] {set $play 0} | if [$count <= 80] {set $play 1}
auto 20 if [$play == 0] {openitemnew 2866 | wait 200 | movenitems 3040 90 'Yellow Backpack' | wait 200 | closewindows 'YellowBackpack' | wait 200 | closewindows 'YellowBackpack' | end}
auto 100 set $nagroda $topitem.[$self.posx-1].[$self.posy-1].[$self.posz] | set $cc2 $topitem.[$self.posx+1].[$self.posy-1].[$self.posz] | set $cc3 $topitem.[$self.posx].[$self.posy].[$self.posz] | set $cc4 $topitem.[$self.posx].[$self.posy-1].[$self.posz]
auto 200 if [$cc4 != 3043 && $play == 1] equipbelt 3043 | if [$beltslot.count >= 50 && $beltslot.id == 3043] unequip 'belt' 'empty'
auto 200 countitemsvisible 3043 | if [$nagroda == 10053 && $count < 101] {useitem 3040 | wait 100 | unequip 'belt' 'empty'}
auto 500 if [$itemcount.3043 > 599] {openitem 3043 3 '$main'}
auto 5 if [$itemcount.3043 > 100 && $kasynoz != 1 && $play == 1 && $licze == 0] {dropitemsxyzamount [$posx+1] [$posy-1] [$posz] 3043 50 | set $kasynoz 1} | if [$kasynoz == 1] {usegrounditem 2772 | usegrounditem 2773 | set $kasynoz 3}  | if [$kasynoz == 3] {collectitems 'empty' 3043 | wait 203 |collectitems 'empty' 3043 | set $kasynoz 0}
auto 65 countitemsvisible 3043 | if [$count > 600] {set $licze 1} | if  [$count < 600] {set $licze 0}
auto 65 countitemsvisible 3040 | if [$count > 201] {openitem 3040 2 'Yellow Backpack' | inc $DC_COUNT}
auto 200 dontlist | foreach 'newmessages' $check if [$check.sender ? 'GOD' && $check.content == 'Check main bp' && $check.sender ? 'Sung'] {say 'BOT: Nazwa glownego BP to [$main], a ilosc YellowBP: [$itemcount.2866]}
auto 200 if [$DC_COUNT == ''] {set $DC_COUNT 0}
auto 200 dontlist | foreach 'newmessages' $check if [$check.sender ? 'GOD' && $check.content == 'Check dc make' && $check.sender ? 'Sung'] {say 'BOT: Zrobilem aktualnie: [$DC_COUNT] Dc.}
auto 200 setcaption '[$name] /\ Zrobionych DC: $DC_COUNT /\ Sprawdz moja strone: Zimnyskrypty.pl'

[Puta Vamos]

Ma ktos moze skrypt na kasyno na nowy client? Czy raczej jeszcze nikt nie ma ;d

[Sphinx]

/////KASYNO LEWA STRONA Mialem nieco maly problem na poczatku z tym po lewej stronie

/////NAZWIJ SWOJ GLOWNY BACKPACK (INNY NIZ YELLOW)
 
set $main 'Moon Backpack'

/// czy jaki kolwiek masz oprócz yellow
 
auto 200 if [$beltslot.id == 3040] unequip 'belt' 'empty'
auto 200 countitemsvisible 3040  | if [$count >= 99] {set $play 0} | if [$count <= 80] {set $play 1}
auto 20 if [$play == 0] {openitemnew 2866 | wait 200 | movenitems 3040 100 'Yellow Backpack' | wait 200 | closewindows 'YellowBackpack' | wait 200 | closewindows 'YellowBackpack' | end}
auto 100 set $cc $topitem.[$self.posx-1].[$self.posy].[$self.posz] | set $cc2 $topitem.[$self.posx-1].[$self.posy+1].[$self.posz] | set $cc3 $topitem.[$self.posx].[$self.posy].[$self.posz] | set $cc4 $topitem.[$self.posx-1].[$self.posy-1].[$self.posz]
auto 200 if [$cc4 != 3043 && $play == 1] equipbelt 3043 | if [$beltslot.count >= 50 && $beltslot.id == 3043] unequip 'belt' 'empty'
auto 200 countitemsvisible 3043 | if [$cc == 10053 && $count < 101] {useitem 3040 | wait 100 | unequip 'belt' 'empty'}
auto 500 if [$itemcount.3043 > 599] {openitem 3043 3 '$main'}
auto 5 if [$itemcount.3043 > 100 && $kasynoz != 1 && $play == 1 && $licze == 0] {dropitemsxyzamount [$posx-1] [$posy+1] [$posz] 3043 50 | set $kasynoz 1} | if [$kasynoz == 1] {usegrounditem 2772 | usegrounditem 2773 | set $kasynoz 3}  | if [$kasynoz == 3] {collectitems 'empty' 3043 | wait 203 |collectitems 'empty' 3043 | set $kasynoz 0}
auto 65 countitemsvisible 3043 | if [$count > 600] {set $licze 1} | if  [$count < 600] {set $licze 0}
auto 65 countitemsvisible 3040 | if [$count > 201] {openitem 3040 2 'Yellow Backpack' | inc $DC_COUNT}
auto 200 dontlist | foreach 'newmessages' $check if [$check.sender ? 'GOD' && $check.content == 'Check main bp' && $check.sender ? 'Sung'] {say 'BOT: Nazwa glownego BP to [$main], a ilosc YellowBP: [$itemcount.2866]}
auto 200 if [$DC_COUNT == ''] {set $DC_COUNT 0}
auto 200 dontlist | foreach 'newmessages' $check if [$check.sender ? 'GOD' && $check.content == 'Check dc make' && $check.sender ? 'Sung'] {say 'BOT: Zrobilem aktualnie: [$DC_COUNT] Dc.}
auto 200 setcaption '[$name] /\ Zrobionych DC: $DC_COUNT /\ Sprawdz moja strone: Zimnyskrypty.pl'

[Pablo3690]

Ludzie powiedzcie mi czy wy tez macie problem z tym skryptem? mi co chwila się zacina może co 5 sekund. Otóż gdy mam ustawiony glowny bp jako moon bp a reszta są to yellow to bot moze 2 lub 3 razy pociagnie dzwignią i przestaje natomiast zaczyna mi przekladac cc z bpp w miejsce strzaly jak mam to naprawic?

[zarobass xd]

Dlatego sciągasz sobie gotowego skrypta pod otc i kasyna ci stoją miesiąc i nic się nie zacina, elfbot nie wyrabia

[kira]

odgruzowany, działa lewo, prawo, lewo vip, wymaga 2 bp, yellow i moon.

@edit, poprawna wersja, wcześniejsza była z faz testów.
@edit2, poprawiono bugujące się przekładanie GN oraz przyspieszono(?) całość działania, teraz pracuje tak jak powinien.
@edit3, kolejne poprawki, jeśli ktoś ma pomysł czemu przy zamianie CC na GN nie rzuca CC tylko laguje na 0,5 sec to rzućcie pomysłem

p.s. wrzucam czysto dla funu, elfbot jest ułomny, ale jestem ciekaw ile jestem w stanie z niego wycisnąć, jak znów coś wymyśle to będzie kolejny update.

/////NAZWIJ SWOJ GLOWNY BACKPACK (INNY NIZ MOON i YELLOW)
 
 
set $main 'NAZWIJ SWOJ BP INACZEJ NIZ MOON I YELLOW'
 
 
/////NAZWIJ SWOJ GLOWNY BACKPACK (INNY NIZ MOON i YELLOW)


///// 3040 GN
///// 3043 CC
///// 11587 DC
///// 2866 Yellow bp
///// 9604 Moon BP


// PRZYPISANIE POZYCJI LEVERA, ALTARU, STOLU \\
auto 300 dontlist | set $Pcc $topitem.[$self.posx+1].[$self.posy].[$self.posz] | set $Plever $topitem.[$self.posx+1].[$self.posy-1].[$self.posz] | set $Paltar $topitem.[$self.posx+1].[$self.posy+1].[$self.posz] | set $Pdrop [$posx+1]
auto 300 dontlist | set $Lcc $topitem.[$self.posx-1].[$self.posy].[$self.posz] | set $Llever $topitem.[$self.posx-1].[$self.posy+1].[$self.posz] | set $Laltar $topitem.[$self.posx-1].[$self.posy-1].[$self.posz] | set $Ldrop [$posx-1]
auto 300 dontlist | set $Mcc $topitem.[$self.posx-1].[$self.posy-1].[$self.posz] | set $Mlever $topitem.[$self.posx-1].[$self.posy].[$self.posz] | set $Maltar $topitem.[$self.posx-1].[$self.posy+1].[$self.posz] | set $Ldrop [$posx-1]

// SPRAWDZENIE -=AKTUALNEJ=- POZYCJI LEVERA, ALTARU, STOLU \\
auto 1000 dontlist | if [$gramy == ''] {set $gramy 0}
auto 1000 dontlist | if [$Plever != 2772 || $Plever != 2773 || $Llever != 2772 || $Llever != 2773 || $Mlever != 2772 || $Mlever != 2773] {set $gramy 0}
auto 1000 dontlist | if [$Plever == 2772 || $Plever == 2773] {set $Clever $Plever | set $Ccc $Pcc | set $Caltar $Paltar | set $Cdrop $Pdrop | set $gramy 1}
auto 1000 dontlist | if [$Llever == 2772 || $Llever == 2773] {set $Clever $Llever | set $Ccc $Lcc | set $Caltar $Laltar | set $Cdrop $Ldrop | set $gramy 2}
auto 1000 dontlist | if [$Mlever == 2772 || $Mlever == 2773] {set $Clever $Mlever | set $Ccc $Mcc | set $Caltar $Laltar | set $Cdrop $Ldrop | set $gramy 2}

// PRZENOSZENIE GN I DC DO PLECAKOW \\
auto 200 dontlist | if [$play == ''] {set $play 1}
auto 100 dontlist | if [$itemcount.3040 >= 95] {set $play 0 | openitemnew 2866 | wait 200 | movenitems 3040 90 'Yellow Backpack' | wait 200 | closewindows 'Yellow Backpack' | wait 200 | closewindows 'Yellow Backpack' | set $play 1}
auto 100 dontlist | if [$itemcount.11587 >= 95] {set $play 2 | openitemnew 9604 | wait 200 | movenitems 11587 90 'Moon Backpack' | wait 200 | closewindows 'Moon Backpack' | wait 200 | closewindows 'Moon Backpack' | set $play 1}

// CZY MAMY CC NA GRE, JESLI NIE, ROZMIENIA GN na CC \\
auto 200 dontlist | if [$Ccc != 3043 && $itemcount.3043 < 101] {useitem 3040 | wait 100 | unequip 'belt' 'empty'}

// GRANIE W KASYNIE \\
auto 20 dontlist | if [$play == 1 && $gramy == 1 && $itemcount.3043 > 100 && $licze == 0] {movenitems 3043 100 '$main' | unequip 'belt' 'empty' | wait 50 | equipbelt 3043 | wait 50 | dropitemsxyzamount [$posx+1] [$posy+1] [$posz] 3043 50 | usegrounditem $Clever | wait 150 | collectitems '$main' 3043| wait 150 | collectitems '$main' 3043}
auto 20 dontlist | if [$play == 1 && $gramy == 2 && $itemcount.3043 > 100 && $licze == 0] {movenitems 3043 100 '$main' | unequip 'belt' 'empty' | wait 50 | equipbelt 3043 | wait 50 | dropitemsxyzamount [$posx-1] [$posy+1] [$posz] 3043 50 | usegrounditem $Clever | wait 150 | collectitems '$main' 3043 | wait 150 | collectitems '$main' 3043}

// ZAMIANA CC na GN \\
auto 20 dontlist | if [$itemcount.3043 > 600] {set $licze 1 | openitem 3043 3 '$main' | inc $GN_COUNT | set $licze 0}
auto 200 dontlist | if [$GN_COUNT == ''] {set $GN_COUNT 0}

// ZAMIANA GN na DC \\
auto 100 dontlist | if [$itemcount.3040 > 201] {set $licze 1 | wait 200 | openitem 3040 2 'Yellow Backpack' | inc $DC_COUNT | wait 200 | set $licze 0}
auto 200 dontlist | if [$DC_COUNT == ''] {set $DC_COUNT 0}

//////////////////////////////////////////////////////////// HUD \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\

//////HEADER
auto 1000 dontlist | setpos [$screenleft-1755] [$screentop +365] | setcolor 199 199 199 | displaytext '========================'
auto 1000 dontlist | setpos [$screenleft-1755] [$screentop +375] | setcolor 0 255 0 | displaytext '$name'
auto 1000 dontlist | setpos [$screenleft-1890] [$screentop +375] | setcolor 0 255 0 | displaytext "Level:"
auto 1000 dontlist | setpos [$screenleft-1926] [$screentop +375] | setcolor 255 0 0 | displaytext "$level K"
auto 1000 dontlist | setpos [$screenleft-1755] [$screentop +385] | setcolor 199 199 199 | displaytext '========================'

// CASINO INFO \\
auto 1000 dontlist | setcolor 199 199 199 | setpos [$screenleft-1820] [$screentop +396] | displaytext 'CASINO INFO'
auto 1000 dontlist | setpos [$screenleft-1755] [$screentop +405] | setcolor 199 199 199 | displaytext '========================'
auto 1000 dontlist | setcolor 199 199 199 | setpos [$screenleft - 1755] [$screentop +505] | displaytext 'Czas IRL: '
auto 1000 dontlist | setcolor 255 255 0 | setpos [$screenleft - 1810] [$screentop +505] |displaytext '$systime'
auto 200 dontlist | setpos [$screenleft-1785] [$screentop +525] | if [$ping <= 300] { setcolor 0 244 0 | displaytext '$ping' } | if [$ping >= 301 && <= 800] { setcolor 255 128 0 | displaytext '$ping' } | if [$ping >= 801] { setcolor 255 0 0 | displaytext '$ping' }
auto 1000 dontlist | setcolor 199 199 199 | setpos [$screenleft-1755] [$screentop +525 | displaytext 'Ping:
auto 1000 dontlist | setcolor 199 199 199 | setpos [$screenleft-1755] [$screentop +515] | displaytext "Sesja:"
auto 1000 dontlist | setcolor 255 255 0 | setpos [$screenleft-1792] [$screentop +515] | displaytext "$formattime.$deltatime"
auto 1000 dontlist | setcolor 199 199 199 | setpos [$screenleft - 1755] [$screentop +535] | displaytext '========================'

// ZAROBAS INFO \\
auto 100 dontlist | setpos [$screenleft-1790] [$screentop +415]  | if [$gramy == 0] { setcolor 255 0 0 | displaytext  'Obecnie nie robie hajsu'} | if [$gramy == 1] {setcolor 255 255 0 | displaytext 'Gram na prawej stronie'} | if [$gramy == 2] {setcolor 255 255 0 | displaytext 'Gram na lewej stronie'}
auto 1000 dontlist | setpos [$screenleft-1755] [$screentop +425] | setcolor 199 199 199 | displaytext '========================'         
auto 200 dontlist | setpos [$screenleft-1775] [$screentop-445] | setcolor 0 255 0 | displaytext 'Zrobionych GN: '
auto 200 dontlist | setpos [$screenleft-1890] [$screentop-445] | setcolor 255 0 0 | displaytext '$GN_COUNT'}
auto 200 dontlist | setpos [$screenleft-1775] [$screentop-455] | setcolor 0 255 0 | displaytext 'Zrobionych DC: '
auto 200 dontlist | setpos [$screenleft-1890] [$screentop-455] | setcolor 255 0 0 | displaytext '$DC_COUNT'
auto 1000 dontlist | setcolor 199 199 199 | setpos [$screenleft - 1755] [$screentop +455] | displaytext '========================'
auto 200 dontlist | setpos [$screenleft-1775] [$screentop-475] | setcolor 0 255 0 | displaytext 'Widocznych CC: '
auto 200 dontlist | setpos [$screenleft-1890] [$screentop-475] | setcolor 255 0 0 | displaytext '$itemcount.3043'
auto 200 dontlist | setpos [$screenleft-1775] [$screentop-485] | setcolor 0 255 0 | displaytext 'Widocznych GN: '
auto 200 dontlist | setpos [$screenleft-1890] [$screentop-485] | setcolor 255 0 0 | displaytext '$itemcount.3040'
auto 200 dontlist | setpos [$screenleft-1775] [$screentop-495] | setcolor 0 255 0 | displaytext 'Widocznych DC: '
auto 200 dontlist | setpos [$screenleft-1890] [$screentop-495] | setcolor 255 0 0 | displaytext '$itemcount.11587'
auto 1000 dontlist | setcolor 199 199 199 | setpos [$screenleft - 1755] [$screentop +495] | displaytext '========================'