Eaiii galera!! Jimmyfilips falando aqui mais uma vez!!
MACRO DESCONTINUADO
Considerações
[hr]
(não se trata da macro)
Queria pedir desculpas a todos pela demora em postar novos tutoriais, eu tenho macros prontas que prometi o tutorial ha um bom tempo, porém como avisei a um tempo atrás, os servidores de onde trabalho estão passando por migração, e anda tudo muito corrido pra mim, mas pra compensar, vim trazer uma macro que MUITOS estão pedindo.
Ao fim da conferência que comentei a um tempo atras (o post foi apagado pelo iBiel por estar no setor de "tutoriais" sendo que se tratava de um "aviso), chagamos a conclusão de que o macro de cacto não oferecia tanto "riscos" e decidimos que este eu poderia postar, então, está aí, como todos pediram!!
[hr]
Como usar
Antes de usar você precisa fazer isso:
- Dê /sethome cacto onde coleta cacto
- ... e só!!
Sim, isso mesmo, só isso!
E para usar é mais fácil ainda:
- Vá até sua home de cacto e ative a macro
- Não feche o inventário (a macro também pede isso na tela)
Como ele funciona
ele irá abrir o inventário e ficará verificando o mesmo, fazendo a leitura completa dele, quando ele estiver completamente ocupado, irá para a warp vip, andará até a placa de cacto e venderá tudo!! Após isso, ele retorna a /home cacto e começa tudo de novo!
Complementos
Se você segurar o shift por alguns segundos, o macro te mostra o quanto de lucro você terá com o que está em seu inventário
@EDIT's
- Para em frente a portinha, se estiver fechada ele abre, e só anda com ela aberta
- verifica após a venda se há cactos no inventário, e só para de vender quando não tiver mais packs pra vender
- Se alguém estiver na frente da placa ou da frente da portinha, ele espera a pessoa sair e ainda diz "Sai da frente cara!!"
IMPORTANTE
devido ao cenário atual sobre a venda na warp vip, a leitura do código foi "dificultada"
CÓDIGO
$${IF(vcacto);LOG("&3[%PLAYER%] &6Coleta e venda VIP &4[OFF]");UNSET(vcacto);GUI();STOP();ELSE;LOG("&3[%PLAYER%] &6Coleta e venda VIP &2[ON]");LOG("&3[%PLAYER%] &3Para desligar pressione %KEYNAME%");SET(vcacto);#nslot=9;#sok=0;#sok2=0;#svazio=0;#cct=0;
ENDIF;gui(inventory);wait(500ms);log("&6Mantenha seu inventário &faberto!");log("&6Preparando relatório, &faguarde...");do;
getslotitem(%#nslot%,#id,#stack);if(%#id%!=0); if(%#id%=81);if(%#stack%=64);INC(#sok,1);INC(#cct,64);else;INC(#cct,%#stack%);
endif;else;INC(#sok2,1);endif;else;INC(#svazio,1);endif;INC(#nslot,1);until(%#nslot% = 45);#lucro=%#sok%*30;#lucro2=%#sok%*20;
log("&6Packs de cactos completos: &f%#sok%");log("&6Slots com outros itens: &f%#sok2%");log("&6Quantidade atual de cactos: &f%#cct%");log("&6Lucro na warp vip: &f%#lucro%");log("&6Lucro na warp loja: &f%#lucro2%");}$$$${log("&6Mantenha seu inventário &faberto!");DO; gui(inventory);wait(500ms); #nslot=9;#sok=0;#sok2=0;#svazio=0;#cct=0; do; getslotitem(%#nslot%,#id,#stack)
if(%#id%!=0);if(%#id%=81);if(%#stack%=64);INC(#sok,1);INC(#cct,64);else;INC(#cct,%#stack%);INC(#svazio,1);endif;endif;else;
INC(#svazio,1);endif;INC(#nslot,1);until(%#nslot% = 45);#lucro=%#sok%*30;#lucro2=%#sok%*20;if(SHIFT);log("&6Quantidade atual de cactos: &f%#cct%");log("&6Lucro na warp vip (somente packs): &f%#lucro%");log("&6Lucro na warp loja (somente packs): &f%#lucro2%");endif;if(%#svazio%=0);log("Itens prontos para venda!");log("&6Quantidade atual de cactos: &f%#cct%");
log("&6Lucro na warp vip (somente packs): &f%#lucro%");log("&6Lucro na warp loja (somente packs): &f%#lucro2%");GUI();
}$$/warp vip$${wait(7);keydown(jump);wait(1ms);keyup(jump);wait(7);#px = %XPOS%;#pz = %ZPOS%;#nb = 15;do;look(SOUTH);keydown(forward);until((%XPOS%=%#px%+%#nb%)|(%XPOS%=%#px%-%#nb%)|(%ZPOS%=%#pz%+%#nb%)|(%ZPOS%=%#pz%-%#nb%));keyup(forward);wait(50ms);#px = %XPOS%;#pz = %ZPOS%;#nb = 13;do;look(EAST);look(,45);keydown(forward);until((%XPOS%=%#px%+%#nb%)|(%XPOS%=%#px%-%#nb%)|(%ZPOS%=%#pz%+%#nb%)|(%ZPOS%=%#pz%-%#nb%));keyup(forward);wait(50ms);ifmatches(%HIT%,PLAYER);}$$sai da frente cara!!$${wait(2);endif;do;if(%HITDATA%!=7);wait(100ms);key(USE);endif;until(%HITDATA%=7);wait(50ms);#px = %XPOS%;
#pz = %ZPOS%;#nb = 11;do;look(EAST);keydown(forward);until((%XPOS%=%#px%+%#nb%)|(%XPOS%=%#px%-%#nb%)|(%ZPOS%=%#pz%+%#nb%)|(%ZPOS%=%#pz%-%#nb%));keyup(forward);wait(50ms);look(SOUTH);look(,+17);keydown(forward);z
wait(2);keyup(forward);wait(50ms);do;#nvc=20;ifmatches(%HIT%,PLAYER);}$$sai da frente cara!!$${wait(2);endif;do(%#nvc%);
key(attack);wait(600ms);loop;#nvc=0;gui(inventory);for(#nslot,9,45);getslotitem(%#nslot%,#id,#stack);if(%#id%=81);if(%#stack%=64);
INC(#nvc,1);endif;endif;INC(#nslot,1);next;gui();log(packs de cacto no inventario:%#cactod%);until(%#nvc%=0);}$$/home cacto
$${wait(2);endif;LOOP;}$$
Macro para warp loja
http://forum.craftlandia.com.br/ipb/index.php?/topic/201689-macro-venda-de-cacto-autom%C3%A1tica-warp-loja/
