Macro artesania

[KraTezZ]

Alguien me podria facilitar una macro de artesania, ya he buscado por el foro y nada.
A ser posible que haga engranajes.

Muchas gracias.
Saludos ^.-

[interapothek]

Me apunto a la petición

[Sondrow]

Yo tengo esta, pero sinceramente, nose que hace porque lo subi hace 4 años xdd. edit: (creo que eran botellas pero no estoy fijo :$)

initevents
chooseskill tink
set %skillini #skill
set %confp 1


configurar:
if %confp = 1
{
Event sysmessage Abre el cofre en el que tienes los lingotes y manten el cursor en el.
event sysmessage Y presiona la tecla ESC
setuotitle Abre el contenedor que contiene los lingotes y luego manten el cursor en el y presiona ESC
set %conf 1
set %confp 2
goto TESC
}
if %confp = 2
{
setuotitle Pon el cursor donde quieras poner los lingotes en tu mochila y presiona ESC
event sysmessage Pon el cursor donde quieras dejar los lingotes (en la mochila)
event sysmessage Y presiona la tecla ESC
set %conf 2
set %confp 3
goto TESC
}
if %confp = 3
{
setuotitle Pon el cursor donde quieras dejar las manillas y presiona ESC
event sysmessage Pon el cursor donde quieras dejar las manillas
event sysmessage Y presiona la tecla ESC
set %conf 3
goto TESC

}


TESC:
onHotKey ESC
{
if %conf = 1
{
set %cofre #LOBJECTID
set %cofrex #CURSORX
set %cofrey #CURSORY
goto configurar
}

if %conf = 2
{
set %dejarx #CURSORX
set %dejary #CURSORY
goto configurar
}
if %conf = 3
{
set %dejar_manillax #CURSORX
set %dejar_manillay #CURSORY
goto lingotes
}

}
goto TESC



; Coger lingotes
lingotes:
finditem RMK c_ , #BACKPACKID ; Mira los lingotes de la mochila, si se han acabado, coge 50
set %l_mochila #FINDSTACK
if %l_mochila < 5
{
findItem RMK C_ , %cofre
event drag #FINDID
wait 10
msg 50 $ ; Aquí se configura el nº de lingotes que va a coger
click %dejarx %dejary p
wait 10
}
goto manillas


manillas:
findItem GTL C_ , #BACKPACKID
set %tools #findcnt

if %tools < 2
{
finditem RMK c_ , #BACKPACKID ; Mira los lingotes de la mochila, si se han acabado, va a lingotes
set %l_mochila #FINDSTACK
if %l_mochila < 5
goto lingotes


;Creamos tinker tools
finditem GTL
set #LOBJECTID #FINDID
event macro 17
wait 1s
click 241 63 d
wait 1s
click 268 67 ;**************************
wait 1s ;**************************
click 268 67
wait 1s
click 268 67
wait 1s
click 268 67 ; En mi caso son 4 clicks
wait 1s
click 235 63 d
wait 4s
}

; Creamos las manillas
finditem GTL C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
wait 10
click 179 63 d
wait 10
click 104 63 d
wait 2s

finditem RMK c_ , #BACKPACKID
set %l_mochila #FINDSTACK
set %skillinc #SKILL - %skillini
setuotitle -Macro: Artesania -|- Lingotes en la mochila: %l_mochila -|- S. Inicial: %skillini -|- Actual: #SKILL -|- Incremento: %skillinc
goto guardar

; Dejar manillas en el sitio configurado
guardar:
finditem RCG C_ , #BACKPACKID
if #FINDSTACK > 50
{
wait 4s
event drag #findid
wait 10
msg $
wait 10
click %dejar_manillax %dejar_manillay p
wait 10
}
; Una vez guardemos las manillas en el cofre configurado al inicio del script
; Volvemos a empezar

goto lingotes



; Cuando se acaben los lingotes del cofre, termina la macro
finditem RMK c_ , %cofre
if #findstack = 0
{
setuotitle No quedan más lingotes, script finalizado
halt
}