Pues alguien me podría ayudar con esta macro para easyuo... es de una mina al banco de la ciudad que guarde los minerales y vuelva a minar... y no se que más poner ando un poco desesperado estoy empezando en esto y me da rabia ver a todo el mundo con super macros... jejeje si algun alma caritativa me ayuda... y me gustaría añadir lo de fundir al salir de la mina. Gracias de antemano.
comienzo:
findItem NPF
if #FINDSTACK = 0
{
findItem QPF
}
set #LOBJECTID #FINDID
set %cmsg #jIndex
wait 5 ; añadido
event macro 17
wait 10
set %fmsg #jIndex
for %i %cmsg %fmsg
{
scanJournal %i
if Donde_quieres_utilizar in #journal
{
set %seguridad 0
goto acabapicar
}
}
goto comienzo
acabapicar:
set %cmsg #jIndex
set #LTARGETX #CHARPOSX + 1
set #LTARGETY #CHARPOSY - 1
wait 5 ; añadido
event macro 22
wait 10
set %fmsg #jIndex
for %i %cmsg %fmsg
{
scanJournal %i
if Pones_el in #journal || No_encuentras in #journal ; Consigue minar, y lo vuelve a hacer.
{
set %skillinc #SKILL - %skillini
setuotitle Skill de Mining | Inicial: %skillini | Actual: #SKILL | Incremento: %skillinc | Peso: #WEIGHT
gosub compruebapeso
goto comienzo
}
if Aqui_no_hay_nada_por in #journal || Prueba_a in #journal || You_cannot_mine_so in #journal || No_puedes_ver_bien in #journal ; No se puede minar, cambio de lugar.
{
gosub compruebapeso
goto moverse
}
}
gosub seguridad
goto acabapicar
moverse:
if %lugar > 0
{
if #CHARPOSX , _ , #CHARPOSY notIn %locs
{
set %borrado %borrado + 1
if %borrado > 100
{
set %locs LOCATIONS_PISADAS
set %borrado 0
}
set %locs %locs , _ , #CHARPOSX , _ , #CHARPOSY
}
if %lugar = 5
{
if %lugaro > #CHARPOSX
{
for %i 1 6
{
event macro 5 3
wait 10
}
}
}
if %lugarp = X
{
if %lugaro < #CHARPOSX
{
for %i 1 6
{
event macro 5 7
wait 10
}
}
}
if %lugarp = Y
{
if %lugaro < #CHARPOSY
{
for %i 1 6
{
event macro 5 1
wait 10
}
}
}
}
set %mover #random % 7
event macro 5 %mover
wait 20
event macro 5 %mover
wait 20
if #CHARPOSX , _ , #CHARPOSY in %locs
{
goto moverse
}
goto comienzo
abrir_bank:
msg candida bank $
wait 2s
finditem rmk_tmk_nmk_xmk
event drag #findid
msg $
click 1160 128 p
wait 1s
if #findkind = -1
{
goto volver_mina
}
goto abrir_bank
volver_mina:
move 1203 1021 a
move 1248 1021 a
move 1248 1016 a
move 1285 1016 a
move 1285 1007 a
move 1294 1007 a
move 1294 1003 a
move 1326 1003 a
move 1326 1023 a
move 1341 1023 a
move 1341 1017 a
move 1400 1017 a
move 1400 1026 a
move 1415 1022 a
move 1431 1022 a
return2
sub compruebapeso
{
if #WEIGHT > 380
{
goto abrir_bank
}
return
}
Citar
