Buenas,
Os dejo el macro que me he hecho para subir curación:
(Ahora mismo está configurado para el brasero del banco del oeste de Brit)
Espero que os sea útil ^^
Código:
;==================================================
;CURAR CON BRASERO BY JAVIERCV
;==================================================
set #SYSMSGCOL 1100
event sysmessage Macro para subir Curacion con brasero
event sysmessage By JavierCV
;Para subir de 50% a 100%, se necesitan unas 1500 vendas (para ir sobrados)
;y se tarda poco menos de 96h (4 días)
;==================================================
;CONFIGURACIÓN
;==================================================
set %xInicial 1661 ;cordenada X donde empezar el macro
set %yInicial 1613 ;cordenada Y donde empezar el macro
set %xBrasero 1665 ;cordenada X del brasero
set %yBrasero 1613 ;cordenada Y del brasero
set %vida 96 ;Limite de vida antes de salir del brasero
set %pilon UGUSNND ;ID del pilón de agua
;==================================================
;NO TOCAR NADA A PARTIR DE AQUÍ
;==================================================
set %venda ZLF ;ID de las vendas limpias
set %vendaSucia AMF ;ID de las vendas sucias
set %comida YSD_QQD_FUD_HND ;IDs de comida
;==================================================
;Hilo principal del macro
;==================================================
loop:
if ( #HITS < %vida )
{
event PathFind %xInicial %yInicial
wait 4s
if ( #HITS < 45 ) ;SEGURIDAD: para el macro si la vida baja demasiado
{
halt
}
gosub curarse
gosub comer
}
else
{
event PathFind %xBrasero %yBrasero
wait 4s
}
goto loop
;==================================================
;Curarse
;==================================================
sub curarse
key f1
wait 20
scanjournal %i
if fallas in #journal
{
wait 3s
gosub curarse
}
else
{
wait 18s
}
;Limpia vendas si hay más de 100 sucias
finditem %vendaSucia C_ , #BACKPACKID
if ( #FINDSTACK >= 100 )
{
set #LOBJECTID #FINDID
event macro 17 0
wait 10
set #LTARGETID %pilon
event macro 22 0
wait 10
}
return
;==================================================
;Comer
;==================================================
sub comer
findItem %comida C_ , #BACKPACKID
set #LOBJECTID #FINDID
wait 10
event macro 17
return
;==================================================