Ayuda macro entrenamiento

**tryndamere** · 24-May-2011

Buenas, necesito que alguien me modifique esta macro de Asuma.
Esta macro cuando tiene poca vida se aleja para que no le mate, pero se queda ahi, necesitaria que se modifique para que cuando esto suceda se cure a si mismo y vuelva a seguir luchando y cure al otro.

Código:

;Macro de Entrenamiento
display ok Macro by Asuma/Mordor.
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
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
{
  event sysmessage Peligro de muerte, moviendo al jugador...
  set %next_y #CHARPOSY
  set %next_y %next_y + 10
  move #CHARPOSX %next_y 0 5s
  halt
}
goto curar

Muchas gracias y un saludo

**enDings** · 24-May-2011

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

**tryndamere** · 25-May-2011

Gracias Ending, pero algo no va bien, porque cuando se retira a curarse e intenta aplicarse las vendas, hace otro intento antes de que pase el tiempo con lo que anula la otra curacion. Pienso que lo ideal es que intentara aplicarse las vendas cuando en el mesaje del sistema diga que ya puede asi no habria error.
Por otro lado tambien he observado que muchas veces se quita del combate para curarse sin estar por debajo de los 20 de vida.

Si puedes hacer algo te lo agradezco, de todos modo muchisimas gracias por el aporte.

Un saludo

**enDings** · 25-May-2011

He cambiado el tiempo, pero no se cuanto es en realidad, prueba a ver ^^!

**yeladies** · 25-May-2011

He cambiado un poco la parte en la que te curas a ti mismo, ajustando los tiempo y alguna cosilla mas.
Aun no he tenido la oportunidad de probarla, decirme que tal.

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
}
msg .vendas$
 target 1s
 event macro 23 0
 scanjournal
 if fallas in #journal

{
  wait 2s
  gosub curarse
}

 wait 15s ;Estos son los segundos que espera antes de volver a curarse
gosub curarse