ENTREGUE [MACRO] Vende tudo - VIP e Não VIP - [1.7] e [1.5]

Vlw, eu tinha pensado nisso e imaginei que viriam pedir tbm kkkkk, vou ver se consigo por, vlw pela sugestão, no que puder estarei melhorando a macro =)

Sim, me candidatei apesar de não saber muito de programação

Eu fiquei sabendo dessa história ai, mas essa macro só vende, não colhe nem nada, então quem lucra x com fungo ou outro item vai continuar lucrando x...

Essa macro é mais pra facilitar a vida de quem tem muitos baus para esvaziar, como já tem macros de vender fungo, cacto, peixe, disco, eu achei que não haveria problema postar pq eu só juntei todas e deixei livre pra pessoa poder escolher suas homes, oq vender e coloquei outras funcionalidades =)

 

blz, caso fique cansado de vender já sabe oq fazer rs

vlw, verdade né, se bastante gente ver / usar essa macro capaz de diminuir os pedidos rs

kkkkk, viu seu esforço não foi em vão =p

ta jogando no Region 2.0?

 

vlw =)

vlw =)

kkkkk vlw

sim '-' fazer o macro tbm rs, vlw

 

Obrigado por reportar esse erro, realmente está vendendo errado o peixe, depois que fiz os testes finais acabou que a venda de peixe foi alterada e eu não percebi.

Segue o código corrigido:

Obs.: não pude fazer agora um teste efetivo, só a noite poderei atualizar o tópico com o código final, mas se quiser testar agora um código provisório... acredito que vá funcionar, caso ele erre a placa novamente me avise por MP que eu corrijo.

Spoiler

$${
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? responda sim / nao");
prompt(#chests,$$?,"Quantos baus?");
prompt(&home,$$?,"Qual nome da home dos baus? (se for bau1, digite apenas 'bau')");
prompt(#tipo,$$?,"Qual número do item que vai vender? /peixe 18 /fungo 19 /osso 20 /carne 21 /cana 22 /cacto 23 /disco 24");

INC(#chests);

do();
do();

gui(chat);
wait(500ms);
type(/home %&home%%#n%);
press(return);
wait(3);
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.");

wait(100ms);
}$$/warp vip$${
wait(2);

if((%#tipo%=18)|(%#tipo%=19)|(%#tipo%=20)|(%#tipo%=21)|(%#tipo%=22)|(%#tipo%=23));
look(SOUTH);
wait(1);
#posx=%XPOS%;
#posz=%ZPOS%;
keydown(FORWARD);
do;
sprint();
wait(10ms);
until((%XPOS%=%#posx%+9)|(%XPOS%=%#posx%-9)|(%ZPOS%=%#posz%+9)|(%ZPOS%=%#posz%-9));
wait(100ms);
keyup(FORWARD);
look(-90,);
wait(100ms);
#posx=%XPOS%;
#posz=%ZPOS%;
keydown(FORWARD);
do;
wait(10ms);
until((%XPOS%=%#posx%+%#tipo%)|(%XPOS%=%#posx%-%#tipo%)|(%ZPOS%=%#posz%+%#tipo%)|(%ZPOS%=%#posz%-%#tipo%));
wait(150ms);
keyup(FORWARD);
look(+90,);
look(,75);
wait(100ms);
#posx=%XPOS%;
#posz=%ZPOS%;
keydown(FORWARD);
wait(200ms);
do;
keydown(JUMP);
wait(100ms);
keyup(JUMP);
while((HITNAME="Lã")|(%HITID%=35));
look(,38);
if(%#tipo%=18);
look(,330);
endif;
do;
#posx=%XPOS%;
#posz=%ZPOS%;
wait(10ms);
until(%ZPOS%=672);
keyup(FORWARD);
wait(300ms);
ifmatches(%HIT%,PLAYER);
SET(&jogador, %HITNAME%, );
LOGTO("[%DATE%][%SERVER%] trolls.txt","[%TIME%] O player %&jogador% o impediu 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;
#posx=%XPOS%;
#posz=%ZPOS%;
do;
keydown(left);
until((%XPOS%=%#posx%+1)|(%XPOS%=%#posx%-1)|(%ZPOS%=%#posz%+1)|(%ZPOS%=%#posz%-1));
keyup(left);
look(+20,35);
wait(1);
ifmatches(%HIT%,PLAYER);
do;
look(SOUTH);
keydown(right);
until((%XPOS%=%#posx%-2)|(%XPOS%=%#posx%+2)|(%ZPOS%=%#posz%-2)|(%ZPOS%=%#posz%+2));
keyup(right);
look(+314,29);
endif;
endif;

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

elseif(%#tipo%=24);

do;
sprint();
look(NORTH);
keydown(right);
until(%XPOS%=712);
keyup(right);
do;
sprint();
look(WEST);
keydown(right);
until(%ZPOS%=650);
keyup(right);
unsprint();


look(-40,20);
do(4);
gui();
key(attack);
wait(300ms);
loop;

look(+20,20);
do(4);
gui();
key(attack);
wait(300ms);
loop;

look(+20,20);
do(4);
gui();
key(attack);
wait(300ms);
loop;

look(+20,20);
do(4);
gui();
key(attack);
wait(300ms);
loop;

look(+20,20);
do(4);
gui();
key(attack);
wait(300ms);
loop;

look(+6,17);
do(4);
gui();
key(attack);
wait(300ms);
loop;

do;
sprint();
look(EAST);
keydown(FORWARD);
until(%XPOS%=732);
keyup(FORWARD);

look(-55,17);
do(4);
gui();
key(attack);
wait(300ms);
loop;

look(+20,20);
do(4);
gui();
key(attack);
wait(300ms);
loop;

look(+20,22);
do(4);
gui();
key(attack);
wait(300ms);
loop;

look(+20,25);
do(4);
gui();
key(attack);
wait(300ms);
loop;

look(+20,24);
do(4);
gui();
key(attack);
wait(300ms);
loop;

look(+18,23);
do(4);
gui();
key(attack);
wait(300ms);
loop;

endif;
}$$

$${
loop;
endif;
}$$

 

De nada, eu que agradeço por avisar do erro =)

Vlw =)


Tópico atualizado

Changelog:

19/05/14 - Corrigido erro ao vender peixes - Reportado por ShOz