// Macro Retirado de Supreme Shard - http://www.supremeshard.com
; ==--== INICIO ==--== 
initevents 
; ===================================================================== 
; Macro de Miner V6.0 por Shirkit | ShakaX | WinduX    
; ========================CONFIGURAÇÕES INICIAIS - 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 INICIAIS - Variáveis===================== 

set  %UBYVJMD #CONTID
Set %Comida RUD_FUD 
Set %Pickaxe NPF_QPF 
Set %Tentativa 3 
Set %TempoEspera 10 
Set %TempoPickaxe 2 
set %Minerios DWJ_EWJ_GWJ_TVJ__EVF

Set %cnt 0 
Set %funcao 0 

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


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

if #weight >= #maxweight 
goto guardar


gosub %cnt 1 
Set %cnt %cnt + 1 

if #hits < #maxhits 
{ 
msg Guards $ 
} 

if %cnt > 7 
{ 
Set %cnt 0 
goto caminha 
} 

Set %Chance 0 
goto mine 

; ====================MINE==================== 
mine:  
Set %Chance %Chance + 1 
if %Chance > %Tentativa 
{ 
goto inicio 
} 

delete journal 
gosub pickaxe 

Set #SCNT 0 
goto jornal 

; ====================JORNAL==================== 
jornal: 
if #SCNT >= %TempoEspera 
{ 
goto mine 
} 

scanjournal 1 
if You_notice in #journal 
{ 
msg Guards$ 
} 
if TRYING_TO_STEAL in #journal 
{ 
msg Guards$ 
} 
if ATTACKING_YOU in #journal 
{ 
msg Guards$ 
} 

if HITS_YOU in #journal 
{ 
msg Guards$ 
} 

if play in #journal 
{ 
goto espera 
} 
if nao_a_nada in #journal 
{ 
Set %Chance 0 
goto espera 
} 
if tente_minerar in #journal 
{ 
Set %Chance 0 
goto espera 
} 
if fail in #journal 
{ 
goto espera 
} 
if falhou in #journal 
{ 
goto espera 
} 
if tente_minerar in #journal 
{ 
goto espera 
} 
if nao_pode in #journal 
{ 
goto guardar 
} 
if aqui_nao in #journal 
{ 
goto espera 
} 
if em_sua_mochila in #journal 
{ 
goto mine 
} 
goto jornal 

; ====================ESPERA==================== 
espera:  
Set #SCNT 0 
espe: 
if #SCNT >= %TempoPickaxe 
{ 
if %Chance = 0 
{ 
goto inicio 
} 
goto mine 
} 
goto espe 

; ====================Caminhada==================== 
caminha:  
gosub %funcao 2 
move #ltargetx #ltargety 0 2s 
Set %funcao %funcao + 1 

if %funcao > 7 
{ 
Set %funcao 0 
} 
goto inicio 

; ====================Ajusta targets Automatico==================== 
sub 0 
set #ltargetx #charposx 
set #ltargety #charposy - %1 
return 

sub 1 
set #ltargetx #charposx + %1 
set #ltargety #charposy - %1 
return 

sub 2 
set #ltargetx #charposx + %1 
set #ltargety #charposy 
return 

sub 3 
set #ltargetx #charposx + %1 
set #ltargety #charposy + %1 
return 

sub 4 
set #ltargetx #charposx 
set #ltargety #charposy + %1 
return 

sub 5 
set #ltargetx #charposx - %1 
set #ltargety #charposy + %1 
return 

sub 6 
set #ltargetx #charposx - %1 
set #ltargety #charposy 
return 

sub 7 
set #ltargetx #charposx - %1 
set #ltargety #charposy - %1 
return 

; ====================PICKAXE==================== 
sub pickaxe 
finditem %Pickaxe C_ , %UBYVJMD

if #findkind = 0 
{ 
set #LObjectID #FindID 
event macro 17 0 
target 
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 

;============guardar=============== 
guardar:


move 2574 472 0 5s 

msg $bank$ 
wait 10;; um tempim só pra sperar caso tenha lag 
set #contposx 50 
set #contposy 50 

pegar: 
finditem %Minerios C_ , ARRHKMD
if #findkind = -1 
{ 
goto sair 
} 
  event drag #findID 
       wait 10 
    msg $ 
      wait 10 
         click 156 176  p
goto pegar
return 
sair:
return 

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