KIT DE MACROS PARA ESCAVAÇÃO - NDS2015

Coleção de macros para uma boa escavação, praticamente não se perde nenhum bloco com esses macros abaixo, fiz o teste uma noite toda, lotou os baus e não perdeu nenhum bloco. 

Muito bom mesmo, recomendo.

Abaixo deixo todos os macros que peguei no fórum do Craflandia e fui adaptando ao meu gosto pessoal.





MACRO DE ECONOMIA DE BLOCOS:

Toda vez q a mensagem de 5 segundos para limpar o chão aparecer ele vai dar um pause no macro por 8 segundos, isso pode ser editado no macro, caso queira, abrindo o inventario e continuara apos esse tempo.

OBSERVAÇÃO MUUUITO IMPORTANTE: deixe o Daley para verificar o inventario em 250 ou 500 para não desativar o onchat, pode confiar, eu testei e funcionou de boa. Eu deixo em 250.

Outro: deixe o HIT em 8, dessa forma ele vai colar o bloco um pouco mais lento, dessa forma evitando o bug do server.

Obs: - Novas Atualizações aki nesse link.

$${ if(@cav); ifmatches(%CHATCLEAN%,"Limpando itens do chao em 20s");ACHIEVEMENTGET("Limpa em 20sgs",351:4); endif; ifmatches(%CHATCLEAN%,"Limpando itens do chao em 5s");ACHIEVEMENTGET("Aguarde 5segundos",351:4); gui(inventory); wait(8); gui();endif;endif;}$$

VÍDEO DE COMO INSTALAR ONCHAT:

AGORA O MACRO DE ESCAVÇÃO:

Esse macro eu peguei do fórum do craftlandia e vou deixar o link logo abaixo, e fui adaptando ao meu gosto pessoal e ficou bem bacana.

Melhorias no original:
100% Anti-Lag.
Não guarda o bloco usado na escavação.
Mais 30 homes adicionadas, ou seja mais 30 baus duplos.
Continua na ultima configuração que fez, ou seja onde parou.
Funciona com economia de blocos e com o auto-reconect.
Não deixa mensagem nenhum no /g nem em nenhum outro local.
E por ai vai...

SETHOMES OBRIGATÓRIAS:

01:  /sethome macroesc
02:  /sethome esc1, esc2 até esc40

Dica extra, deixe o inventário assim como na imagem abaixo e jamais vai faltar blocos para seu player.

MACRO ESCAVAÇÃO:

