Forums

Você não está conectado. Conecte-se ou registre-se

Ver o tópico anterior Ver o tópico seguinte Ir para baixo  Mensagem [Página 1 de 1]

#1Macro De Vender Cactos Sozinho? Empty Macro De Vender Cactos Sozinho? Sex Nov 07, 2014 9:25 am

iZurg

iZurg

VIP

Alguem Pode Me Passar 1 Macro Que Vende Cactos Sozinho No /warp Loja?(Se Existir)Obrigado!

#2Macro De Vender Cactos Sozinho? Empty Re: Macro De Vender Cactos Sozinho? Sex Nov 07, 2014 6:56 pm

JubileuDEV

JubileuDEV

Diretor

Marque a sethome vcacto na placa warp loja, e marque sethome cacto na farm.

Código:

$${
IF(vcacto);
LOG("&3[%PLAYER%] &6Coleta e venda &4[OFF]");
UNSET(vcacto);GUI();
STOP();
ELSE;
LOG("&3[%PLAYER%] &6Coleta e venda &2[ON]");
LOG("&3[%PLAYER%] &3Para desligar pressione %KEYNAME%");
SET(vcacto);#nslot=9;#sok=0;#sok2=0;#svazio=0;#cct=0;
ENDIF;
////////////////////////////////////////////
gui(inventory);wait(500ms);
log("&6Mantenha seu inventário &faberto!");
log("&6Preparando relatório, &faguarde...");
////////////////////////////////////////////
do;
getslotitem(%#nslot%,#id,#stack)
if(%#id%!=0);
  if(%#id%=81);
    if(%#stack%=64);
      INC(#sok,1);
      INC(#cct,64);
    else;
      INC(#cct,%#stack%);
    endif;
  else;
      INC(#sok2,1);
  endif;
else;
  INC(#svazio,1);
endif;
INC(#nslot,1);
until(%#nslot% = 45);
#lucro=%#sok%*30;
#lucro2=%#sok%*20;

log("----------------------------");
log("&6Packs de cactos completos: &f%#sok%");
log("&6Slots com outros itens: &f%#sok2%");
log("&6Quantidade atual de cactos: &f%#cct%");
log("----------------------------");
////////////////////////////////////////////
}$$
$${
////////////////////////////////////////////
 log("&6Mantenha seu inventário &faberto!");
DO;
 gui(inventory);wait(500ms);
 #nslot=9;#sok=0;#sok2=0;#svazio=0;#cct=0;
 do;
 getslotitem(%#nslot%,#id,#stack)
 if(%#id%!=0);
  if(%#id%=81);
    if(%#stack%=64);
      INC(#sok,1);
      INC(#cct,64);
    else;
      INC(#cct,%#stack%);
      INC(#svazio,1);
    endif;
  endif;
 else;
  INC(#svazio,1);
 endif;
 INC(#nslot,1);
 until(%#nslot% = 45);

 #lucro=%#sok%*30;
 #lucro2=%#sok%*20;

if(SHIFT);
 log("----------------------------");
 log("&6Quantidade atual de cactos: &f%#cct%");
 log("&6Lucro na warp vip (somente packs): &f%#lucro%");
 log("&6Lucro na warp loja (somente packs): &f%#lucro2%");
 log("----------------------------");
endif;
 
if(%#svazio%=0);
 log("----------------------------");
 log("Itens prontos para venda!");
 log("&6Quantidade atual de cactos: &f%#cct%");
 log("----------------------------");
 GUI();

}$$
/home vcacto
$${
wait(10);
 do(40);
  key(attack);
  wait(600ms);
 loop;
}$$
/home cacto
$${
wait(2);
endif;
LOOP;
}$$

https://lostpvp.forumeiros.com

#3Macro De Vender Cactos Sozinho? Empty Re: Macro De Vender Cactos Sozinho? Sex Nov 07, 2014 6:56 pm

JubileuDEV

JubileuDEV

Diretor

[sucesso=Pedido resolvido]Tópico fechado[/sucesso]

https://lostpvp.forumeiros.com

Conteúdo patrocinado


Ver o tópico anterior Ver o tópico seguinte Ir para o topo  Mensagem [Página 1 de 1]

Permissões neste sub-fórum
Não podes responder a tópicos