Hola:
Tengo esta macro de Artesanía y a ver si alguien me puede decir.
¿en que parte de la macro cambio el número de lingotes que quiero que coja?
;////////////////////////////////////////
;////////// MACRO ARTESANIA by SIRMANIAK
;////////////////////////////////////////
set %comida YSD_QQD ;Peras, Manzanas
set %lingotes RMK
set %item RCG
set %herramienta GTL
set %menu_x1 110
set %menu_x2 110
set %confp 1
configurar:
if %confp = 1
{
Event sysmessage Abre el contenedor donde tienes los lingotes.
event sysmessage Y presiona la tecla ESC.
set %conf 1
set %confp 2
goto TESC
}
if %confp = 2
{
event sysmessage Abre el contenedor donde se encuentran 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 inicio
}
}
goto TESC
inicio:
;//////////////////////////////////////////////////////// reponemos herramientas
findItem %herramienta C_ , #BACKPACKID
if #findcnt < 1
{
GoSub cogerherramienta
}
;//////////////////////////////////////////////////////// comemoms
findItem %comida C_ , #BACKPACKID
if #findcnt > 0
{
set #LOBJECTID #FINDID
event macro 17
}
;//////////////////////////////////////////////////////// dejamos los engranajes o el objeto que sea
findItem %item C_ , #BACKPACKID
if #findcnt > 3 || #findstack > 40
{
GoSub dejarItems
}
;//////////////////////////////////////////////////////// cogemos los lingotes
findItem %lingotes C_ , #BACKPACKID
if #findstack < 5
{
GoSub cogerlingotes
}
;//////////////////////////////////////////////////////// hacemos los engranajes o el objeto que sea
findItem %herramienta C_ , #BACKPACKID
set #LOBJECTID #FINDID
event macro 17
wait 20
click 172 60 d
wait 20
click 100 55 d
wait 5s
GoTo inicio:
;//////////////////////////////////////////////////////// PROCEDIMIENTOS *************************************************************************************************
;//////////////////////////////////////////////////////// PROCEDIMIENTOS *************************************************************************************************
;//////////////////////////////////////////////////////// PROCEDIMIENTOS *************************************************************************************************
;//////////////////////////////////////////////////////// PROCEDIMIENTOS *************************************************************************************************
Sub cogerherramienta
finditem %herramienta c_ , %bolsa
if #findcnt < 1
{
msg Faltan herramientas
wait 10
msg $
halt
}
exevent drag #FINDID 1
wait 20
exevent dropc #BACKPACKID
wait 20
return
;//////////////////////////////////////////////////////// PROCEDIMIENTOS *************************************************************************************************
Sub CogerLingotes
finditem %lingotes c_ , %cofre
if #findkind = -1
{
ignoreitem reset
HALT
}
exevent drag #findid 90
exevent dropc #backpackid
return
;//////////////////////////////////////////////////////// PROCEDIMIENTOS *************************************************************************************************
Sub dejarItems
finditem %item c_ , #BACKPACKID
if #findstack > 40
{
exevent drag #findid #findstack
wait 10
exevent dropc %cofre
}
return
-----------------------------------------------------------------------------------------------------
Salu2![]()



Citar






