ENTREGUE Macro de Espadas Matar Pigman PREMIUM/REGION 2.0

*25/10/2014 ​correção de bugs.
*12/04/2015 ​Funcional em Todos os Server 1.7.2
*04/07/2015 ​Baus são setados home onde vocês quiserem




Macro de Pigman [VIP]

•Introdução
Este macro foi feito por mim (siguimur) e esta sujeito a alterações breve.
Este macro guarda todos os drops de mob e também livros de tesouro.
Se precisar de alguma alteração em questão de homes ou espada favor me mandar um MP


•Sethome
São ao todo 21 homes:

Spoiler

/sethome matarmobs
/sethome bau1
/sethome bau2
/sethome bau3
/sethome bau4
/sethome bau5
/sethome bau6
/sethome bau7
/sethome bau8
/sethome bau9
/sethome bau10
/sethome bau11
/sethome bau12
/sethome bau13
/sethome bau14
/sethome bau15
/sethome bau16
/sethome bau17
/sethome bau18
/sethome bau19
/sethome bau20

•Tutorial
Inventario:
Espada no 9 slot e os diamantes no 8 slot
http://imgur.com/qCqYtUI
Para reparar deve se colocar um bloco de ferro no seu pé pois a macro repara para baixo
Deve se setar a home matarmobs olhando para o vão que os mobs estarão
http://imgur.com/8X2xg63



•Macro

Spoiler

$${
if(sword1);
log("&5[&aMACRO DO SIGUIMUR&5][&bESPADA OFF&5].");
}$$
/g &bupando espada com o macro do siguimur
$${
unset(sword1);
stop();
else;
log("&5[&aMACRO DO SIGUIMUR&5][&bESPADA ON&5].");
set(sword1);

&dir = %DIRECTION%;
#bau=1;
set(nf);

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;
pick(276);

if(%DURABILITY%<70);
look(0,90);
log("&4[Macro] &6 Durabilidade baixa, reparando...");
wait(500ms);
key(use);
wait(500ms);
key(use);}$$
/pvp off
$${log("&4[Macro] &6 Espada reparada!");
endif;

do(50);
look(%&dir%);
look(,-60);
wait(200ms);
key(attack);
loop;
if(nf);

wait(1);
gui(inventory);
wait(1);
getslotitem(35,#id,#stack);
if(%#stack%=0);
gui();
else;
do;
wait(1);}$$

$${if(%#bau%=1);}$$
/home bau1
$${endif;}$$
$${if(%#bau%=2);}$$
/home bau2
$${endif;}$$
$${if(%#bau%=3);}$$
/home bau3
$${endif;}$$
$${if(%#bau%=4);}$$
/home bau4
$${endif;}$$
$${if(%#bau%=5);}$$
/home bau5
$${endif;}$$
$${if(%#bau%=6);}$$
/home bau6
$${endif;}$$
$${if(%#bau%=7);}$$
/home bau7
$${endif;}$$
$${if(%#bau%=8);}$$
/home bau8
$${endif;}$$
$${if(%#bau%=9);}$$
/home bau9
$${endif;}$$
$${if(%#bau%=10);}$$
/home bau10
$${endif;}$$
$${if(%#bau%=11);}$$
/home bau11
$${endif;}$$
$${if(%#bau%=12);}$$
/home bau12
$${endif;}$$
$${if(%#bau%=13);}$$
/home bau13
$${endif;}$$
$${if(%#bau%=14);}$$
/home bau14
$${endif;}$$
$${if(%#bau%=15);}$$
/home bau15
$${endif;}$$
$${if(%#bau%=16);}$$
/home bau16
$${endif;}$$
$${if(%#bau%=17);}$$
/home bau17
$${endif;}$$
$${if(%#bau%=18);}$$
/home bau18
$${endif;}$$
$${if(%#bau%=19);}$$
/home bau19
$${endif;}$$
$${if(%#bau%=20);}$$
/home bau20
$${endif;}$$


$${wait(7);
wait(1);
LOOK(+180,);
gui(inventory);
wait(1);
FOR(#u,9,44);
GETSLOTITEM(%#u%,#idu,#stacku);
IF(%#idu%=283);
SLOTCLICK(%#u%);
SLOTCLICK(-999);
ENDIF;
NEXT;
LOOK(+180,);
wait(1);
key(use);
wait(1);
for(#i,54,87);
slotclick(%#i%,l,true);
wait(30ms);
next;
wait(500ms);
getslotitem(53,#id,#stack);
wait(500ms);
if(%#stack%!=0);
inc(#bau);
endif;
if(%#bau%=9);
unset(nf);
log("&4[Macro] &6Baús cheios! Apenas matará mobs agora.");
gui();
else;
gui();
endif;
until(%#stack%=0);}$$
/home matarmobs
$${
wait(7);
endif;
endif;
loop;
endif;
}$$

•Apoio
Gostaria de agradecer a todos que apoiaram pelo crescimento e amigos que fizeram com que eu nao desistisse
Mikkimc
Ti40
Pato
CrazyGames97
Lianzao10
ETC...

 

Logo Logo poderá irei fazer atualizaçoes semanais