¿Macro Carpinteria?

[TheSanT]

Muy buenas compañeros. Estoy buscando un macro de easy para macrear mis ultimos 10 puntos de la Skill de Carpinteria. ¿Alguien me podria pasar una macro actualizada para fabricar lotes de pergaminos? Gracias

[LordShiva]

Sorry recien lo veo, sino te la pasaba antes jeje. Saludos y espero que te sea de ayuda.


;==================================
; Script: Carpinteria (Pergaminos en blanco)
; Autor: Aloisia
; Version Easyuo: 1.5, 148
; Version: 1.0
; Cliente: 2.0.3
; Fecha del script: 01 Febrero 2010
; Finalidad: Hace lotes de pergaminos en blanco.
;==================================
;Para la siguiente macro necesitas:
;1.- Una bolsa con serruchos (herramienta indispensable).
;2.- Una bolsa con madera.
;3.- Una bolsa donde guardar los lotes de pergaminos.
;4.- Comida (peras o manzanas, si quieres otro tipo añadelo en set %comida)

init events
chooseskill carp real
set %skillini #skill
set %madera ZLK
set %sierra AGG_EGG
set %lote MMF
set %confp 1
set %comida YSD_QQD ;Peras, Manzanas

configurar:
if %confp = 1
{
Event sysmessage Abre el contenedor donde tienes la madera.
event sysmessage Y presiona la tecla ESC.
set %conf 1
set %confp 2
goto TESC
}
if %confp = 2
{
event sysmessage Abre el contenedor de las herramientas.
event sysmessage Y presiona la tecla ESC
set %conf 2
set %confp 3
goto TESC
}

TESC:
onHotKey ESC
{
if %conf = 1
{
set %cofre #LOBJECTID
goto configurar
}
if %conf = 2
{
set %bolsa #LOBJECTID
goto comienzo
}

}
goto TESC

comienzo:
findItem %comida C_ , #BACKPACKID
if #findcnt > 0
{
set #LOBJECTID #FINDID
event macro 17
}
set %skillinc #SKILL - %skillini
setuotitle Carpintería: %skillini ( %skillinc )
finditem %madera c_ , #BACKPACKID
IF #findStack < 10
{
GoSub cogermadera
}
finditem %sierra c_ , #BACKPACKID
IF #findcnt < 2
{
GoSub cogersierra
}
finditem %lote c_ , #BACKPACKID
IF #findStack > 40
{
GoSub dejarlote
}
finditem %sierra c_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
wait 20
click 70 250 d
wait 30
click 271 190 d
wait 300
GoTo comienzo:

Sub cogermadera
finditem %madera c_ , %cofre
IF #findStack < 100 || #findcnt < 1
{
display ok No hay madera.
halt
}
IF #weight > 140
{
gosub dejarmadera
}
exevent drag #Findid 40
wait 10
exevent dropc #backpackid
wait 10
return

Sub cogersierra
finditem %sierra c_ , %bolsa
if #findcnt < 1
{
display ok No hay herramientas
halt
}
exevent drag #findid
wait 10
exevent dropc #backpackid
wait 10
return

Sub dejarlote
finditem %lote c_ , #BACKPACKID
exevent drag #findid #findstack
wait 10
exevent dropc %cofre
wait 10
return

Sub dejarmadera
finditem %madera c_ , #backpackid
wait 10
exevent drag #findid #findstack
wait 10 Aqui se queda pillado todo el rato cuando le doy pausa.
exevent dropc %cofre
wait 10
goto comienzo

[TheSanT]

Graacias!!