aver la macro en vez de acerme dagas ace sables
; 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