ENTREGUE [Tutorial] Fazer regiões planas!

MrC4IOHD · Out 11, 2014

Vlw cara vo testar

EvilZombie23 · Dez 8, 2014

Muito bom adorei

hiagohig · Dez 9, 2014

Esse manja demais de macro parabens

hiagohig · Dez 9, 2014

o meu começou a fazer ai subiu dois blocos e começou a fazer do outro lado n deu certo

thierryjordy · Dez 9, 2014

maneiro o tutorial

Victor luis · Dez 10, 2014

vc é bom(a) em fazer macros .-. , eu tbm sei fazer macros mas não tão bom quanto os seus '-'

Lucas Lumertz · Jan 17, 2015

No meu não bombo, ele nao pede comprimento e largura

luizguga2012 · Fev 1, 2015

ta dano erro ele vai uma linha normal mais na hora que ele vai volta ele volta na linha errada ai nao coloca os bloco

pf tenta arruma

Cyber_Shoot · Fev 3, 2015

Manja legal '-'

RafaelS · Fev 3, 2015

Meu deus, como ter preguiça de construir nas alturas agr [emoji14]

rickynho33 · Fev 4, 2015

BeetleJuice disse:
[MACRO] Fazer regiões planas!

O que este macro faz?
O macro faz uma região totalmente plana de lados definidos por você.
Serve para VIPS ou NÂO VIPS

Exemplo:

Adicionais:
-Se você cair enquanto o macro está ligado, o mesmo detectará a queda e desligará sozinho. (LAG u.u)
-Informa quantos blocos são necessários e não funciona se você não tiver o suficiente.
-Repõe os blocos da hotbar automaticamente.
~~-Informa o tempo gasto no final (opcional)~~

[media]http://www.youtube.com/watch?v=ElK7TNWr6_0[/media]
Obrigado pelo vídeo, jimmyfliips! ♥

Macro e instalação:
Basta copiar em uma tecla qualquer.
Se não sabe fazer isso ainda, leia o tópico: http://forum.craftlandia.com.br/ipb/index.php?/topic/159896-tutorial-guia-de-macro-para-iniciantes/

Versão 1.7.2

