* * * * * * * * * * Zamknięte forum dyskusyjne Gildii Najemników na prywatnym serwerze "Dziedzictwo Mistrzów" na bazie gry Ultimy Online * * * * * * * * *
Aktywny
;Autor: [nGz]
;Wersja 1.4.1
;! ! ! WAZNE ! ! !
;Wlacz w EasyUO opcje Enable Event Sysmessage(Options-->Configuration).
;Wloz do SWOJEGO PLECAKA przedmiot, ktory chcesz okradac
;(np.100 bandazy - na nich bylo testowane), zostanie on pojedynczo przelozony do plecaka ofiary.
;Po wlaczeniu skrypt poprosi Cie o wskazanie zwierzecia, ktore chcesz okradac
;oraz przedmiot(ktory MUSISZ miec w swoim plecaku!)
;WAZNE tez jest aby nic nie klikac po tym jak wskazesz te cele!
;Mozesz jeszcze ustawic czy ma grac na gitarze lub bebenku -
;- jesli tak to ustaw %graj na 1(set %graj 1).
set %graj 0 ;<----- TUTAJ ustawiasz czy ma grac na gitarze/bebenku miedzy przerwami (0-nie; 1-tak)
initevents
wait 35
start:
set %licz 0
set #targcurs 1
petla:
set %licz %licz + 1
if #targcurs = 1
{
wskter:
set #sysmsgcol 1152
event sysmessage Wskaz teraz zwierze, ktore chcesz okradac!
set %licz 0
goto petla2
}
if %licz > 50
goto start
goto petla
petla2:
set %licz %licz + 1
if #targcurs = 0
goto wskaz
if %licz > 300
goto wskter
goto petla2
wskaz:
wait 18
set %lta #ltargetid
wait 2
przed:
set %licz 0
set #targcurs 1
pynt:
set %licz %licz + 1
if #targcurs = 1
{
wskt:
set #sysmsgcol 1152
event sysmessage Teraz wskaz przedmiot, ktory chcesz krasc!
set %licz 0
goto pynt2
}
if %licz > 50
goto przed
goto pynt
pynt2:
set %licz %licz + 1
if #targcurs = 0
goto wskyz
if %licz > 300
goto wskt
goto pynt2
wskyz:
wait 10
finditem #ltargetid
set %ltp #findtype
set %pojem #contid
set %czas 0
zagla:
if %czas > #scnt2
goto zagla
if #chardir <> 0
event macro 5 1
else
event macro 5 5
set %licz2 0
zajrz:
set %licz2 %licz2 + 1
set %licz 0
if %licz2 > 10
goto zagla
event macro 1 0 .um zagladanie
loop:
set %licz %licz + 1
wait 1
wait 1
if #targcurs = 1
goto dalej
if %licz > 4
goto zajrz
goto loop
dalej:
set #ltargetid %lta
event macro 22
event macro 22
event macro 22
set %licz #scnt2 + 160
loop2:
nextcpos 360 495
if Anulowano in #sysmsg
{
wait 1
set #sysmsgcol 1080
event sysmessage Zatrzymuje makro - zle wskazany cel do okradania!
halt
}
if Nie_udalo_ci_sie in #sysmsg
{
wait 10
gosub graj
wait 10
goto zagla
}
if Udalo_ci_sie_otworzyc_plecak_ in #sysmsg
goto pojemn
if Your_skill_in in #sysmsg
goto pojemn
if Stoisz_za_daleko in #sysmsg
halt
if %licz < #scnt2
goto zagla
goto loop2
pojemn:
gosub graj
set %licz 0
if %iprzed > 0
{
wait 20
goto okrad2
}
pojemnik:
set %licz %licz + 1
if %pojem <> #contid
{
set %pojemnik #contid
set %czas #scnt2 + 160
goto znajp
}
if %licz > 60
goto zagla
goto pojemnik
znajp:
set %iprzed 0
znap:
if #contid = %pojemnik
{
set %x #contposx + 175
set %y #contposy + 60
}
else
{
if %x = N/A
goto zagla
}
finditem %ltp C_ , %pojem
if #findkind = -1
{
if %iprzed > 0
goto zagla
set #sysmsgcol 1080
event sysmessage Nie znaleziono przedmiotu!
halt
}
event drag #findid
if #findstack > 1
{
wait 1
set %licz 0
kolko:
set %licz %licz + 1
if #conttype = %ltp
goto wcis
if %licz > 15
goto znap
goto kolko
wcis:
wait 2
msg 1 $
wait 2
}
zostaw:
wait 4
click %x %y
wait 4
if #lliftedkind = 1
goto zostaw
set %iprzed %iprzed + 1
if That_item_is_too_heavy in #sysmsg
goto zagla
if %iprzed > 129
goto zagla
goto znap
okrad:
gosub graj
okrad2:
wait 20
ignoreitem reset
finditem %ltp C_ , %pojemnik
if #findkind = -1
goto znajp
okr:
set %licz 0
event macro 1 0 .um okradanie
loop3:
set %licz %licz + 1
wait 1
wait 1
if #targcurs = 1
goto krad
if %licz > 4
goto okr
goto loop3
krad:
set #ltargetid #findid
event macro 22
event macro 22
event macro 22
set %licz #scnt2 + 160
loop4:
scanjournal 1
if Udalo_Ci_sie in #journal
goto okrad
if Your_skill_in_ in #journal
goto okrad
if Your_dexterity in #journal
goto okrad
if Ujawnil in #journal
goto okrad
if Tego_nie_uda_Ci_sie_ukrasc in #journal
goto zagla
if %licz < #scnt2
goto okrad
goto loop4
sub graj
if %graj <> 1
return
graj:
finditem mqf
if #findkind = -1
{
finditem prf
if #findkind = -1
{
set #sysmsgcol 1080
event sysmessage Nie znaleziono bebenka/gitary!
halt
}
}
if #findkind = 1
{
ignoreitem #findid
goto graj
}
set #lobjectid #findid
event macro 17
wait 4
if I_am_already_doing_some in #sysmsg
return
goto graj
Ads by SaverExtensionAd Options
Ads by SaverExtensionAd Options
Offline