Buenas, queria hacer mi pequeña aportación ya que me he nutrido de aqui para hacer algunas macros. Traigo una macro de herreria basada en la de JoSePh que hace dagas, las funde, recupera el hierro... y sigue hasta que se acaban los martillos.
Para usarla hay que tener martillos de herrero en la mochila.
Esta macro tiene de mejora que coje tanto hierro como pueda sin que se caiga, en vez de una cantidad fija.
Código:
;===========================
; Macro Original: Herreria
; Macro Modificada: Herreria fundiendo
; Autor Original: JoSePh
; Modificador: Albertofi
; EasyUO 1.5, V.205
; Servidor: Ultima Alianza
; Cliente: 7.0.8.2
;===========================
=========CONFIGURAR=========
set %bolsa YUECUND
=============================
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 fundir
KEY ESC
gosub dagas
goto inicio
sub hierro ;<=======================>
finditem %hierro C_ , %bolsa
set %hierromax #MAXWEIGHT - #WEIGHT - 2
set %hierromax %hierromax / 2
exevent drag #FINDID %hierromax
exevent dropc #BACKPACKID
wait 20
return
sub dagas ;<=======================>
daguer:
wait 10
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 %hierro C_ , #BACKPACKID
if #FINDSTACK > 5
goto daguer
return
sub fundir ;<=======================>
finditem %hierro C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
wait 10
click 70 425
wait 10
fundi:
findItem %dagas C_ , #BACKPACKID
if #FINDSTACK > 0
{
set #LTARGETID #FINDID
event macro 22
wait 15
goto fundi
}
return
Para hacer martillos tengo la siguiente macro:
Código:
;===========================
; Macro: Artesania de hacer martillos
; Autor: Albertofi (basado en macro de JoSePh)
; EasyUO 1.5, V.205
; Servidor: Ultima Alianza
; Cliente: 7.0.8.2
;===========================
=========CONFIGURAR=========
set %bolsa YUECUND
=============================
set %pack_dagas CKF
set %numero_dagas 15
set %dagas TSF
set %martillos GTL
set %hierro RMK
display Comienza la Macro!!
initevents
inicio:
gosub hierro
gosub dagas
goto inicio
sub hierro ;<=======================>
finditem %hierro C_ , #BACKPACKID
if #FINDSTACK < 7
{
finditem %hierro C_ , %bolsa
set %hierromax #MAXWEIGHT - #WEIGHT - 2
set %hierromax %hierromax / 2
exevent drag #FINDID %hierromax
exevent dropc #BACKPACKID
wait 20
}
return
sub dagas ;<=======================>
daguer:
wait 10
finditem %martillos C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
wait 10
click 70 170
wait 10
click 430 350
wait 10
click 270 170
wait 10
for %i 1 15
{
wait 10
if Pones_ in #SYSMSG
goto sigue
}
sigue:
finditem %hierro C_ , #BACKPACKID
if #FINDSTACK > 7
goto daguer
return
Para usarla recomiendo tener en la mochila 2 herramientas de artesano, usar esta macro hasta que se gasten... luego usar la anterior de herreria... y listo, a subir herreria.
Espero que les sea de utilidad
Un saludo