$${
if(autoputv4);
log("&d» &6AutoPUT &c[OFF]");
unset(autoputv4);
keyup(back);
keyup(sneak);
stop();
else;
log("&d» &6AutoPUT &a[ON]");
#tic2=%@#tic2%;
set(autoputv4);

PROMPT(&itemid,$$i,"Item que será usado:"); ifmatches(%#itemid%,^$);unset(autoputv4);stop();endif;
PROMPT(#nlado,$$?,"Comprimento:"); if(%#nlado%=0);unset(autoputv4);stop();endif;
PROMPT(#nlado1,$$?,"Largura:"); if(%#nlado1%=0);unset(autoputv4);stop();endif;
log("&d» &6Deixe o inventório aberto!");
#calc1=%#lado%/2;
#calc2=%#calc1%*2;
#ih45=%#lado%-%#calc1%;
#nladox=%#nlado%;
#nlado1x=%#nlado1%
#nlado=%#nlado%;
#impvar=%#nlado1%;
#nlado1=%#nlado1%/2;
#imp=%#impvar%-(%#nlado1%*2);
if(%#imp%=1);#nlado1=%#nlado1%+1;endif;

&dir = %DIRECTION%;

ifmatches(%&dir%,N);&dir=NORTH;endif;
ifmatches(%&dir%,S);&dir=SOUTH;endif;
ifmatches(%&dir%,E);&dir=EAST;endif;
ifmatches(%&dir%,W);&dir=WEST;endif;

set(ftpass);

gui(inventory);
wait(800ms);

#dims=%#nladox%*%#nlado1x%;
#tpacks=%#dims%/64;
&tpacks=;
if(%#tpacks%!=0);&tpacks="%#tpacks% packs e ";endif;
#trest=%#dims%-(#tpacks*64);
if(%#trest%!=0);&trest="%#trest% blocos";else;&trest=;endif;
#stack=0;
#stackx=0;
gui(inventory);
wait(1);
for(#capac,9,44);
getslotitem(%#capac%,&id,#stack);
ifmatches(%&id%,%&itemid%);#stackx=%#stackx%+%#stack%;endif;
next;

if(%#dims%>%#stackx%);
gui();
log("&d» &cOps! &6Total de itens no inventário insuficiente. ");
log("&d» &6Para esse tamanho são necessários &9%&tpacks%%&trest%.");
log("&d» &6AutoPUT &c[OFF]");
unset(autoputv4);

stop();
endif;

log("&d» &6Área de dimensões &9%#nladox% &6por &9%#nlado1x%&6.");
log("&d» &6Total de blocos: &9%#dims% &6blocos. ");

for(#nii,1,%#nlado1%);
for(#ucris,1,2);

getslot(%&itemid%,#i);
if(%#i%<36);
slotclick(%#i%,l,true);
endif;
if(%#i%=-1);unset(autoputv4);log("&d» &6Acabaram os itens :/ &c[OFF]");log("&d» &6AutoPUT &c[OFF]");stop();endif;
if((%#ucris%=2)&&(%#nlado1%=%#nii%)&&(%#imp%=1));
else;

if(%#ucris%=1);
&loc=+90;
&side=left;
endif;

if(%#ucris%=2);
&loc=-90;
&side=right;
endif;

&dir=%DIRECTION%;
ifmatches(%&dir%,N);&dir=NORTH;endif;
ifmatches(%&dir%,S);&dir=SOUTH;endif;
ifmatches(%&dir%,E);&dir=EAST;endif;
ifmatches(%&dir%,W);&dir=WEST;endif;

do(%#nlado%);
keydown(sneak);
look(%&dir%);
look(,+83);
#nposx1 = %XPOS%; #nposx2 = %ZPOS%;
do;
keydown(back);
pick(%&itemid%);
key(use);
until((%XPOS%=%#nposx1%+1)|(%XPOS%=%#nposx1%-1)|(%ZPOS%=%#nposx2%+1)|(%ZPOS%=%#nposx2%-1));
loop;
#nposx1 = %XPOS%; #nposx2 = %ZPOS%;

if(((%#ucris%=1)&&(%#nlado1%=%#nii%)&&(%#imp%=1))|((%#ucris%=2)&&(%#nlado1%=%#nii%)&&(%#imp%=0)));
else;
look(%&loc%,);
do;
keydown(back);
until((%XPOS%=%#nposx1%+1)|(%XPOS%=%#nposx1%-1)|(%ZPOS%=%#nposx2%+1)|(%ZPOS%=%#nposx2%-1));
wait(200ms);
keyup(back);

#nposx1 = %XPOS%; #nposx2 = %ZPOS%;
do;
keydown(%&side%);
until((%XPOS%=%#nposx1%+1)|(%XPOS%=%#nposx1%-1)|(%ZPOS%=%#nposx2%+1)|(%ZPOS%=%#nposx2%-1));
wait(100ms);
pick(%&itemid%);
key(use);
wait(100ms);
key(use);
wait(100ms);
key(use);
wait(200ms);
keyup(%&side%);
look(%&loc%,);
endif;
endif;
next;
next;

keyup(back);
do;
keydown(FORWARD);
until((%XPOS%=%#nposx1%+1)|(%XPOS%=%#nposx1%-1)|(%ZPOS%=%#nposx2%+1)|(%ZPOS%=%#nposx2%-1));
wait(40ms);
keyup(FORWARD);
keyup(sneak);

gui();
log("&d» &6AutoPUT &c[OFF]");

unset(autoputv4);
stop();
endif;
}$$

Versão 1.5.2

$${
if(autoputv4);
log("&d» &6AutoPUT &c[OFF]");
unset(autoputv4);
keyup(back);
keyup(sneak);
stop();
else;
log("&d» &6AutoPUT &a[ON]");
#tic2=%@#tic2%;
set(autoputv4);

PROMPT(#itemid,$$i,"ID do item que será usado:"); if(%#itemid%=0);unset(autoputv4);stop();endif;
PROMPT(#nlado,$$?,"Comprimento:"); if(%#nlado%=0);unset(autoputv4);stop();endif;
PROMPT(#nlado1,$$?,"Largura:"); if(%#nlado1%=0);unset(autoputv4);stop();endif;
log("&d» &6Deixe o inventório aberto!");
#calc1=%#lado%/2;
#calc2=%#calc1%*2;
#ih45=%#lado%-%#calc1%;
#nladox=%#nlado%;
#nlado1x=%#nlado1%
#nlado=%#nlado%;
#impvar=%#nlado1%;
#nlado1=%#nlado1%/2;
#imp=%#impvar%-(%#nlado1%*2);
if(%#imp%=1);#nlado1=%#nlado1%+1;endif;

&dir = %DIRECTION%;

ifmatches(%&dir%,N);&dir=NORTH;endif;
ifmatches(%&dir%,S);&dir=SOUTH;endif;
ifmatches(%&dir%,E);&dir=EAST;endif;
ifmatches(%&dir%,W);&dir=WEST;endif;

set(ftpass);

gui(inventory);
wait(800ms);

#dims=%#nladox%*%#nlado1x%;
#tpacks=%#dims%/64;
&tpacks=;
if(%#tpacks%!=0);&tpacks="%#tpacks% packs e ";endif;
#trest=%#dims%-(#tpacks*64);
if(%#trest%!=0);&trest="%#trest% blocos";else;&trest=;endif;
#stack=0;
#stackx=0;
gui(inventory);
wait(1);
for(#capac,9,44);
getslotitem(%#capac%,#id,#stack);
if(%#id%=%#itemid%);#stackx=%#stackx%+%#stack%;endif;
next;

if(%#dims%>%#stackx%);
gui();
log("&d» &cOps! &6Total de itens no inventário insuficiente. ");
log("&d» &6Para esse tamanho são necessários &9%&tpacks%%&trest%.");
log("&d» &6AutoPUT &c[OFF]");
unset(autoputv4);

stop();
endif;

log("&d» &6Área de dimensões &9%#nladox% &6por &9%#nlado1x%&6.");
log("&d» &6Total de blocos: &9%#dims% &6blocos. ");

for(#nii,1,%#nlado1%);
for(#ucris,1,2);

getslot(%#itemid%,#i);
if(%#i%<36);
slotclick(%#i%,l,true);
endif;
if(%#i%=-1);unset(autoputv4);log("&d» &6Acabaram os itens :/ &c[OFF]");log("&d» &6AutoPUT &c[OFF]");stop();endif;
if((%#ucris%=2)&&(%#nlado1%=%#nii%)&&(%#imp%=1));
else;

if(%#ucris%=1);
&loc=+90;
&side=left;
endif;

if(%#ucris%=2);
&loc=-90;
&side=right;
endif;

&dir=%DIRECTION%;
ifmatches(%&dir%,N);&dir=NORTH;endif;
ifmatches(%&dir%,S);&dir=SOUTH;endif;
ifmatches(%&dir%,E);&dir=EAST;endif;
ifmatches(%&dir%,W);&dir=WEST;endif;

do(%#nlado%);
keydown(sneak);
look(%&dir%);
look(,+83);
#nposx1 = %XPOS%; #nposx2 = %ZPOS%;
do;
keydown(back);
pick(%#itemid%);
key(use);
until((%XPOS%=%#nposx1%+1)|(%XPOS%=%#nposx1%-1)|(%ZPOS%=%#nposx2%+1)|(%ZPOS%=%#nposx2%-1));
loop;
#nposx1 = %XPOS%; #nposx2 = %ZPOS%;

if(((%#ucris%=1)&&(%#nlado1%=%#nii%)&&(%#imp%=1))|((%#ucris%=2)&&(%#nlado1%=%#nii%)&&(%#imp%=0)));
else;
look(%&loc%,);
do;
keydown(back);
until((%XPOS%=%#nposx1%+1)|(%XPOS%=%#nposx1%-1)|(%ZPOS%=%#nposx2%+1)|(%ZPOS%=%#nposx2%-1));
wait(200ms);
keyup(back);

#nposx1 = %XPOS%; #nposx2 = %ZPOS%;
do;
keydown(%&side%);
until((%XPOS%=%#nposx1%+1)|(%XPOS%=%#nposx1%-1)|(%ZPOS%=%#nposx2%+1)|(%ZPOS%=%#nposx2%-1));
wait(100ms);
pick(%#itemid%);
key(use);
wait(100ms);
key(use);
wait(100ms);
key(use);
wait(200ms);
keyup(%&side%);
look(%&loc%,);
endif;
endif;
next;
next;

keyup(back);
do;
keydown(FORWARD);
until((%XPOS%=%#nposx1%+1)|(%XPOS%=%#nposx1%-1)|(%ZPOS%=%#nposx2%+1)|(%ZPOS%=%#nposx2%-1));
wait(40ms);
keyup(FORWARD);
keyup(sneak);

gui();
log("&d» &6AutoPUT &c[OFF]");

unset(autoputv4);
stop();
endif;
}$$

Qualquer dúvida, pergunte aqui no tópico mesmo.
Lembrando que a sua dúvida pode ser a mesma de outra pessoa, então evite mandar mensagens privadas.

GOSTARIA K EDITAC ESSE MACRO E PUSES algum homes para reabastecer o inventario

xThe M3RC3N4R10 · Fev 4, 2015

Macro otimo *-*

Pootar · Mar 27, 2015

nao tem como fazer um autualizado para o novo mc??

Coronell · Mar 27, 2015

Otimo macro !

zTokStok · Abr 8, 2015

Gostei UP

Nmkz Minato · Abr 8, 2015

Ótimo macro, irei usar sem dúvida.

Nathan Lima · Abr 9, 2015

Bem legal

Feos · Abr 9, 2015

macro top d+

Zorak89 · Abr 9, 2015

Macro épico! Muito Bom!

rickynho33 · Abr 24, 2015

macro muito bom mais pela mina net ser muito lenta ele buga direto e eu me férro sempre kkkkk

ENTREGUE [Tutorial] Fazer regiões planas!

Bem-vindo!

Razoavel

Neutro

Neutro

Neutro

Craftlandiano

Neutro

Neutro

Neutro

Neutro

Craftlandiano

Neutro

Craftlandiano

Neutro

Neutro

Neutro

Excelente

Neutro

Craftlandiano

Neutro

Neutro

Users who are viewing this thread

Estatísticas online

Em alta

Novos membros

Stay Connected