Todas as dicas para o Servidor Craftlandia.

quarta-feira, 15 de julho de 2015

MACROS NDS-2015 V.1

Não são macros profissionais como vc pode notar abaixo, mas são bem uteis. Fiz para meu próprio uso e resolvi posta aki, e conforme for melhorando-os eu vou atualizando nessa pagina, só lhes peço que não modifiquem a parte onde tem meus créditos, para que num futuro onde alguém precise saber quem fez tenha essa noção pelo próprio macro. Muito obrigado.

Abaixo deixo os macros.


ATIVA O PVPOFF VIP:

$${
log("&d&l[PVP-OFF] &a Ativa o Modo PVP-OFF VIP.");
log( );
}$$
/pvp off
$${
//===nodes criacao 2015===//

}$$


GUARDA NO BAU2 RAPIDAMENTE:

$${
//.....MACRO DESENVOLVIDO POR NODES................//
}$$
/bau
$${
wait(200ms);
log(&d&l[GUARDAR] &b"Guardando no Bau2. Aguarde.");
for(#i,52,80);
slotclick(%#i%,l,true);
wait(100ms);
next;
wait(100ms);
getslotitem(10,#id,#stack);
wait(0ms);
if(%#stack%!=0);inc(#bau);
endif;
log();
gui();
//.....MACRO DESENVOLVIDO POR NODES................//
}$$


LISTA SUAS PRINCIPAIS HOMES:
Obs: usei a letra L para melhor lembrar que minha listhomes.
PRECISA que vc edite conforme suas homes favoritas. Ok?

$${
ACHIEVEMENTGET("ListHomes",351:4);
//== log("&d&l[HOME-NDS] &aLista de Homes do nodes:"); ==//

log("");
log("&aLOJAS NODES:");
log("&floja,loja1,loja2,admin,igreja,lojanoob.");
log("&fcidade,lojan.");

log("&aCASAS ANTIGAS:");
log("&fnova,antiga1,antiga0,antigona0,ilha.");

log("&aNO TERRENO:");
log("&fraros,encantados,encantador,armas,pescaria,teto.");
log("&fmob,animais,animais2,plantacao,plantacao2,mobd1,dinamo.");
log("&fpesca1,pasto,macro,marcroesc,esc1-esc11,comida.");

log("&aIMPORTANTES:");
log("&farenito,gelo,argila,cascalho,madeira,madeirapreta.");
log("&fsacanagem,slime,flores,cavando,cavando1.");
log("&fescavando,minerando,perdido,pantano.");

log("&4LOJAS ALHEIAS:");
log("&fjuliansa-masmorra-info-ovomob-pocao,dudoobr-blaze.");
log("&fozzilost-blaze-cacto2,magoakom-cacto,lucasgamerbm.");
log("&fazenis,llukass28,wascowaf,marlonluisd,h4v0k,baca11.");

log("");
}$$


ABRIR FURNACE COM UM CLIQUE:

$${
//.....MACRO DESENVOLVIDO POR NODES................//
log("&d&l[FORNALHA] &aAbrindo fornalha vip. Aguarde...");
log( );
}$$
/furnace
$${
//.....MACRO DESENVOLVIDO POR NODES................//
}$$


ABRIR O BENCH COM UM CLIQUE:

$${
//.....MACRO DESENVOLVIDO POR NODES................//
log("&d&l[BENCH] &aAbrindo Bench. Aguarde...");
log( );
}$$
/bench
$${
//.....MACRO DESENVOLVIDO POR NODES................//
}$$


LOGIN RÁPIDO DO NODES:

MACRO PARA LOGAR SEM TER Q DIGITAR A SENHA TODA VEZ E DAR O ERRO "VOCÊ DEMOROU DEMAIS PARA LOGAR " FUNCIONA PARA TODOS USUÁRIOS:

OBS: EU USEI A TECLA F12, QUE NÃO TINHA USO NO GAME. E NO CAMPO ONDE TEM "SENHA" EM VERMELHO, PONHA SUA SENHA ATUAL PARA ENTRAR NO SERVIDOR.

$${
//======= MACRO DESENVOLVIDO POR NODES ===================//
log("&d&l[MODO-LOGIN] &4Logando...");
log( );
}$$

/login SUA-SENHA

$${
log("&d&l[MODO-LOGIN] &bAguarde o servidor responder...");
log( );
}$$

/stats
/money

$${
//======= MACRO DESENVOLVIDO POR NODES ===================//
}$$


GUARDANDO ITENS NO BAU COM UM ÚNICO CLIQUE:

OBS: PARA VIPS.. Só funfa em baus duplos.

Olhe para o bau e pressione a tecla seleciona por você na instalação do macro.

$${
//.....MACRO DESENVOLVIDO POR NODES................//
log(&d&l[GUARDAR] &b"Guardando seus intes. Espere um pouco.");
key(use);
for(#i,52,80);
slotclick(%#i%,l,true);
wait(100ms);
next;
wait(100ms);
getslotitem(10,#id,#stack);
wait(0ms);
if(%#stack%!=0);inc(#bau);
endif;
log();
gui();
//.....MACRO DESENVOLVIDO POR NODES................//
}$$


MACRO PARA DESCONECTAR COM UMA TECLA, FUNCIONA PARA TODOS USUÁRIOS:


$${  
//.....MACRO DESENVOLVIDO POR NODES................//
log("&d[DESCONECT] &fVc será desconectado agora.");
disconnect();
//.....MACRO DESENVOLVIDO POR NODES................//
}$$


MACRO DA LOJA DO DINAMOCZ:

$${
//.....MACRO DESENVOLVIDO POR NODES................//
log("&d&l[ANUNCIO-RAPIDO] &9Enviando seu Anuncio...");
log( );
}$$
/anuncio &bvenda todos os seus blazer rods a 190c cada. em /home dinamocz blaze2
$${
//.....MACRO DESENVOLVIDO POR NODES................//
}$$


MACRO PARA PEGAR O KITVIP USE A LETRA "K" PARA MELHOR USAR ESTE MACRO:

$${
//.....MACRO DESENVOLVIDO POR NODES................//
log("&d&l[KIT-VIP] &aVerificando a Disponibilidade... ");
log("&aAtente para a mensagem abaixo." );
}$$
/kit nbvip
$${
//.....MACRO DESENVOLVIDO POR NODES................//
}$$


MACRO PARA ATIVAR O BAU2, SOMENTE PARA USUÁRIOS VIPS:

$${
//.....MACRO DESENVOLVIDO POR NODES................//
log("&d&l[BAU-VIP] &aAbrindo Bau. Aguarde... ");
log( );
}$$
/bau
$${
//.....MACRO DESENVOLVIDO POR NODES................//
}$$


MACRO PARA ATIVAR O TAPETE MÁGICO, SOMENTE PARA USUÁRIOS VIPS:

$${
//.....MACRO DESENVOLVIDO POR NODES................//
log( );
log("&d&l[TAPETE-MAGICO] &aAtivado &bou &4Desativado. ");
log( );
}$$
/mc
$${
//.....MACRO DESENVOLVIDO POR NODES................//
}$$


MACRO PARA IR A WARP VIP, SOMENTE PARA USUÁRIOS VIPS:

$${
//.....MACRO DESENVOLVIDO POR NODES................//
log("&d&l[LOJA-VIP] &aIndo até a Loja Vip. Aguarde...");
log( );
}$$
/warp vip
$${
log("&d&l[/HOME] &aEsta e a Loja Vip.");
log( );
//.....MACRO DESENVOLVIDO POR NODES................//
}$$


MACRO PARA VOLTAR A /HOME:

$${
//.....MACRO DESENVOLVIDO POR NODES................//
log("&d&l[/HOME] &aRetornando a sua Home agora. Aguarde...");
log( );
}$$
/home
$${
log("&d&l[/HOME] &aVc Retornou a sua Home. Bem vindo de volta.");
log( );
//.....MACRO DESENVOLVIDO POR NODES................//
}$$


ECONOMIA DE BLOCOS PARA 1.7.X

$${   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;}$$


CAVA-CAVA 3.1 - NDS8.8.2015 (1.7.X)

$${
//==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",277: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 100 ou 250.);
PROMPT(&del,$$?, Qual o delay pra verificar o Inventario? Recomendado 250 ou 500.);
PROMPT(#vel,$$?, Qual delay para quebrar os blocos? 1 Rapido. Recomendo 8.);


//===================================================================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==//
}$$

NODES2015/MACROS
Compartilhar Google+
←  Anterior Proxima  → Página inicial