Que veis aqui mal para que no guarde los arcos que fabrico? Lo puse para cuando fabrique 1 arco, lo guarde, pero nada, sigue fabricando sin guardar. Si, es una macro guarra apartir de otra xD
init events
chooseskill carp real
set %skillini #skill
set %madera ZLK
set %daga TSF
set %bow TOH
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 dagas.
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 %bow c_ , #BACKPACKID
IF #findStack > 1
{
GoSub dejarbow
}
findItem %comida C_ , #BACKPACKID
if #findcnt > 0
{
set #LOBJECTID #FINDID
event macro 17
}
set %skillinc #SKILL - %skillini
setuotitle Fabricar Arcos: %skillini ( %skillinc )
finditem %madera c_ , #BACKPACKID
IF #findStack < 2
{
GoSub cogermadera
}
finditem %daga c_ , #BACKPACKID
IF #findcnt < 2
{
GoSub cogerdaga
}
finditem %daga c_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
wait 20
click 70 170 d
wait 30
click 275 110 d
wait 50
GoTo comienzo:
Sub cogermadera
finditem %madera c_ , %cofre
IF #findStack < 1 || #findcnt < 1
{
display ok No hay madera.
halt
}
IF #weight > 140
{
gosub dejarmadera
}
exevent drag #Findid 1
wait 10
exevent dropc #backpackid
wait 10
return
Sub cogerdaga
finditem %daga c_ , %bolsa
if #findcnt < 1
{
display ok No hay dagas
halt
}
exevent drag #findid
wait 10
exevent dropc #backpackid
wait 10
return
Sub dejarbow
wait 3
finditem %bow 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
exevent dropc %cofre
wait 10
goto comienzo


Citar





