[Urgente-Macro]-Venda-automatica[PEDIDO]

Bem-vindo!

Ao se registrar conosco, você poderá discutir, compartilhar e enviar mensagens privadas com outros membros da nossa comunidade.

Registrar agora!
  • PROMOÇÃO DE NATAL NO AR

    Novo servidor: CraftLandia Olimpo


Status
Não está aberto para novas respostas.

hadler123

Razoavel
VIP
Entrou
Dez 3, 2012
Mensagens
740
Pontuação de reação
99
Idade
28
Localização
Na Minha Casa
Cubos
0
[PEDIDO]
~Macro de vender qualquer coisa, ou cacto
~Objetivo da macro vender baus não ficar parado
~Por exemplo eu do sethome /home bau1 até o 10 dae tem uma sethome que fica na warp loja na frente da placa de cacto pra vender exemplo /home cacto
~Quem puder me ajuda eu agradeço vlw!!
~Tambem se alguei puder tirar o bug dessa macro que fais oque eu preciso ela da "crashe" no minecraft.
Código:
$${
if(dark);
log("&3[MACRO] &4Vende tudo desativado.");
unset(dark);
stop();
else;
log("&3[MACRO] &aVende tudo ativado.");
set(dark);

ACHIEVEMENTGET("13darkfire13",56);

#n=1;
#tipo=0;

prompt(&pergunta,$$?,"Ativar sistema de denuncia? sim / nao");
prompt(#tempo,$$?,"Quantos segundos no teleporte?? 6 = mais rapido / 7 ou mais para qdo tiver lag");
prompt(#chests,$$?,"Quantos baus para vender?");
prompt(&home,$$?,"Qual nome da home dos baus? (se for bau1, digite apenas 'bau')");
prompt(&item,$$?,"Qual o nome da home de venda? (ex: '/home peixe' digite apenas 'peixe') ");

INC(#chests);

do();
do();

gui(chat);
wait(500ms);
type(/home %&home%%#n%);
press(return);
wait(%#tempo%);
key(use);
wait(2);
for(#i,0,53);
slotclick(%#i%,l,true);
wait(75ms);
if(%#id%>349);
getslotitem(%#i%,#id,#stack);
endif;
next;
gui();
gui(inventory);
getslotitem(9,#idi,#stacki);
gui();
if(%#stacki%=0);
INC(#n, 1);
if(%#n%=%#chests%);
log("&3[MACRO] &4Vende tudo desativado.");
stop();
endif;
endif;
wait(1);
until(%#stacki%!=0);

log("&3[MACRO] &fBau esvaziado.");



gui(chat);
wait(500ms);
type(/home %&item%);
press(return);
wait(%#tempo%);

ifmatches(%HIT%,PLAYER);
SET(&jogador, %HITNAME%, );
LOGTO("[%DATE%][%SERVER%] trolls.txt","[%TIME%] O player %&jogador% impediu você de vender seus itens as [%TIME%] do dia [%DATE%]");
IFBEGINSWITH(%&pergunta%,sim);
wait(1500ms);
press(F2);
wait(1500ms);
}$$
por favor sai da frente da placa, já tenho print aqui, se continuar vou denuncia-lo
$${
endif;
do;
#posx=%XPOS%;
#posz=%ZPOS%;
keydown(left);
until((%XPOS%=%#posx%+1)|(%XPOS%=%#posx%-1)|(%ZPOS%=%#posz%+1)|(%ZPOS%=%#posz%-1));
keyup(left);
look(205,40);
wait(1);
ifmatches(%HIT%,PLAYER);
do;
look(SOUTH);
keydown(right);
until((%XPOS%=%#posx%+1)|(%XPOS%=%#posx%-1)|(%ZPOS%=%#posz%+1)|(%ZPOS%=%#posz%-1));
keyup(right);
look(155,40);
endif;
endif;

do(13);
key(ATTACK);
wait(1t);
loop;
}$$

$${
loop;
endif;
}$$
 
zMagaiver disse:
[PEDIDO]
~Macro de vender qualquer coisa, ou cacto
~Objetivo da macro vender baus não ficar parado
~Por exemplo eu do sethome /home bau1 até o 10 dae tem uma sethome que fica na warp loja na frente da placa de cacto pra vender exemplo /home cacto
~Quem puder me ajuda eu agradeço vlw!!
~Tambem se alguei puder tirar o bug dessa macro que fais oque eu preciso ela da "crashe" no minecraft.

$${
if(dark);
log("&3[MACRO] &4Vende tudo desativado.");
unset(dark);
stop();
else;
log("&3[MACRO] &aVende tudo ativado.");
set(dark);

ACHIEVEMENTGET("13darkfire13",56);

#n=1;
#tipo=0;

prompt(&pergunta,$$?,"Ativar sistema de denuncia? sim / nao");
prompt(#tempo,$$?,"Quantos segundos no teleporte?? 6 = mais rapido / 7 ou mais para qdo tiver lag");
prompt(#chests,$$?,"Quantos baus para vender?");
prompt(&home,$$?,"Qual nome da home dos baus? (se for bau1, digite apenas 'bau')");
prompt(&item,$$?,"Qual o nome da home de venda? (ex: '/home peixe' digite apenas 'peixe') ");

INC(#chests);

do();
do();

gui(chat);
wait(500ms);
type(/home %&home%%#n%);
press(return);
wait(%#tempo%);
key(use);
wait(2);
for(#i,0,53);
slotclick(%#i%,l,true);
wait(75ms);
if(%#id%>349);
getslotitem(%#i%,#id,#stack);
endif;
next;
gui();
gui(inventory);
getslotitem(9,#idi,#stacki);
gui();
if(%#stacki%=0);
INC(#n, 1);
if(%#n%=%#chests%);
log("&3[MACRO] &4Vende tudo desativado.");
stop();
endif;
endif;
wait(1);
until(%#stacki%!=0);

log("&3[MACRO] &fBau esvaziado.");



gui(chat);
wait(500ms);
type(/home %&item%);
press(return);
wait(%#tempo%);

ifmatches(%HIT%,PLAYER);
SET(&jogador, %HITNAME%, );
LOGTO("[%DATE%][%SERVER%] trolls.txt","[%TIME%] O player %&jogador% impediu você de vender seus itens as [%TIME%] do dia [%DATE%]");
IFBEGINSWITH(%&pergunta%,sim);
wait(1500ms);
press(F2);
wait(1500ms);
}$$
por favor sai da frente da placa, já tenho print aqui, se continuar vou denuncia-lo
$${
endif;
do;
#posx=%XPOS%;
#posz=%ZPOS%;
keydown(left);
until((%XPOS%=%#posx%+1)|(%XPOS%=%#posx%-1)|(%ZPOS%=%#posz%+1)|(%ZPOS%=%#posz%-1));
keyup(left);
look(205,40);
wait(1);
ifmatches(%HIT%,PLAYER);
do;
look(SOUTH);
keydown(right);
until((%XPOS%=%#posx%+1)|(%XPOS%=%#posx%-1)|(%ZPOS%=%#posz%+1)|(%ZPOS%=%#posz%-1));
keyup(right);
look(155,40);
endif;
endif;

do(13);
key(ATTACK);
wait(1t);
loop;
}$$

$${
loop;
endif;
}$$
da pra vende blaze tb ?
 
~Renovando!!
~Renovando!!
~Renovando!!
~Renovando!!
~Renovando!!
~Renovando!!
 
Opa eae zMagaiver Eu estava procurando um macro antes de comprar o vip para fazer uma plant automatica no propano e achei esse macro hj e eu também ia abrir um pedido para esse macro que está dando crashe, tentei fazer algumas correções mais sem sucesso agora resta aguardar que alguém atualiza esse magnifico macro. Se puderem atualizar tanto para VIP e NÂO VIP.
No meu caso gostaria do código NÃO VIP Ou se alguém tiver um macro que faz a mesma função agradecemos.


Post do macro: http://forum.craftlandia.com.br/ipb/index.php?/topic/317187-macro-vende-tudo-vip-e-n%C3%A3o-vip-17-e-15/
 
Status
Não está aberto para novas respostas.

Usuários que estão visualizando este tópico

Voltar
Topo