[MACRO] Herrero

[darksplit]

Bueno, no está al 100% porque las coordenadas van cambiando, las he intentado corregir poco a poco a medida que me iban cambiando los menus, tengo 62 de herrería asi que si subis más la skill alomejor vuelve a cambiar el menú.

; Macro crafted by SirRasel & Glacius [BdK]
; Retocada por Alex, BoXeR y darksplit (BoXeR añadió un contador
; de lingotes del cofre un contador de dagas en la mochila
; y que dependiendo del nivel de herrería
; usara una coordenada para la daga u otra automáticamente)
; Macro de Herrero que fabrica martillos.
;------------------------------------------
; Quieres hacer tiquets el lote de dagas? escribe aquí si o no.
;--------------------------
set %tiquets no
;--------------------------

;================================================= ================================================== ===========
;=========== VARIABLES ================================================== ======================================
;================================================= ================================================== ===========
chooseskill blac real
set %skillini #skill
set %martillo TLH_OLH_GBG_CGG
set %daga TSF
set %lingotes RMK
set %lotex 105
set %lotey 64
set %idlote CKF
set %pap BKF
set %gumpx1 94
set %gumpy1 172
set %gumpx2 305
set %gumpy2 343
set %dagax1 271
set %dagay1 67
set %dagax2 250
set %dagay2 67
set %dagax3 66
set %dagay3 67
set %martillox1 271
set %martilloy1 67
set %martillox2 250
set %martilloy2 67
set %martillox3 104
set %martilloy3 67
;================================================= ================================================== ===========
;================================================= ================================================== ===========
;=========== OPCIONES PREVIAS ================================================== ===============================
event sysmessage Abre el cofre donde esten los materiales
wait 4s
set %cofre #lobjectid
;================================================= ================================================== ===========
;=========== INICIO DE LA MACRO ================================================== =============================
;================================================= ================================================== ===========


inicio:
finditem %martillo c_ , #BACKPACKID
if #findcnt <= 1
{
GoSub FabricarMartillo
}
finditem %lingotes c_ , #BACKPACKID
if #findStack <= 20
{
goSub CogerLingotes
finditem %lingotes c_ , #BACKPACKID
}
set #LOBJECTID #FINDID
event macro 17 0
wait 40
click %dagax1 %dagay1 f
wait 20
click %dagax2 %dagay2 d
wait 20
click %dagax3 %dagay3 d
wait 20
if #SKILL <= 501
{
set %dagax4 51
set %dagay4 60
click %dagax4 %dagay4 d
}
if #SKILL > 501 && #SKILL < 610
{
set %dagax5 94
set %dagay5 60
click %dagax5 %dagay5 d
}
if #SKILL >= 610
{
set %dagax6 139
set %dagay6 60
click %dagax6 %dagay6 d
}
wait 1s
set %skillinc #SKILL - %skillini
finditem %lingotes C_ , %cofre
set %lingotescofre #FINDSTACK
finditem %daga c_ , #BACKPACKID
set %dagamochila #findCnt
{
setuotitle ------------< | Macro de Herrero | S.Inicial: %skillini | S. Actual: #SKILL | S. Inc: %skillinc | Lingotes que te quedan: %lingotescofre | Dagas mochila: %dagamochila | >------------
}
finditem %daga c_ , #BACKPACKID
if #findCnt >= 15
{
goSub PackDagas
gosub Guardarlote
}
goto inicio:

;================================================= ================================================== ===========
;=========== SUB COGER LINGOTES========================================== ======================================
;================================================= ================================================== ===========
Sub CogerLingotes
finditem %lingotes c_ , %cofre
if #findkind = -1
{
ignoreitem reset
HALT
}

set %carga #maxweight - #weight
set %carga %carga / 2
set %carga %carga - 17

if %carga <= 1
{
if %carga < 0
{
return
}
else
{
set %carga 2
}
}
exevent drag #findid %carga
exevent dropc #backpackid
return
;================================================= ================================================== ===========
;=========== SUB FABRICAR MARTILLO ================================================== ==========================
;================================================= ================================================== ===========
Sub FabricarMartillo
martillo:

finditem %lingotes c_ , #BACKPACKID
if #findStack <= 20
{
goSub CogerLingotes
finditem %lingotes c_ , #BACKPACKID
}
set #LOBJECTID #FINDID
event macro 17 0
wait 40
click %martillox1 %martilloy1 f
wait 30
click %martillox2 %martilloy2 d
wait 30
if #SKILL <= 539
{
click %martillox3 %martilloy3 d
wait 30
}
if #skill > 539
{
click 152 65 d
wait 30
}
if #SKILL <= 440
{
set %martillox4 59
set %martilloy4 61
click %martillox4 %martilloy4 d
}
if #SKILL > 440
{
set %martillox5 135
set %martilloy5 67
click %martillox5 %martilloy5 d
}
wait 4s
finditem %martillo c_ , #BACKPACKID
if #findCnt >= 3
{
return
}
goto martillo
;================================================= ================================================== ===========
;=========== SUB PACK DE DAGAS ================================================== ==============================
;================================================= ================================================== ===========

Sub PackDagas
findItem %martillo C_ , #BACKPACKID
if #findCnt <= 3
{
gosub FabricarMartillo
findItem %martillo C_ , #BACKPACKID
}
set #LOBJECTID #FINDID
event macro 17 0
target
key ESC
finditem %lingotes c_ , #BACKPACKID
if #findStack <= 20
{
goSub CogerLingotes
finditem %lingotes c_ , #BACKPACKID
}
set #LOBJECTID #FINDID
event macro 17 0
click %lotex %lotey d
wait 10
return
;================================================= ================================================== ===========
;=========== SUB DEJAR PACK DE DAGAS ================================================== ========================
;================================================= ================================================== ===========
sub Guardarlote

