Optimizar macro de herrería

[OverQueen]

Me quedaban 5 puntos por subir y me he puesto hoy a rematar la skill, estaba ahorrando tiempo de crafteo para no perder demasiado con lo que me queda por subir pero hay cosas que no entiendo, a ver si alguien me puede ayudar ^^, la macro e ésta:

;*************************************************************************************************
;Macro HERRERO by OverQueen
;*************************************************************************************************
set #SYSMSGCOL 10
event sysmessage Macro para subir herreria by OverQueen

;*************************************************************************************************
;            CONFIGURACIONES (EDITAR)
;*************************************************************************************************
set %cofre IYICROD; donde tienes lingotes y martillos
set %tornillos YFG
set %martillos GBG_FBG_TLH_CGG
set %hierro RMK
set %comida PQD_MQE_FUD_OQE_YRD_YWI_AXI_VQE_BDF_TQE_KPE_QQD_RQE_SQD_SPE_JQE_ZPE_IQE_YSD

inicio:
gosub comer
gosub hierro
gosub martillos
gosub tornillos
goto inicio


;*************************************************************************************************
;                     COMER
;*************************************************************************************************
sub comer
findItem %comida C_ , #BACKPACKID
if #findcnt > 0
{
set #LOBJECTID #FINDID
event macro 17
}
return

;*************************************************************************************************
;                  REPONER HIERRO
;*************************************************************************************************
sub hierro
finditem %hierro C_ , #BACKPACKID
if #FINDSTACK = 0
{
finditem %hierro C_
exevent drag #FINDID 50
exevent dropc #BACKPACKID
wait 20
}
return

;*************************************************************************************************
;            COGER Y EQUIPAR MARTILLOS
;*************************************************************************************************
sub martillos
finditem %martillos C_ , #BACKPACKID
if #FINDSTACK = 0
{
finditem %martillos C_
exevent drag #FINDID 1
exevent dropc #BACKPACKID
wait 20
}
finditem %martillos C_ , #CHARID
if #FINDCNT < 1
{
finditem %martillos C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
}

;*************************************************************************************************
;                HACER TORNILLOS
;*************************************************************************************************
sub tornillos
finditem %hierro C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
wait 10
click 65 310
wait 10
click 270 150
wait 40
if Pones_ in #SYSMSG
{
finditem %hierro C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
wait 10
click 69 423
finditem %tornillos C_ , #BACKPACKID
set #LTARGETID #FINDID
set #LTARGETKIND 1
wait 10
event macro 22
wait 10
}

;*************************************************************************************************
;           FUNDIR TORNILLOS SOBRANTES
;*************************************************************************************************
finditem YFG C_ , #BACKPACKID
if #FINDSTACK >= 1
{
finditem RMK C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
wait 10
click 69 423
finditem YFG C_ , #BACKPACKID
set #LTARGETID #FINDID
set #LTARGETKIND 1
wait 10
event macro 22
wait 10
}
goto inicio

1) Por una parte, la macro a veces no me funde los tornillos, no he podido verporqué lo hace, a ver si alguien lo etiende :S, pues he tenido que añadir:

;*************************************************************************************************
;           FUNDIR TORNILLOS SOBRANTES
;*************************************************************************************************
finditem YFG C_ , #BACKPACKID
if #FINDSTACK >= 1
{
finditem RMK C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
wait 10
click 69 423
finditem YFG C_ , #BACKPACKID
set #LTARGETID #FINDID
set #LTARGETKIND 1
wait 10
event macro 22
wait 10
}

Y no puedo reducir el tiempo después de haber hecho los tornillos (el 40) porque deja de fundirlos :S




PD: me tengo que ir, después edito...

[Minsc]

el wait 40 ponlo al tiempo que necesites, no lo mandes a otro sitio justo hasta que termine.
en el nuevo código de fundir tornillos te sobra el 'click 69 423' pues el target ya lo hace con el event macro 22 de después.

[OverQueen]

el wait 40 ponlo al tiempo que necesites, no lo mandes a otro sitio justo hasta que termine.

Precisamente no lo entiendo porque en un wait 10 ya tengo los tornillos hechos, pero si pongo menos de 40 ya no me los funde :S

en el nuevo código de fundir tornillos te sobra el 'click 69 423' pues el target ya lo hace con el event macro 22 de después.

