; ==--== INICIO ==--==
initevents
; =====================================================================
; Macro de Miner v7.3 por SoloYo
; Servidor: Free
; Distribuição: Gratúita
; ========== CONFIGURAÇÕES DO UO
; Open Paperdoll
event macro 8 1
wait 10

; Open status
event macro 8 2
wait 10

; Open backpack
event macro 8 7
wait 10
; ==========  CONFIGURAÇÕES - MINERAR

; Pickaxes
set %pickaxe NPF_QPF_TWF_WWF

; Numero de tentativas
set %tentativas 3

; Tempo maximo de espera em cada tentativa (em segundos)
set %tempo_max_tentativa 8

; Tempo entre cada tentativa (pode ser usado no lag ou em servidores que não aceitam minerar muito rapido)
set %tempoPickaxe 20

; Distancia maxima a minerar (distancia em tiles)
; Padrao 2 (corresponde a 25 posições diferentes sem caminhar)
set %target_max_distance 2

; ==========  CONFIGURAÇÕES - ALIMENTAR

; Alimentar? (Sim ou Nao)
Set %alimentar Nao

; Comidas
Set %comida RUD_FUD_HND

; ==========  CONFIGURAÇÕES - HIDING

; Hiding? (Sim ou Nao)
Set %hiding Nao

; ==========  CONFIGURAÇÕES - ANDAR

; Distancia a andar
Set %distancia_andar 5

; ==========  CONFIGURAÇÕES - FIXAS (nao alterar)

Set %target_tmp_X %target_max_distance
Set %target_tmp_Y %target_max_distance

Set #ltargetid 0
Set #ltargetz 0
Set #ltargetkind 3

; ==========  INICIO
Inicio:

gosub ajusta_target

gosub comida

Set %tentativa_atual 0

goto mine

; ==========  MINE
mine:

wait %TempoPickaxe

Set %tentativa_atual %tentativa_atual + 1

if %tentativa_atual > %tentativas
{
 goto inicio
}

gosub pickaxe

Set #SCNT 0

goto jornal

; ==========  JORNAL
jornal:
deleteJournal
scanJournal 1

if #SCNT >= %tempo_max_tentativa
{
 goto mine
}

;mining_los
if you_have_no_line_of_sight_to_that_location in #journal || voce_nao_tem_uma_linha_de_visao_para_essa_posicao in #journal
{
 goto inicio
}

;mining_reach
if that_is_too_far_away in #journal || aquele_esta_muito_distante in #journal
{
 goto inicio
}

;mining_1
if try_mining_elsewhere in #journal || tente_minerar_em_outro_lugar in #journal
{
 goto inicio
}

;mining_2
if useable_ore in #journal || nao_a_nada_aqui_para_minerar in #journal
{
 goto inicio
}

;mining_3
if there_is_no_ore_here_to_mine in #journal || nao_a_minerio_aqui in #journal
{
 goto inicio
}

;mining_4
if try_mining_in_rock in #journal || tente_minerar_na_rocha in #journal
{
 goto inicio
}

if fail in #journal || nenhum_minerio_aproveitavel in #journal
{
 goto mine
}

if in_your_backpack in #journal || em_sua_mochila in #journal
{
 goto mine
}

if increased in #journal
{
 goto mine
}

goto jornal

; ====================Ajusta target====================
sub ajusta_target

if %target_tmp_Y < 0 - %target_max_distance
{
set %target_tmp_Y %target_max_distance
set %target_tmp_X %target_tmp_X - 1
}

if %target_tmp_X < 0 - %target_max_distance
{
set %target_tmp_X %target_max_distance

 set %direcao %direcao + 1
 set %anda_x #charposx
 set %anda_y #charposy

 if %direcao >= 4
 {
  set %anda_y #charposy - %distancia_andar
  set %direcao 0
 }
 if %direcao = 3
 {
  set %anda_x #charposx - %distancia_andar
 }
 if %direcao = 2
 {
  set %anda_y #charposy + %distancia_andar
 }
 if %direcao = 1
 {
  set %anda_x #charposx + %distancia_andar
 }

 move %anda_x %anda_y 0 2s
}

set #ltargetx #charposx - %target_tmp_X
set #ltargety #charposy - %target_tmp_Y

set %target_tmp_Y %target_tmp_Y - 1

return

; ====================PICKAXE====================
sub pickaxe
finditem %Pickaxe

 if #findkind = 0
 {
   set #LObjectID #FindID
   event macro 17 0
   target
   event macro 25 0
   event macro 22 0
   return
 }

 if #findkind = 1
 {
   ignoreitem #FindID
   gosub pickaxe
   return
 }

 if #findkind = -1
 {
   ignoreitem reset
   event sysmessage Pickaxe nao encontrada
   wait 3s
   return
 }
return


; ==--== FIM ==--==