$${ //==nodes update em 22072015-00h==// ///=== INICIA NA HOME MACROESC- POR NODES ==// }$$ /home macroesc $${ if(cav); unset(cav); log( ); log(" &f- &aAproximadamente &a%#exp% de EXP."); //==log("&6&l[ESCAVACAO] &d&lModo Escavacao &4(DESLIGADA) &f- &aAproximadamente &a%#exp% de EXP.");==// log( ); ACHIEVEMENTGET("CavarNDS Desligado",351:4); unset(@cav); //===============- NODES -==============// unset(nperg); stop(); else; set(cav); log( ); //==log("&6&l[ESCAVACAO] &d&lModo Escavacao &2(LIGADA)");==// log( ); ACHIEVEMENTGET("CavarNDS Ligado",351:4); set(@cav); IFMATCHES(%DIRECTION%,N); &near = NORTH; ENDIF; IFMATCHES(%DIRECTION%,S); &near = SOUTH; ENDIF; IFMATCHES(%DIRECTION%,W); &near = WEST; ENDIF; IFMATCHES(%DIRECTION%,E); &near = EAST; ENDIF; #exp = 0; #bau = 1; //===============--NODES-ADICIONADO, DESEJA CONTINUAR?--==============// if(%&bloco%=nothing);set(nperg);&cont=n;endif; if(%&pa%=nothing);set(nperg);&cont=n;endif; if(%&rep%=nothing);set(nperg);&cont=n;endif; if(%#dur%=nothing);set(nperg);&cont=n;endif; if(%&del%=nothing);set(nperg);&cont=n;endif; if(%#vel%=nothing);set(nperg);&cont=n;endif; if(nperg); else; PROMPT(&cont,$$?,"Deseja continuar com a ultima configuracao? (s/n)"); endif; IFBEGINSWITH(%&cont%,n); IFENDSWITH(%&cont%,n); //===============--NODES-ADICIONADO--==============// PROMPT(&bloco,$$i, Que bloco usar pra cavar? Recomendo Argila=clay.); PROMPT(&pa,$$i, Que tipo de PA usar? Recomendo Ef4 Inq3.); PROMPT(&rep,$$i, Que material usar na reparacao da PA?); PROMPT(#dur,$$?, Em qual durabilidade reparar a PA? Recomendo min40 e max250.); PROMPT(&del,$$?, Qual o delay pra verificar o Inventario? Recomendado min50 max de100.); PROMPT(#vel,$$?, Qual delay para quebrar os blocos? 1=rapido - mais de 1=lento.); //===================================================================nodes if(%&bloco%=nothing);log("&cBLOCO: Resposta invalida, configure novamente."); unset(mrb); unset(cav1); unset(cav2); unset(@cav); unset(nperg); stop(); endif; if(%&pa%=nothing);log("&cPA: Resposta invalida, configure novamente."); unset(mrb); unset(cav1); unset(cav2); unset(@cav); unset(nperg); stop(); endif; if(%&rep%=nothing);log("&cDURABILIDADE: Resposta invalida, configure novamente."); unset(mrb); unset(cav1); unset(cav2); unset(@cav); unset(nperg); stop(); endif; if(%#dur%=nothing);log("&cDURABILIDADE: Resposta invalida, configure novamente."); unset(mrb); unset(cav1); unset(cav2); unset(@cav); unset(nperg); stop(); endif; if(%&del%=nothing);log("&cDELAY: Resposta invalida, configure novamente."); unset(mrb); unset(cav1); unset(cav2); unset(@cav); unset(nperg); stop(); endif; if(%#vel%=nothing);log("&cHIT: Resposta invalida, configure novamente."); unset(mrb); unset(cav1); unset(cav2); unset(@cav); unset(nperg); stop(); endif; endif; endif; //===============NODES-final do, DESEJA CONTINUAR?==============// #dur=%#dur%; #repq=0; look(%&near%); look(,55); set(cav2); do; do(%&del%); pick(%&bloco%); key(use); wait(%#vel%ms); pick(%&pa%); if(%DURABILITY%<%#dur%); gui(inventory); for(#i,9,45); getslotitem(%#i%,&id,#stack1); if(%&id%=%&rep%); #repq=%#repq%+%#stack1%; endif; next; wait(1); gui(); if(%#repq%=0); log( ); //==log("&6&l[ESCAVACAO] &d&lModo Escavacao &4(DESLIGADA) &dNao pode reparar &f- &aAproximadamente &a%#exp% de EXP.");==// log(" &6&l[ESCAVACAO]-&dNao pode reparar &f- &aAproximadamente &a%#exp% de EXP."); log( ); ACHIEVEMENTGET("Escavar Desligado",351:4); unset(@cav); unset(cav); unset(cav2); stop(); else(%#repq%>0%); #repq=0; look(%&near%); look(,90); key(use); wait(2); #repq=0; endif;endif; endif; look(%&near%); look(,55); key(attack); inc(#exp, 1); loop; if(cav2); gui(inventory); wait(1); getslotitem(35,#id,#stack); if(%#stack%=0); gui(); else; do; wait(1); }$$ //=============--NODES ADD MAIS 30 BAUS, AGORA SAO 40--=============// $${if(%#bau%=1);}$$ /home esc1 $${endif;}$$ $${if(%#bau%=2);}$$ /home esc2 $${endif;}$$ $${if(%#bau%=3);}$$ /home esc3 $${endif;}$$ $${if(%#bau%=4);}$$ /home esc4 $${endif;}$$ $${if(%#bau%=5);}$$ /home esc5 $${endif;}$$ $${if(%#bau%=6);}$$ /home esc6 $${endif;}$$ $${if(%#bau%=7);}$$ /home esc7 $${endif;}$$ $${if(%#bau%=8);}$$ /home esc8 $${endif;}$$ $${if(%#bau%=9);}$$ /home esc9 $${endif;}$$ $${if(%#bau%=10);}$$ /home esc10 $${endif;}$$ $${if(%#bau%=11);}$$ /home esc11 $${endif;}$$ $${if(%#bau%=12);}$$ /home esc12 $${endif;}$$ $${if(%#bau%=13);}$$ /home esc13 $${endif;}$$ $${if(%#bau%=14);}$$ /home esc14 $${endif;}$$ $${if(%#bau%=15);}$$ /home esc15 $${endif;}$$ $${if(%#bau%=16);}$$ /home esc16 $${endif;}$$ $${if(%#bau%=17);}$$ /home esc17 $${endif;}$$ $${if(%#bau%=18);}$$ /home esc18 $${endif;}$$ $${if(%#bau%=19);}$$ /home esc19 $${endif;}$$ $${if(%#bau%=20);}$$ /home esc20 $${endif;}$$ $${if(%#bau%=21);}$$ /home esc21 $${endif;}$$ $${if(%#bau%=22);}$$ /home esc22 $${endif;}$$ $${if(%#bau%=23);}$$ /home esc23 $${endif;}$$ $${if(%#bau%=24);}$$ /home esc24 $${endif;}$$ $${if(%#bau%=25);}$$ /home esc25 $${endif;}$$ $${if(%#bau%=26);}$$ /home esc26 $${endif;}$$ $${if(%#bau%=27);}$$ /home esc27 $${endif;}$$ $${if(%#bau%=28);}$$ /home esc28 $${endif;}$$ $${if(%#bau%=29);}$$ /home esc29 $${endif;}$$ $${if(%#bau%=30);}$$ /home esc30 $${endif;}$$ $${if(%#bau%=31);}$$ /home esc31 $${endif;}$$ $${if(%#bau%=32);}$$ /home esc32 $${endif;}$$ $${if(%#bau%=33);}$$ /home esc33 $${endif;}$$ $${if(%#bau%=34);}$$ /home esc34 $${endif;}$$ $${if(%#bau%=35);}$$ /home esc35 $${endif;}$$ $${if(%#bau%=36);}$$ /home esc36 $${endif;}$$ $${if(%#bau%=37);}$$ /home esc37 $${endif;}$$ $${if(%#bau%=38);}$$ /home esc38 $${endif;}$$ $${if(%#bau%=39);}$$ /home esc39 $${endif;}$$ $${if(%#bau%=40);}$$ /home esc40 $${endif;}$$ //=====FINAL DA ADICAO DE BAUS====/// $${ wait(5); key(use); wait(1); for(#slotn,54,89); GETSLOTITEM(%#slotn%,&id,#stack); if((%&id%=%&pa%) || (%&id%=%&bloco%) || (%&id%=%&rep%)); else; slotclick(%#slotn%,l,true);wait(30ms); endif; next; wait(500ms); getslotitem(53,#id,#stack); wait(500ms); if(%#stack%!=0);inc(#bau); endif; //====NA LINHA ABAIXO ERA 11, POIS TINHA 10 BAUS==// if(%#bau%=41); unset(cav2); log(&d&l&6&l[ESCAVACAO] &d&lModo Escavacao &b"Baus cheios, que pena, voltando a escavar."); gui(); else; gui(); endif; until(%#stack%=0); }$$ /home macroesc $${ wait(2); endif; endif; gui(inventory); wait(600ms); for(#slot,9,35); GETSLOTITEM(%#slot%,&id,#stack); if((%&id%=%&pa%) || (%&id%=%&bloco%)); slotclick(%#slot%,l,true);wait(30ms); endif; next; gui(); loop; endif; }$$ $${ //==nodes update em 22072015-00h==// }$$

Vídeo demonstrativo do kit:

Forum: craftlandia.com.br

nodes2015