No te entiendo, el target lo hace en el event macro 17,el click que dices es el que hace sobre el menú de herrero para targetear el objeto a fundir

[o0{BoXeR}0o]

wait 40
if Pones_ in #SYSMSG

Cuando uses #SYSMSG acostumbrate a poner la frase entera o te dara muchos fallos.

No obstante no uses el #SYSMSG para eso tu tienes k decirle te lo fabrique, espere un wait de 40 (yo siempre le doy un pelin mas de tiempo del ncesario realmente por si hay algun lagazo) y ahi no tienes k decirle k lea el #SYSMSG y k haga la accion si lo lee, te dara fallos, dile que haga un finditem del tornillo y que si detecta tornillo funda y si no lo detecta haga otro, sera 100% infalible.

Algo estilo a esto

sub tornillos
finditem %hierro C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
wait 10
click 65 310
wait 10
click 270 150
wait 40
finditem %Tornillos c_ , #backpackid
if findkind <> -1
{
y aqui la orden de fundir
}

[o0{BoXeR}0o]

Por cierto, cuando hagas subrutinas (sub lo que sea) recuerda SIEMPRE sacarlo de la subrutina usando un return o un goto loquesea a la macro principal.

Revisa tu macro porque eso te dara / esta dando conflictos, te comiste unos cuantos

[OverQueen]

Gracias por las sugerencias! voy tomando nota :P

[Minsc]

Olvida mi segundo comentario anterior, tienes razón.
en lo de 40 tienes q vigilar los tiempos, tal vez solo con 10 no le vale para sacarle el ID y lo estás mandando fundir antes de buscarlo, es decir, primero haz un loop de búsqueda del tornillo a fundir, cuando lo encuentre sale del loop, siguiente loop entonces es fundir lo encontrado, y ya le puedes quitar el finItem clavos posterior al click 69 423.
EL ID del clavo lo has sacado al buscarlo, entonces justo en esa línea de búsqueda le seteas set %clavoID #findID.
Y luego en fundir te quedaría set #lTargetID %clavoID; y seteado antes.
La rutina de fundir te quedaría así:

;*************************************************************************************************
;           FUNDIR TORNILLOS SOBRANTES
;*************************************************************************************************
finditem YFG C_ , #BACKPACKID ;ESTE ES EL LOOP DE BUSCAR, SEPARALO, ES EL LOOP QUE TE FALTA
if #FINDSTACK >= 1
{
set %clavoID #findID
gosub fundir
}

sub fundir
{
finditem RMK C_ , #BACKPACKID ; ESTE ES EL LOOP DE FUNDIR
set #LOBJECTID #FINDID
event macro 17
wait 10
click 69 423
;finditem YFG C_ , #BACKPACKID; ELIMINAR, YA ESTA EN EL LOOP DE BUSCAR
set #lTargetID %clavoID ; SETEADO %clavoID en el loop de búsqueda, si lo encuentra set %clavoID #findID 
set #LTARGETKIND 1
wait 10
event macro 22
wait 10
}

2 loops, buscar, y si encuentras, ve a fundir y funde.

[o0{BoXeR}0o]

Otro fallo que te creara conflictos:

inicio:
gosub comer
gosub hierro
gosub martillos
gosub tornillos
goto inicio

si pones Inicio: cuando hagas el goto Inicio: ponlo con los :, tambien te los comiste y tambien esas cosas dan fallos estupidos de a veces funciona y a veces no.

Te lo digo porque yo tengo la mania de poner los : siempre y cuando no los pongo me pasan esas cosas, y un buen amigo precisamente dejo de ponerlos porque le paso igual.

PD: Avanzas muy rapido en esto compi, animo que e 4 dias iras sobrao

Para hacer macros de crafter es para todas igual:
1º Compruebas y coges recursos y herramientas.
2º fabricas el item
3º das un wait para que acabe la accion de fabricar y aparezca en la mochila
4º Usas un finditem para localizar el item en cuestion,
- si lo hay lo fundes, guardas, etc
- si no lo hay le mandas al primer paso a k repita la comprobacion de materiales y vuelva a fabricar.

No le busques 100 pies al gato, para fabricacion son estos 4 sencillos pasos siempre, para todas las skills de fabricacion igual, no te compliques en exceso, de hecho los tipicos subs de coger mineral, coger regs, guardar items, etc los usaras de una macro para otra con un copy/paste el 90% de las veces.

