a$${ if(cav1); log( ); log("&6&l[MACRO] &d&lCava-Cava 2.0&4&l (OFF)"); log( ); unset(mrb); unset(cav1); unset(cav2); unset(@cav); unset(nperg); stop(); else; log( ); log("&6&l[MACRO] &d&lCava-Cava 2.0&2&l (ON)"); log( ); ACHIEVEMENTGET("by MrBlueees",351:4); set(cav1); set(cav2); endif; #bau=1; IFMATCHES(%DIRECTION%,N);&near=NORTH;ENDIF; IFMATCHES(%DIRECTION%,S);&near=SOUTH;ENDIF; IFMATCHES(%DIRECTION%,W);&near=WEST;ENDIF; IFMATCHES(%DIRECTION%,E);&near=EAST;ENDIF; if(%#bloco%=nothing);set(nperg);&cont=n;endif; if(%#pa%=nothing);set(nperg);&cont=n;endif; if(%#dur%=nothing);set(nperg);&cont=n;endif; if(%#del%=nothing);set(nperg);&cont=n;endif; if(%#hit%=nothing);set(nperg);&cont=n;endif; if(nperg); else; PROMPT(&cont,$$?,"Deseja continuar com a última configuraçao? (s/n)"); endif; IFBEGINSWITH(%&cont%,n); IFENDSWITH(%&cont%,n); PROMPT(#bloco,$$i,Que bloco usará para cavar?); PROMPT(#pa,$$i,Que tipo de pá irá ser usada?); if(%#pa%=277);#rep=264;endif; if(%#pa%=256);#rep=265;endif; if(%#pa%=284);#rep=266;endif; if(%#pa%=269);#rep=125;endif; if(%#pa%=273);#rep=4;endif; PROMPT(#dur,$$?,Em qual durabilidade você quer reparar sua pá?); #dur=%#dur%; PROMPT(#del,$$?,Qual delay para verificar o inventário? Recomendado: 300 - 400); PROMPT(#meg,$$?,Megafone "122"); PROMPT(#hit,$$?,"Quantos hits para quebrar o bloco? Exemplos: 1 = pá eficiência 5 || 10 ou mais = pá de pedra"); if(%#bloco%=nothing);log("&cResposta inválida, configure novamente."); unset(mrb); unset(cav1); unset(cav2); unset(@cav); unset(nperg); stop(); endif; if(%#pa%=nothing);log("&cResposta inválida, configure novamente."); unset(mrb); unset(cav1); unset(cav2); unset(@cav); unset(nperg); stop(); endif; if(%#dur%=nothing);log("&cResposta inválida, configure novamente."); unset(mrb); unset(cav1); unset(cav2); unset(@cav); unset(nperg); stop(); endif; if(%#del%=nothing);log("&cResposta inválida, configure novamente."); unset(mrb); unset(cav1); unset(cav2); unset(@cav); unset(nperg); stop(); endif; if(%#hit%=nothing);log("&cResposta inválida, configure novamente."); unset(mrb); unset(cav1); unset(cav2); unset(@cav); unset(nperg); stop(); endif; ENDIF; ENDIF; set(mrb); set(@cav); if(mrb); look(%&near%); look(,30); do; do(%#del%); pick(%#bloco%); key(use); wait(1ms); pick(%#pa%); if(%DURABILITY%<%#dur%); look(%&near%); look(,90); key(use); wait(1); endif; look(%&near%); look(0,51); do(%#hit%); key(attack); loop; loop; wait(2); }$$/home lixo$${ wait(3); gui(INVENTORY); wait(1); FOR(#i,9,44); GETSLOTITEM(%#i%,#id,#stack); IF((%#id%=354) || (%#id%=347) || (%#id%=348) || (%#id%=2267) || (%#id%=341) || (%#id%=30) || (%#id%=88) || (%#id%=287)); SLOTCLICK(%#i%); SLOTCLICK(-999); WAIT(80ms); endif; next; gui(); if(cav2); gui(inventory); wait(10ms); getslotitem(35,#id,#stack); if(%#stack%=0); gui(); else; wait(2); do; //=================BAUS=================// }$$ $${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;}$$ $${ //======================================// wait(5); key(use); wait(1); for(#slotn,54,89); getslotitem(%#slotn%,#id,#stack); if((%#id%=%#pa%) || (%#id%=%#bloco%) || (%#id%=%#rep%)) || (%#id%=%#meg%) || (%#id%=264)); else; slotclick(%#slotn%,l,true); wait(30ms); endif; next; wait(500ms); getslotitem(53,#id,#stack); wait(500ms); if(%#stack%!=0); inc(#bau); else; endif; if(%#bau%=11); unset(cav2); log("&cBaús cheios! Voltando a escavar somente."); gui(); else; gui(); endif; until(%#stack%=0); endif; }$$/home macroesc$${ wait(4); gui(inventory); wait(600ms); for(#slot,9,35); GETSLOTITEM(%#slot%,#id,#stack); if((%#id%=%#pa%) || (%#id%=%#bloco%) || (%#id%=%#rep%)); slotclick(%#slot%,l,true);wait(30ms); else; endif; next; gui(); endif; loop; endif; }$$
Prezado(a) jogador(a), Seu cubo foi analisado pela nossa equipe e encontra-se resolvida com base nas regras pré-definidas dos cubeiros em nosso site. Vocês podem visualizar os cubos em: http://forum.craftlandia.com.br/ipb/index.php?/topic/177440-introdu%C3%A7%C3%A3o-craftlandia-cubos/ Atenciosamente, Equipe Cuberolandia ____________________________________________________________________________________________________________________________________ Cubo entregue, tópico aberto e tag [Cubeiro] Adicionada ao tópico. Obs: Esta mensagem é cubamente automática.