Código:
;Macro de Entrenamiento
set %vendas ZLF
set %vendas_sucias AMF
event sysmessage Seleccione al jugador con el que va a entrenar y presione ESC.
msg .vendas$
get_player:
OnHotKey ESC
{
set %player #LTARGETID
wait 20
event sysmessage Haga doble click sobre el bidon de agua y presione ESC...
goto get_bidon
}
goto get_player
get_bidon:
OnHotKey ESC
{
set %bidon #LOBJECTID
wait 20
event sysmessage Bidon guardado...
goto curar
}
goto get_bidon
curar:
FINDITEM %vendas C_ , #BACKPACKID
if #FINDSTACK = 0
{
display ok No hay vendas
set %next_y #CHARPOSY
set %next_y %next_y + 10
move #CHARPOSX %next_y 0 5s
halt
}
set %va #FINDSTACK
FINDITEM %vendas_sucias C_ , #BACKPACKID
set %vs #FINDSTACK
setuotitle Vendas : %va | Vendas Sucias : %vs | Macro by Asuma/Mordor
msg .vendas$
target
set #LTARGETID %player
event macro 22 0
wait 10
if No_necesita in #SYSMSG
{
wait 1s
goto curar
}
wait 6s
FINDITEM %vendas_sucias C_ , #BACKPACKID
If #FINDSTACK > 20
{
wait 20
event sysmessage Limpiando vendas...
set #LOBJECTID #FINDID
event macro 17 0
target
set #LTARGETID %bidon
event macro 22 0
event sysmessage Vendas limpias.
wait 20
}
if #HITS < 20
{
set %x #CHARPOSX
set %y #CHARPOSY
event sysmessage Peligro de muerte, moviendo al jugador...
set %next_y #CHARPOSY
set %next_y %next_y + 10
move #CHARPOSX %next_y 0 5s
gosub curarse
}
goto curar
sub curarse
if #hits = #maxhits
{
move %x %y 0
goto curar
}
finditem %vendas C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17 0
wait 10
event macro 23
wait 10
if Fallas_ in #SYSMSG
{
wait 10
gosub curarse
}
wait 15s ;Estos son los segundos que espera antes de volver a curarse
gosub curarse
A ver si te sirve