Yo, en mi nueva generacion de macros de crafter hice una primera macro de tal manera que siempre con el mismo eskeleto cambiando 4 types y poco mas me valiera para todas las habilidades.

[OverQueen]

No le busques 100 pies al gato, para fabricacion son estos 4 sencillos pasos siempre, para todas las skills de fabricacion igual, no te compliques en exceso, de hecho los tipicos subs de coger mineral, coger regs, guardar items, etc los usaras de una macro para otra con un copy/paste el 90% de las veces.

Yo, en mi nueva generacion de macros de crafter hice una primera macro de tal manera que siempre con el mismo eskeleto cambiando 4 types y poco mas me valiera para todas las habilidades.

Jajaja, a otro nivel pero había llegado a esa misma conclusión :P, de hecho todas mis macros empiezan con el sysmessage de bienvenida a la macro y la sub de comer (que en su día busqué todas las IDs), también añadía un sub al final que llamaba guards si me bajaba mucho la vida (cuando no tenía casa para macrear) hasta que me enteré que estaba prohibido llamar guards por macro xD. Y ahora que ya tengo herrero estoy subiendo artesano con cuya macro he seguido casi el mismo esqueleto con mínimas variaciones (en vez de hacer dos clic al material se lo haces a la herramienta, etc...).

Enserio, muchas gracias a los dos por ayudarme tanto! seguiré mis andanzas por éste mundo de easy tan grande para mi xD, por el momento dejo la macro ajustando el tiempo (ya he alcanzado el wait 10 en lugar de rezagarme con el 40 ^^) y si hay lagazos... el sub "limpiar" lo soluciona .
Solo me quedaría saber porqué se desequipa y equipa el martillo constantemente :S tiene que ser cuando busca martillos en la mochila, pero no lo entiendo...

LA MACRO DEFINITIVA:

;*************************************************************************************************
;Macro HERRERO by OverQueen
;*************************************************************************************************
set #SYSMSGCOL 10
event sysmessage Macro para subir herreria by OverQueen

;*************************************************************************************************
;            CONFIGURACIONES (EDITAR)
;*************************************************************************************************
set %cofre IYICROD; donde tienes lingotes y martillos
set %tornillos YFG
set %martillos GBG_FBG_TLH_CGG
set %hierro RMK
set %comida PQD_MQE_FUD_OQE_YRD_YWI_AXI_VQE_BDF_TQE_KPE_QQD_RQE_SQD_SPE_JQE_ZPE_IQE_YSD

inicio:
gosub comer
gosub hierro
gosub martillos
gosub tornillos
gosub limpiar
goto inicio:


;*************************************************************************************************
;                     COMER
;*************************************************************************************************
sub comer
findItem %comida C_ , #BACKPACKID
if #findcnt > 0
{
set #LOBJECTID #FINDID
event macro 17
}
return

;*************************************************************************************************
;                  REPONER HIERRO
;*************************************************************************************************
sub hierro
finditem %hierro C_ , #BACKPACKID
if #FINDSTACK = 0
{
finditem %hierro C_
exevent drag #FINDID 50
exevent dropc #BACKPACKID
wait 20
}
return

;*************************************************************************************************
;            COGER Y EQUIPAR MARTILLOS
;*************************************************************************************************
sub martillos
finditem %martillos C_ , #BACKPACKID
if #FINDSTACK = 0
{
finditem %martillos C_
exevent drag #FINDID 1
exevent dropc #BACKPACKID
wait 20
}
finditem %martillos C_ , #CHARID
if #FINDCNT < 1
{
finditem %martillos C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
}
return

;*************************************************************************************************
;                HACER TORNILLOS
;*************************************************************************************************
sub tornillos
finditem %hierro C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
wait 10
click 65 310
wait 10
click 270 150
wait 10
finditem %tornillos C_ , #backpackid
if findkind <> -1
{
finditem %hierro C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
wait 10
click 69 423
wait 10
finditem %tornillos C_ , #BACKPACKID
set #LTARGETID #FINDID
set #LTARGETKIND 1
wait 10
event macro 22
wait 10
}
}
return

