macro alquimia

[Jimmy Jazz]

Hola, estoy buscando una macro de alquimia que haga pociones y coja regs/frascos de un cofre y cuando termine X pociones, coja un barril de un cofre, rellene el barril con las pociones y luego deje el barril donde estaba, vamos una macro de alquimia totalmente automatica, que tu solo tengas que darle a play y la macro haga todo lo demas.

Actualmente tengo una macro que solo hace pociones, ni coge regs de otra bolsa ni nada, una semi-automatica se llama.

olvide mencionar que estoy dispuesto a soltar pelas por la macro.

[Nilaween]

Yo hice una hace ya algún tiempo. El problema es que sólo la he probado para pociones de un ingrediente, y aún no sé si funciona para pociones de más de uno... (aunque creo que sí).

La macro se autoconfigura sola. Debes tener:
1. REGS y MORTEROS en un cofre (cuya ID debes poner en la primera línea.).
2. FRASCOS VACÍOS en tu mochila (recomiendo unos 30).
3. Kegs en la MOCHILA o ALREDEDOR TUYO en el suelo (a un máximo de 3 baldosas de distancia). NO en el cofre.
4. Fabricar a mano una primera poción de las que quieras macrear, de tal manera que cuando enciendas el script la última poción que hayas creado sea la que quieres que la macro haga.
5. Encender la macro con frascos vacíos y con regs en la mochila (ten al menos 100 de cada).

El resto lo hace sola.

set %cofre VGFWCPD ;################################################# ############### ;###### A PARTIR DE AQUI, ¡NO HACE FALTA TOCAR NADA! ##### ;################################################# ############### set %mortero RQF set %pocion WUF set %keg YBK_XBK set %reg SZF_JUF_KUF_WZF_MZF init: set #LOBJECTID %cofre event macro 17 0 finditem %pocion C_ , #BACKPACKID for #FINDINDEX 1 #FINDCNT set % , #FINDCOL #FINDSTACK finditem %reg C_ , #BACKPACKID set #LOBJECTID #FINDID for #FINDINDEX 1 #FINDCNT set % , #FINDTYPE #FINDSTACK event macro 17 0 gosub gump 10000 530_480 gosub click 30 70 dmc loop: repeat gosub gump 10000 530_480 if %potcol = N/A gosub config set %control #SYSTIME - %control if %control < 1500 break gosub click 240 70 dmc set %control #SYSTIME until %e = 1 if %kegid = N/A gosub elegirkeg gosub gump 10000 530_480 finditem %pocion , _ , %regpot C_ , #BACKPACKID for #FINDINDEX 0 #FINDCNT { if #FINDCOL = %potcol && #FINDTYPE = %pocion gosub keg if ( #FINDTYPE in %regpot && #FINDSTACK <= 100 ) && #FINDKIND <> -1 gosub mover #FINDTYPE C_ %cofre dropc #BACKPACKID 1 500 N/A N/A } finditem %mortero C_ , #BACKPACKID if #FINDTYPE = %mortero && #FINDCNT <= 3 gosub mover %mortero C_ %cofre dropc #BACKPACKID 5 N/A N/A goto loop ;########################## SUBS ###############################; sub gump set %tiempo #SYSTIME + %1 repeat until #contname <> waiting_gump && #contname <> MainMenu_gump && #contname <> Login_gump && #contname <> normal_gump repeat if %tiempo < #SYSTIME goto init until #CONTSIZE = %2 return sub click set %clickx #CONTPOSX + %1 set %clicky #CONTPOSY + %2 click %clickx %clicky %3 return sub mover finditem %1 %2 , %3 for #FINDINDEX 1 %6 { exevent drag #FINDID %7 wait 7 exevent %4 %5 %8 %9 wait 7 } return sub elegirkeg finditem %keg for #FINDINDEX 1 #FINDCNT { event property #FINDID if ( #FINDCOL = %potcol && 1000 In #PROPERTY ) || #FINDKIND = -1 || #FINDDIST > 3 || ( #FINDBAGID <> YC && #FINDBAGID <> #BACKPACKID ) continue set %kegid #FINDID if #FINDCOL = %potcol break } event property %kegid str pos #PROPERTY [ set %i #strRes + 1 str pos #PROPERTY ] set %d #strRes - %i str mid #PROPERTY %i %d set %actual #strRes return sub keg set %actual %actual + #FINDSTACK set #LTARGETID #FINDID set #LOBJECTID %kegid if %actual > 1000 { finditem #LTARGETID set %actual #FINDSTACK - ( %actual - 1000 ) gosub mover #LTARGETID C_ #BACKPACKID dropc #BACKPACKID 1 %actual 10 10 set %kegid N/A } event macro 17 0 target event macro 22 0 return sub config finditem %pocion , _ , %reg C_ , #BACKPACKID for #FINDINDEX 1 #FINDCNT { if % . #FINDTYPE > #FINDSTACK && #FINDTYPE notIn %regpot && % . #FINDTYPE <> N/A set %regpot %regpot , _ , #FINDTYPE if ( % . #FINDCOL < #FINDSTACK && #FINDCOL <> 0 ) || % . #FINDCOL = N/A set %potcol #FINDCOL } return

