;Macro entrenar familiar hecha por niKiTO.
;Filetes de pescadito (100 o así, son 10 de peso).
;Bidón de agua
;Si eres GM vet --> 100 vendas y sobra.
;Si no eres GM Vet--> 500 vendas.
; Si metes wyrm o cuca en establo le cambia el ID.
inicio:
Set %idwyrm XIMLP ;id de la wyrm (en Easyuo es #LTARGETID)
Set %idbicho HSRIRD ;id de la cuca
set %comida HND
comienzo:
msg all stop$
findItem %comida C_ , #BACKPACKID
if #findcnt > 0
{
set #LOBJECTID #FINDID
event macro 17
}
gosub limpiavendas
set #LTARGETID %idbicho
gosub atacar
gosub curar
finditem ZLF c_ , #BACKPACKID
set %numvendas #findstack
finditem AMF c_ , #BACKPACKID
set %numvendassucias #findstack
event macro 22 0
wait 20
if comienza_la in #journal
{
wait 30s
}
sub limpiavendas
{
finditem ZLF c_ , #BACKPACKID
if #findstack <= 10
{
set #SYSMSGCOL 38
event sysmessage #CHARNAME Te quedan pocas vendas, deberias comprar mas.
}
wait 5
finditem AMF c_ , #BACKPACKID
if #findstack >= 10
{
set #LOBJECTID #FINDID
event macro 17 0
target
finditem QEE_TEE_WEE_VEE c_ , #BACKPACKID
set #LTARGETID #FINDID
event macro 22
}
return
}
sub atacar
msg
Floripoli kill$ ;AQUÍ pones el nombre de tu wyrm
target
event macro 22
wait 70
msg all stop$
return
sub curar
msg .vendas $
target
event macro 22
wait 10
scanjournal
if aplicas_las_vendas in #journal || curas in #journal || aplicas_las in #journal || pones_el in #journal
{
wait 7s
gosub curar
}
if no_necesita_curarse in #journal || no_necesitas in #journal || you_can in #journal || estas_demasiado in #journal
{
gosub swampy
}
sub swampy
set #LTARGETID %idwyrm
msg .vendas $
target
event macro 22
wait 10
scanjournal
if aplicas_las_vendas in #journal || curas in #journal || aplicas_las in #journal || pones_el in #journal
{
wait 6s
gosub curar
}
if no_necesita_curarse in #journal || no_necesitas in #journal || you_can in #journal || estas_demasiado in #journal
{
goto comienzo
}