if %tiquets = no
{
dejar:
findItem %idlote C_ , #BACKPACKID
if #findkind <> -1
{
exevent drag #FINDID
exevent dropc %cofre
gosub Guardarlote
}
return
}
if %tiquets = si
{
lote:
findItem %idlote C_ , #BACKPACKID
if #FINDCNT > 0
{
findItem %pap G_3
if #FINDSTACK = 0
{
goto dejar
}
else
{
set #LOBJECTID #FINDID
event macro 17
wait 20
click %gumpx1 %gumpy1 1
wait 20
click %gumpx2 %gumpy2 1
target 3s
findItem %idlote C_ , #BACKPACKID
set #LTARGETID #FINDID
wait 20
event macro 22 0
wait 20
goto guardarlote
wait 10
key ESC
click %gumpx2 %gumpx2 r
goto lote
}
}
return
}
return

[kyomusashi]

hace martillos de herrero.....

[Blaizzer]

hace martillos de herrero.....

Cámbiale las coordenadas de los clicks. Depende de la habilidad que tengas y cada vez que vas subiendo tienes que ir modificándola.

[alexperea]

Yo tengo una parecida pero me hace tridentes y tengo las locations bien puestas..alguien me puede ayudar?

[Aloisia]

Si te hace tridentes es porque no tienes bien puestas las locations. Cuando la macro hace Click X Y, si los valores de X e Y son correctos, por lógica te tiene que hacer el item que hay en esas coordenadas.

[kyomusashi]

puedes ayudarme en cual es el ke tengo que cambiar??? a mi me hace e.vikingas la macro que tengo y llevo varios dias pero nadie me ayuda e ido cambiando y probando, pero no doy con el que tengo que cambiar para que en vez que me haga una e.vikinga me haga una daga.

si alguien puede ayudarme estaría muy agradecido

salu2

[alexperea]

He conseguido hacer una con macro muy parecida si alguien la necesita que me lo diga.Las locations estan bien puestas porque se ponerlas pero algo tiene que estar mal..si alguien puede echarme una mano, aunque sea por curiosidad porque ya tengo la de razor .
kyomusashi si quieres dejame por mp el msn y te explico como poner locations

[Gruyu]

alguien seria tan amable de decirme como cambiar las locations para acer dagas?

[Blaizzer]

Este es el Sub que fabrica los martillos:

Sub FabricarMartillo
martillo:

finditem %lingotes c_ , #BACKPACKID
if #findStack <= 20
{
goSub CogerLingotes
finditem %lingotes c_ , #BACKPACKID
}
set #LOBJECTID #FINDID
event macro 17 0
wait 40
click %martillox1 %martilloy1 f
wait 30
click %martillox2 %martilloy2 d
wait 30
if #SKILL <= 539
{
click %martillox3 %martilloy3 d
wait 30
}
if #skill > 539
{
click 152 65 d
wait 30
}
if #SKILL <= 440
{
set %martillox4 59
set %martilloy4 61
click %martillox4 %martilloy4 d
}
if #SKILL > 440
{
set %martillox5 135
set %martilloy5 67
click %martillox5 %martilloy5 d
}
wait 4s
finditem %martillo c_ , #BACKPACKID
if #findCnt >= 3
{
return

Cuando veáis "click NUMERO NUMERO d" es que hace doble click. Sin en vez de "d" hay una "f" es que hace un click, normalmente para navegar por el menú.


Por tanto parece ser que las locations deben estar en alguna de las variables:

%martillox1
%martilloy1
etcétera.

[negroh]

La verdad esque voy pelao de script en easy uo pero... Cómo cambio las locations para que me haga dagas en vez de martillos de herrero???

Gracias de antemano.

[alexperea]

agregame y te lo explico [email protected]

[kyomusashi]

Muy buena la macro. me funciona perfectamente, me hace lotes y tickets automaticamente ^^

Por cierto, supongo que la gente se puede preguntar lo que yo me preguntaba...

Necesitas un martillo de herrero, y cuando le das al play y abras el baúl donde están los materiales, lo que hace 1º es hacer 4 martillos de herrero, despues automaticamente se pone a hacer dagas ^^

GRACIAS por el aporte
+10

[freddydy]

No se tiene que poner las coordenadas del sistema de recompensas en algun lado??

Gracias

Un saludo

[Joseph]

No es necesario, no usa coordenadas, usa una variable...

set %pap BKF

y luego la llama...

findItem %pap G_3
if #FINDSTACK = 0
{
goto dejar
}
else
{
set #LOBJECTID #FINDID
event macro 17
wait 20

Un saludo.

[Krender]

A mi se me vuelve loco al querer hacer tickes con la bolsa de 15 dagas, como lo solucionais?

[ImVeRsO]

a mi no se m volvia loco, simplemente abia veces k la macro se rayaba y no acia tikets los lots asik lo desactive y logo m ice otra macro k m acia tikets los lots k staban en el cofre

osea, primero macreaba aciendo lots k no acia tikets, y a la mañana sigiente acia tikets todos los lots con una macro diferente

[Krender]

Pues he hecho lo que mas dicho y si, funciona bien, aunque se me a parado una vez porque decia que no tenia martillos y tenia 4 (los que fabrica) y no hacia nada xD