;===========================
; Macro: Herreria
; Autor: JoSePh
; EasyUO 1.5, V.205
; Servidor: Ultima Alianza
; Cliente: 7.0.8.2
;===========================
=========CONFIGURAR=========
set %bolsa GPZMYND
set %s_recompensas WAMNTPD
=============================
set %pack_dagas CKF
set %numero_dagas 15
set %dagas TSF
set %martillos TLH
set %hierro RMK
display Comienza la Macro!!
initevents
inicio:
gosub hierro
gosub dagas
goto inicio
sub hierro ;<=======================>
finditem %hierro C_ , #BACKPACKID
if #FINDSTACK < 5
{
finditem %hierro C_ , %bolsa
exevent drag #FINDID 50
exevent dropc #BACKPACKID
wait 20
}
return
sub dagas ;<=======================>
finditem %hierro C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
wait 10
click 70 290
wait 10
click 270 110
wait 10
for %i 1 15
{
wait 10
if Pones_ in #SYSMSG
goto sigue
}
sigue:
finditem %dagas C_ , #BACKPACKID
if #FINDCNT => %numero_dagas
gosub tickets
return
sub tickets ;<=======================>
finditem %hierro C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
wait 10
click 70 310
wait 10
click 270 110
wait 10
for %i 1 15
{
wait 10
if Pones_ in #SYSMSG
goto lotes
}
lotes:
wait 10
click 277 200 r
finditem %s_recompensas
set #LOBJECTID #FINDID
event macro 17
wait 20
click 80 170
wait 20
click 310 340
wait 10
target
finditem %pack_dagas C_ , #BACKPACKID
if #FINDCNT > 0
{
set #LTARGETID #FINDID
set #LTARGETKIND 1
event macro 22
wait 10
goto lotes
}
key esc
click 277 200 r
return