;============================================================================ 
; MACRO DE LUMBER v1.0 | 
; Por ZaxxoN | 
; | 
; Esse macro de lumber utiliza o bank via recall, quando eu tiver tempo eu | 
; coloco opção na macro pro acesso a pé, pra quem não quer gastar com reagente. | 
; | 
; Pra utilizar esse macro você precisa tomar as seguintes providências: | 
; 1) Marcar 2 runas: uma perto do banco, outra perto das árvores que você irá | 
; cortar, | 
; 2) Ter um machado, reagentes de recall (BM, MR e BP) e as runas marcadas na bag| 
; 3) Inserir o n.º de árvores que vc deseja cortar no SETUP DA MACRO, | 
; 4) Conforme o número de árvores criar novos chamados na SEQUÊNCIA DE ÁRVORES, | 
; 5) Preencher as coordenadas desses chamados da seguinte forma: | 
; | 
; set %bank 0 | 
; gosub cortar xxx yyy www zzz nnnn | 
; | 
; Onde: | 
; | 
; xxx - X de onde o char vai se posicionar na frente da árvore | 
; yyy - Y de onde o char vai se posicionar na frente da árvore | 
; www - X da árvore | 
; zzz - Y da árvore | 
; nnnn - Tiletype da árvore | 
; | 
; 6) Editar o X e o Y das runas no LOOP PRINCIPAL e o X e o Y do Bankbox lá em baixo | 
; 7) Dar play e deixar rolar... | 
;============================================================================= 

initevents 
event sysmessage Macro Lumber v1.0 
wait 10 
event sysmessage By ZaxxoN 

;============================================================================= 
; SETUP DO MACRO | 
;============================================================================= 

set %contagem 0;pra mudar de arvore 
set %peso #weight+1000;pra saber quando ir ao banco 
set %bank 0;pra saber quando foi ao banco ou nao (recall ida ou volta) 
set %arvores 20; »» EDITAR «« Estipula o número de árvores a serem cortadas 

event sysmessage Dê um duplo clique no machado e tecle enter 
wait 5 

setup1: 
on hotkey enter 
goto setup2 
goto setup1 

setup2: 
set %machado #lObjectId 
event sysmessage Machado identificado... 
wait 5 
event sysmessage Agora dê um duplo clique em alguns logs e tecle enter 

setup3: 
on hotkey enter 
goto setup4 
goto setup3 

setup4: 
set %logs #lObjectId 
event sysmessage Logs identificado... 
wait 5 
event sysmessage Iniciando os trabalhos... 


;============================================================================= 
; SEQUÊNCIA DE ÁRVORES | 
;============================================================================= 

1: 
set %bank 0 
gosub cortar xxx yyy www zzz nnnn 

2: 
set %bank 0 
gosub cortar xxx yyy www zzz nnnn 

3: 
set %bank 0 
gosub cortar xxx yyy www zzz nnnn 

4: 
set %bank 0 
gosub cortar xxx yyy www zzz nnnn 

5: 
set %bank 0 
gosub cortar xxx yyy www zzz nnnn 

6: 
set %bank 0 
gosub cortar xxx yyy www zzz nnnn 

7: 
set %bank 0 
gosub cortar xxx yyy www zzz nnnn 

8: 
set %bank 0 
gosub cortar xxx yyy www zzz nnnn 

9: 
set %bank 0 
gosub cortar xxx yyy www zzz nnnn 

10: 
set %bank 0 
gosub cortar xxx yyy www zzz nnnn 

11: 
set %bank 0 
gosub cortar xxx yyy www zzz nnnn 

12: 
set %bank 0 
gosub cortar xxx yyy www zzz nnnn 

13: 
set %bank 0 
gosub cortar xxx yyy www zzz nnnn 

14: 
set %bank 0 
gosub cortar xxx yyy www zzz nnnn 

15: 
set %bank 0 
gosub cortar xxx yyy www zzz nnnn 

16: 
set %bank 0 
gosub cortar xxx yyy www zzz nnnn 

17: 
set %bank 0 
gosub cortar xxx yyy www zzz nnnn 

18: 
set %bank 0 
gosub cortar xxx yyy www zzz nnnn 

19: 
set %bank 0 
gosub cortar xxx yyy www zzz nnnn 

20: 
set %bank 0 
gosub cortar xxx yyy www zzz nnnn 

;============================================================================= 
; LOOP PRINCIPAL | 
;============================================================================= 

recall:;»»»» IR OU VOLTAR DO BANCO USANDO RECALL «««« 

event macro 15 31 
wait 5 
if %bank=1; check pra saber se está indo ou voltando do banco 
{ 
click xxx yyy; »»EDITAR«« inserir coordenadas da runa de volta 
} 
click xxx yyy; »»EDITAR«« inserir coordenadas da runa de ida 

scanjournal 1 

if SPELL_FIZZLES in #journal 
{ 
goto recall 
} 
if ENOUGH_MANA in #journal 
{ 
goto medit 
} 

if %bank=1 
{ 
goto %contagem 
} 
goto banco 


medit:;»»»» MEDITAR CASO ACABE A MANA «««« 

if #mana < #int 
{ 
event macro 13 46 
wait 10s 
goto medit 
} 
if #mana = #int 
{ 
goto recall 
} 


banco:;»»»» GUARDAR LOGS NO BANCO «««« 

msg Bank$ 
wait 10 
contpos xxx yyy;»»EDITAR«« Colocar as coordenadas do Bankbox 
wait 5 
FindItem %Logs 
Event Drag #FindId 
Key Enter 
click %lugarX %LugarY P 
set %bank 1 
set %peso #weight+1000 
goto recall 


sub cortar;»»»» CORTAR ÁRVORES «««« 

finditem %machado 
Set #LObjectId #FindId 

move %1 %2 a 
set #LTARGETX %3 
set #LTARGETY %4 
set #LTARGETTILE %5 
event macro 17 0 
wait 5 
event macro 22 0 
gosub chamar 
wait 7s 

scanjournal1 

if TOO_HEAVY in #journal 
{ 
goto recall 
} 
if NO_LOGS_HERE in #journal 
{ 
set %contagem %contagem+1 
if %contagem > %arvores 
{ 
set %contagem 1 
} 
goto %contagem 
} 

if %peso=#weight 
{ 
goto recall 
} 
return 


sub chamar; »»»» CHAMAR GUARDS «««« 

scanjournal 1 

if ATTEMPTING_TO_PEEK_INTO_YOUR in #journal 
{ 
msg Guards ! $ 
} 
if ATTEMPTING_TO_STEAL 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 ! $ 
} 

return