Macro bowcraft / carpentry / hacer dagas

**Kogorzo** · 12-May-2016

Busco macors de carpentry, bowcraft y de fabricar dagas que funcionen actualmente, porque el nivel que tengo yo para hacerlas, solo me da para una mierda de macros jaja, gracias de antemano y un saludo a todos.

**f.nandoco** · 13-May-2016

Muy buenas.

Te paso la macro que tengo yo de subir carpinteria. En su dia lo subi haciendo lotes de pergas pero tb puedes elegir lotes de mapas.

;Macro de carpinteria creada por f.nandoco
;===============================INSTRUCCIONES===== ======================
;En un cofre metemos la madera y los tornillos. Lo mejor es llenar el cofre entero de tornillos para que nos aguante toda la noche.
;Hay que dejar el cofre abierto.
;Antes de iniciar la macro seleccionamos la ID del COFRE y si queremos fabricar lotes de pergas o de mapas
;Le damos a play y a disfrutar.
;================================================= ======================

;CONFIGUARAR ANTES DE INICIAR LA MACRO
set %cofre IFTIJPD
set %fabricacion 1 ;si es 1 lote de pergas y si es 2 lote de mapas

;NO TOCAR
set %tornillos YFG
set %pergas MMF
set %troncos ZLK
set %pergax1 63
set %pergay1 248
set %pergax2 270
set %pergay2 169
set %pergax3 271
set %pergay3 191

inicio:
finditem %tornillos c_ , #BACKPACKID
IF #FINDCNT <= 2
{
gosub tornillos:
}
finditem %troncos c_ , #BACKPACKID
if #FINDSTACK <= 20
{
goSub Cogertroncos:
}
finditem %tornillos c_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17 0
wait 10
click %pergax1 %pergay1
wait 10
if %fabricacion = 1 ;fabricar lote de pergaminos
{
click %pergax2 %pergay2
wait 4s
}
if %fabricacion = 2 ;fabricar lote de mapas
{
click %pergax3 %pergay3
wait 4s
}
goSub pergas:
goto inicio:

;================================================= ================================================== ===========
;=========== SUB COGER TRONCOS========================================== ======================================
;================================================= ================================================== ===========
Sub Cogertroncos:
finditem %troncos 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
wait 1s
exevent dropc #backpackid
wait 1s
return
;================================================= ================================================== ===========
;=========== SUB PERGAS ================================================== ==============================
;================================================= ================================================== ===========

Sub pergas:
finditem %pergas C_ , #BACKPACKID
exevent drag #FINDID #FINDSTACK
wait 7
exevent dropc %cofre
wait 10
return

Sub tornillos:
finditem %tornillos c_ , %cofre
exevent drag #FINDID
wait 7
exevent dropc #BACKPACKID
wait 10
return