No está configurada para detectar todos los regs que existen. Deberías cercionarte que los de tu poción sí los identifica, asegurándote de que el #LOBJECTTYPE de los mismos se encuentra incluido en la variable "set %reg" de la décima línea.

La macro sirve tanto para subir alquimia como para rellenar kegs con cualquier tipo de poción, y la he escrito de tal manera que detecte a qué barril debe echar las pociones (por ejemplo no se rallará intentando rellenar un keg de curación con pociones de veneno, ni empezará un barril vacío si hay uno que contiene pociones del mismo tipo que se está fabricando que no está lleno del todo, y de la misma manera cuando llegue a 1000 pociones automáticamente empezará a rellenar otro barril distinto).

Un saludo.

[Jimmy Jazz]

los frascos vacios donde debo tenerlos?

[Nilaween]

En tu mochila.

[Jimmy Jazz]

vale vale acabo de pillarlo.

[Jimmy Jazz]

voy a probarla, ahora mismo te digo si funciona.

[Jimmy Jazz]

no coge regs del cofre...

[Nilaween]

Probablemente porque no está puesto su Type. Sabes como mirarlo?

[Jimmy Jazz]

esta todo puesto correctamente.
da = el tipo de cofre que sea?

[Nilaween]

Inicia la macro con 500 regs en la mochila y mira a ver que tal.

[Jimmy Jazz]

uff, es que si quiero dejarla desatendida no me va a servir de nada

[Nilaween]

La macro revisa y repone los regs cuando vacía las pociones en el keg, y vacía las pociones en el keg cuando se le terminan los frascos vacíos. Con que tengas en la mochila suficientes regs como para que llene los frascos al menos una vez será suficiente para ver si pilla o no pilla regs.

[Jimmy Jazz]

La macro revisa y repone los regs cuando vacía las pociones en el keg, y vacía las pociones en el keg cuando se le terminan los frascos vacíos. Con que tengas en la mochila suficientes regs como para que llene los frascos al menos una vez será suficiente para ver si pilla o no pilla regs.

cada cuantas pociones se supone que recarga el barril? cuantos regs repone del cofre? de momento me sigue sin coger regs.

[Nilaween]

Recarga el barril cuando se le terminan, es decir que si tienes 10 frascos vacíos, cuando llene 10 pociones rellenará el barril, y si tienes 30, cada 30 rellenará.

Del cofre toma 500 regs.

[Jimmy Jazz]

Recarga el barril cuando se le terminan, es decir que si tienes 10 frascos vacíos, cuando llene 10 pociones rellenará el barril, y si tienes 30, cada 30 rellenará.

Del cofre toma 500 regs.

por fin funciona, muchas gracias y perdona las molestias.

[Jimmy Jazz]

es muy extraño, aveces si coge regs pero muchas otras no lo hace y aveces ni rellena el barril.

[Nilaween]

A mi me funciona bien. Sólo pilla regs si el stack que tienes en la mochila es inferior a 100. Y lo de no rellenar el barril me extraña, porque entonces se bloquearía la macro. A mi no me ha fallado ninguna vez, ni con el keg en la mochila ni en el suelo...

[Jimmy Jazz]

veamos macreo de la siguiente manera, tengo un cofre en el suelo con kegs vacios y regs, en la mochila tengo 1 barril para que lo vaya rellenando, 30 frascos vacios y 500 regs, aveces me rellena el keg y otras no, aveces me recarga los regs y otras no, la mayoria de veces ni rellena el barril ni recarga los regs.

[enDings]

Eso es xq tienes kegs en el cofre y no en el suelo o en la mochila. Busca los kegs en cualquier lado y por tanto si selecciona uno del cofre no puede rellenarlo.

[Nilaween]

No creo, porque la macro no usa el keg a menos que esté en la mochila o en el suelo a menos de 3 tiles de distancia.

No obstante, si no hay kegs "válidos" la macro no está escrita para que se pare, así que continuará intentando hacer pociones. En cualquier caso, la macro o va o no va, no funciona a veces sí y a veces no.

Si pones las cosas tal y como te he escrito en el primer post la macro tiene que funcionar. A mi al menos no me da ningún error (y no me lo daba en su día cuando la terminé), aunque evidentemente todo puede pasar.