;*************************************************************************************************
;           FUNDIR TORNILLOS SOBRANTES
;*************************************************************************************************
sub limpiar
finditem YFG C_ , #BACKPACKID
if #FINDSTACK > 0
{
finditem RMK C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
wait 10
click 69 423
finditem YFG C_ , #BACKPACKID
set #LTARGETID #FINDID
set #LTARGETKIND 1
wait 10
event macro 22
wait 10
gosub limpiar
}
if #FINDSTACK = 0
goto inicio:

[o0{BoXeR}0o]

Prueba esto y tienes que hacer un set %ContenedorMartillos con la ID del cofre de donde coge los martillos, si no le indicas de donde tiene que cogerlos podria incluso desequipartelo.

sub martillos
   {
   finditem %martillos C_ , #BACKPACKID
   if #FINDSTACK = 0
      {
      finditem %martillos C_ , %ContenedorMartillos
      set #LOBJECTID #FINDID
      exevent drag #FINDID 1
      wait 8
      exevent dropc #BACKPACKID
      wait 1s
      }
   finditem %martillos C_ , #CHARID
   if #FINDKIND = -1
      {
      finditem %martillos C_ , #BACKPACKID
      set #LOBJECTID #FINDID
      event macro 17 0
      wait 1s
      }
   return
   }

Prueba y dime.

[OverQueen]

finditem %martillos C_ , %ContenedorMartillos

El problema está en la ID del cofre :S ya tenía preparado este set (lo puedes ver desde la primera macro en %cofre), pero el problema es que no me coge los martillos (están en bolsas dentro de este cofre, que abro a mano antes de iniciar la macro) así que opté por quitar la ID del cofre, así coge el objeto si lo ve en pantalla.
Aunque, si pongo la macro con el martillo en la mochila o mano si que deja de desequipárselo constantemete (pero cuando se terminan las cargas no es capaz de coger otro martillo :/)

Así que el problema es éste, encontrar el objeto dentro del segundo nivel de una ID

[o0{BoXeR}0o]

Cuando dentro de un cofre tienes mochilas/bolsas que es donde se encuentran los pixels k kieres coger,no has de poner la id del cofre, has de poner la id de la bolsa contenedor de esos utensilios, y para que funcione correctamente has de tenerla abierta

[OverQueen]

Cuando dentro de un cofre tienes mochilas/bolsas que es donde se encuentran los pixels k kieres coger,no has de poner la id del cofre, has de poner la id de la bolsa contenedor de esos utensilios, y para que funcione correctamente has de tenerla abierta

Ostras, que fallo,pues claaro gracias de nuevo

[Minsc]

Entendiste el sub buscar y sub fundir que te puse? ten en cuenta que en el sublimpiar que tienes estás repitiendo el finditem YFG.
Otra cosa, para buscar el martillo, ten en cuenta que tb lo puede buscar equipado en su paperdoll además de en la mochila.

[OverQueen]

Entendiste el sub buscar y sub fundir que te puse? ten en cuenta que en el sublimpiar que tienes estás repitiendo el finditem YFG.
Otra cosa, para buscar el martillo, ten en cuenta que tb lo puede buscar equipado en su paperdoll además de en la mochila.

Sii,lo entendí y lo probé :P e caso es que era demasiada info para mi mente poco privilegiada x) y al final lo dejé como estaba.
¿con qué comando se busca en el paperdoll?

[Minsc]

En su día, para mí fue divertido aprender a programar y me alegro de haberlo hecho pq te sirve para muchas cosas, te entretiene y tb te da nociones y soltura para aprender otros lenguajes. Yo apuesto a que es una parte del juego que tb te divierte, especialmente cuando consigues que funcione algo. Es sólo cuestión de práctica.
El paperdoll es un container más como cualquier otro. Si cierras todo y lo abres le sacarás su ID en #contID, #contname se llama paperdoll_gump y además #conID coincide o más bien es #charID.

Si prefieres terminarlo tú o si quieres te pongo las rutinas que quieras, si ves que no te funciona algo.

[OverQueen]

Para mi también lo está siendo , estoy en periodo de macreo y le echo más tiempo al easy que al uo en si, y me encanta ^^

Gracias por el ofrecimiento pero ya me las apañaré, no pediré ayuda hasta que no esté desesperado porque no haya manera de que me salgan las cosas jajaja, así aprendo! :P

[Minsc]

Prefecto, prueba cada rutina por separado para ves si funcionan y ves donde está el fallo. Así pensar en qué hacer.
No dudes en preguntar.