$${ //Topico Forum Craftlandia: //https://forum.craftlandia.com.br/xf/threads/macro-xylic-assar-legacy.957400/ //Se gostar da macro deixe um like no topico //https://forum.craftlandia.com.br/xf/posts/8377535/like //Demonstracao: //https://www.youtube.com/watch?v=rimEGMxRPBU //Como Fazer a Trap: //https://www.youtube.com/watch?v=ieqBs9T4ziA playsound(random.click,100); &versionassar="v0.8-b-a"; match(%&versionassar%,"v(.+).(.+)-(.+)-(.+)",{#assarbuild,#assarminor,&assaralbest,&abefec}); @#assarbuild=%#assarbuild%; @#assarminor=%#assarminor%; @&assaralbest=%&assaralbest%; ifmatches(%&assaralbest%,"-");&assarstability="Bleeding Edge";endif;&slx="/"; ifmatches(%&assaralbest%,"a");&assarstability="Fase Alpha";endif;&stmacro="site-> abre.ai/assar"; ifmatches(%&assaralbest%,"b");&assarstability="Fase Beta";endif; ifmatches(%&assaralbest%,"s");&assarstability="Estavel";endif; ifmatches(%&abefec%,"a");&assarliber="&6Publica";endif;&depoisdofvemo="g"; ifmatches(%&abefec%,"c");&assarliber="&cConvidados";endif;&glo=%&slx%%&depoisdofvemo%; ifmatches(%&abefec%,"f");&assarliber="&4Fechada";endif; &msge="%&glo% &5xylic &6#Assar"; @&assarstability=%&assarstability%; @&assarliber=%&assarliber%; if(@xyassar); echo("%&msge% &9v%#assarbuild%.%#assarminor% &f[&4OFF&f]"); echo("/chat on"); clearchat; log("&6&l[&5XylicAssar&6&l] &9&lAssar &9v%#assarbuild%.%#assarminor% &f&l[&4&lOFF&f&l]"); unset(@xyassar); playsound(random.burp,100); stop; else; set(@xyassar); &home="assar"; #itcru=1; #itassado=1; #fuel2=1; #vistalimpa=""; #frythis=""; #fryok=""; #vender=""; #compact=""; #vender=""; #vendminer=""; &peixevip="xylic peixeassadovip"; &ferrovip="xylic ferrovip"; &ourovip="xylic ourovip"; echo("%&msge% &9v%#assarbuild%.%#assarminor% &5%&stmacro%"); echo("/chat off"); wait(500ms); //Splash chatheight(180);chatwidth(320); &salvo=%TEXTUREPACK%;if(%TEXTUREPACK%!="Default");TEXTUREPACK(Default);endif; #cont=0; do(); if(%GUI%!="GUICHAT"); gui(chat); random(#asc,1,2); if(%#asc%=1); clearchat; log(" ");log(" "); //COLOSSAL &espacoasc=" "; log(" &l &r &l &r &c&k!!!&r&c&k!!!&r&c&k!!!&r"); log("%&espacoasc%&6Y88b d88P 888 &c&k!!!&r&9&kO&r&c&k!!!&r"); log("%&espacoasc%&6 Y88b d88P 888 &c&k!!!&r&c&k!!!&r&c&k!!!&r"); log("%&espacoasc%&6 Y88o88P &l &r&6&l &r&6&l &r&6888"); log("%&espacoasc%&6 Y888P 888 888 888 888 .d8888b"); log("%&espacoasc%&6 d888b 888 888 888 888 d8P `Y8); log("%&espacoasc%&6 d88888b 888 888 888 888 88"); log("%&espacoasc%&6 d88P Y88b 88b 888 888 888 88b .o8"); log("%&espacoasc%&6d88P Y88b &l &r&6 Y88888 888 888 Y8b8d8'"); log("%&espacoasc%&6 888 888"); log("%&espacoasc%&6 &l &r&6 Y8b d88P 888888888888888888888888"); log("%&espacoasc%&6 \"Y88P\" 888888888888888888888888"); log(" ");log(" "); elseif(%#asc%=2); clearchat; log(" ");log(" ");log(" "); //NSCRIPT &espacoasc3=" "; log("&6%&espacoasc3% ,ggg, ,gg &l &r &l &r &l &r &4.&4&k!!!!!!!&r&4. "); log("&6%&espacoasc3%dP\"\"\"Y8, ,dP' ,dPYb, &4&k!!! !!!&r "); log("&6%&espacoasc3%Yb,_ \"8b, d8\" IP'\"Yb &l &r &4`&4&k!!!!!!&r&4' "); log("&6%&espacoasc3% `\"\" Y8,,8P' I8 8I "); log("&6%&espacoasc3% Y88\" I8 8P 88 "); log("&6%&espacoasc3% ,888b gg gg &l &r&6I8 dP&l &r &l &r&l &r&6 88 ,gggg, "); log("&6%&espacoasc3% d8\" \"8b, I8 8I &l &r&6I8dP 88 dP\" \"Yb "); log("&6%&espacoasc3% ,8P' Y8, I8, ,8I I8P 88 i8' "); log("&6%&espacoasc3% d8\" \"Yb, ,d8b,&l &r&6,d8I ,d8b,_ _,88,_ d8,_ _ "); log("&6%&espacoasc3% ,8P' \"Y8 Y88P\"88 8P'\"Y88 8P Y8 Y8888PP "); log("&6%&espacoasc3% ,d8I' "); log("&6%&espacoasc3% ,dP'8I "); log("&6%&espacoasc3% ,8\" 8I "); log("&6%&espacoasc3% I8 8I "); log("&6%&espacoasc3% `8, ,8I "); log("&6%&espacoasc3% `Y8P\" "); log(" "); endif; endif; inc(#cont,1); wait(10ms); until(#cont=23); gui(); #cont=0; TEXTUREPACK(%&salvo%); clearchat; //Prompt CalculAssar #xcal=""; #xcalok=""; do();clearchat;playsound(random.click,100); log("&6&l[&5XylicAssar&6&l] &9&lO que ira fazer?"); log(""); log("&6&l[&5XylicAssar&6&l] &l &r &6&l[1] &5Assar &fv%#assarbuild%.%#assarminor%"); log("&6&l[&5CalculAssar&6&l] &6&l[2] &dCalculAssar &f[&cNovidade&f]");log(""); prompt(#xcal,$$?,"O que ira fazer?"); if((%#xcal%=1)||(%#xcal%=2)); #xcalok=1; endif; until(#xcalok=1); if(%#xcal%=2); //Calculassar //Calculassar //Calculassar //VIP #vip=""; #vipok=""; do();clearchat;playsound(random.click,100); log(""); log("&6&l[&5CalculAssar&6&l] &9Vai Assar com vip?"); log("&6&l[&5CalculAssar&6&l] "); log("&6&l[&5CalculAssar&6&l] &9[1] &fSim"); log("&6&l[&5CalculAssar&6&l] &9[2] &fNao"); log("&6&l[&5CalculAssar&6&l] &9[3] &dExplicacao do calculo"); log(""); prompt(#vip,$$?,"Conta e Vip?"); if((%#vip%=1)||(%#vip%=2)); #vipok=1; endif; if(%#vip%=3); #vipok=1; endif; until(#vipok=1); if(%#vip%=3); clearchat; log("");log(""); log(" &c&lCalculAssar");log(""); log("&6&l[&5CalculAssar&6&l] &fA macro calcula a diferenca no preco"); log("&6&l[&5CalculAssar&6&l] &fvendendo os itens assados e sem assar."); log("&6&l[&5CalculAssar&6&l] &fVip usa 23 Carvoes para cada 64 itens."); log("&6&l[&5CalculAssar&6&l] &fNao Vip usa 64 Carvoes para cada 64 itens."); log("");log("&6&l[&5CalculAssar&6&l] &6Formulas:"); log("&6&l[&5CalculAssar&6&l] &dJa tem o Carvao. Ja tem o Item:"); log("&6&l[&5CalculAssar&6&l] &fAssado &4- &fCarvao_vend+Item_vend"); log("&6&l[&5CalculAssar&6&l] &dJa tem o Carvao. Nao tem o Item:"); log("&6&l[&5CalculAssar&6&l] &fAssado-item_comp &4- &fcarvao_vend"); log("&6&l[&5CalculAssar&6&l] &dNao tem o Carvao. Ja tem o Item:"); log("&6&l[&5CalculAssar&6&l] &fAssado-carvao_comp &4- &fitem_vend"); log("&6&l[&5CalculAssar&6&l] &dNao tem o Carvao. Nao tem o Item:"); log("&6&l[&5CalculAssar&6&l] &fAssado &4- &fcarvao_comp+item_comp"); unset(@xyassar);playsound(note.hat,100); stop; endif; //Carvao #bscoal=""; #bscoalok=""; do();clearchat;playsound(random.click,100); log("&6&l[&5CalculAssar&6&l] &9Vai comprar o carvao ou ja tem?"); log("&6&l[&5CalculAssar&6&l] "); log("&6&l[&5CalculAssar&6&l] &9[1] &fSim. Ja tenho o Carvao!"); log("&6&l[&5CalculAssar&6&l] &9[2] &fNao. Ainda vou comprar o Carvao."); log(""); prompt(#bscoal,$$?,"Ja tem o Carvao?"); if((%#bscoal%=1)||(%#bscoal%=2)); #bscoalok=1; endif; until(#bscoalok=1); #coalprice=""; do();clearchat;playsound(random.click,100); if(%#bscoal%=1); log("&6&l[&5CalculAssar&6&l] &9Digite o Preco do Carvao &f[Preco p/ &4Vender&f]"); elseif(%#bscoal%=2); log("&6&l[&5CalculAssar&6&l] &9Digite o Preco do Carvao &f[Preco p/ &4Comprar&f]"); endif; log("&6&l[&5CalculAssar&6&l] "); log("&6&l[&5CalculAssar&6&l] &fSomente Valores inteiros"); log("&6&l[&5CalculAssar&6&l] &fPreco 55.50 = &455"); log(""); prompt(#coalprice,$$?,"Preco do Carvao"); until(#coalprice>0); #coalprice2=%#coalprice%; unsafe; if(%#vip%=1); do(22); inc(#coalprice,%#coalprice2%); loop; else; do(63); inc(#coalprice,%#coalprice2%); loop; endif; endunsafe; //Item Cru #bsitem=""; #bsitemok=""; do();clearchat;playsound(random.click,100); log("&6&l[&5CalculAssar&6&l] &9Vai comprar o Item Cru ou ja tem?"); log("&6&l[&5CalculAssar&6&l] "); log("&6&l[&5CalculAssar&6&l] &9[1] &fSim. Ja tenho o Item Cru!"); log("&6&l[&5CalculAssar&6&l] &9[2] &fNao. Ainda vou comprar o Item Cru."); log(""); prompt(#bsitem,$$?,"Ja tem o Item Cru?"); if((%#bsitem%=1)||(%#bsitem%=2)); #bsitemok=1; endif; until(#bsitemok=1); #itemprice=""; do();clearchat;playsound(random.click,100); if(%#bsitem%=1); log("&6&l[&5CalculAssar&6&l] &9Digite o Preco do Item Cru &f[Preco p/ &4Vender&f]"); else; log("&6&l[&5CalculAssar&6&l] &9Digite o Preco do Item Cru &f[Preco p/ &4Comprar&f]"); endif; log("&6&l[&5CalculAssar&6&l] "); log("&6&l[&5CalculAssar&6&l] &fSomente Valores inteiros"); log("&6&l[&5CalculAssar&6&l] &fPreco 20.80 = &420"); log(""); prompt(#itemprice,$$?,"Preco do Item"); until(#itemprice>0); #itemprice2=%#itemprice%; unsafe; do(63); inc(#itemprice,%#itemprice2%); loop; endunsafe; //Item Assado #bricks=""; #bricksok=""; do();clearchat;playsound(random.click,100); log("&6&l[&5CalculAssar&6&l] &9O item é Tijolos?"); log("&6&l[&5CalculAssar&6&l] &cAssar 64 Bolas de Argila->16 blocos de Tijolos"); log("&6&l[&5CalculAssar&6&l] &cAssar 64 Peixes->64 Peixes Assados");log(""); log("&6&l[&5CalculAssar&6&l] &9[1] &fSim. Vou fazer &cT&fi&cj&fo&cl&fo&cs!"); log("&6&l[&5CalculAssar&6&l] &9[2] &fNao. Vou fazer outra coisa.");log(""); prompt(#bricks,$$?,"Tijolos?"); if((%#bricks%=1)||(%#bricks%=2)); #bricksok=1; endif; until(#bricksok=1); #sellprice=""; do();clearchat;playsound(random.click,100); log("&6&l[&5CalculAssar&6&l] &9Digite o Preco de venda do Item &4Assado"); log("&6&l[&5CalculAssar&6&l] "); log("&6&l[&5CalculAssar&6&l] &fSomente Valores inteiros"); log("&6&l[&5CalculAssar&6&l] &fPreco 150.80 = &4150"); log(""); prompt(#sellprice,$$?,"Preco do Item Assado"); until(#sellprice>0); #sellprice2=%#sellprice%; unsafe; if(%#bricks%=1); do(15); inc(#sellprice,%#sellprice2%); loop; else; do(63); inc(#sellprice,%#sellprice2%); loop; endif; endunsafe; //Calculo clearchat; #vara="";#varb=""; #varc="";#vard=""; #vare="";#varf=""; #varg="";#varh=""; #profitassar=""; if((%#bscoal%=1)&&(%#bsitem%=1)); #vara=#coalprice+#itemprice; #varb=#sellprice-#vara; #profitassar=%#varb%; unsafe; do(25); inc(#profitassar,%#varb%); loop; endunsafe; endif; if((%#bscoal%=1)&&(%#bsitem%=2)); #varc=#sellprice-#coalprice; #vard=#varc-#itemprice; #profitassar=%#vard%; unsafe; do(25); inc(#profitassar,%#vard%); loop; endunsafe; endif; if((%#bscoal%=2)&&(%#bsitem%=1)); #vare="";#varf=""; #vare=#sellprice-#coalprice; #varf=#vare-#itemprice; #profitassar=%#varf%; unsafe; do(25); inc(#profitassar,%#varf%); loop; endunsafe; endif; if((%#bscoal%=2)&&(%#bsitem%=2)); #varg="";#varh=""; #varg=#coalprice+#itemprice; #varh=#sellprice-#varg; #profitassar=%#varh%; unsafe; do(25); inc(#profitassar,%#varh%); loop; endunsafe; endif; if(%#profitassar%>0); log("");log("");log(""); log("&6&l[&5CalculAssar&6&l] O &2&lLucro &6&lsera de:"); if(%#profitassar%<101); &valor=" &l &r &l &r &5&k!!!!!&r&2%#profitassar% Coins&5&k!!!!!"; elseif((%#profitassar%>100)&&(%#profitassar%<1001)); &valor=" &5&k!!!!!&r&2%#profitassar% Coins&5&k!!!!!"; elseif((%#profitassar%>1000)&&(%#profitassar%<10001)); &valor=" &5&k!!!!!&r&2%#profitassar% Coins&5&k!!!!!"; elseif((%#profitassar%>10000)&&(%#profitassar%<100001)); &valor=" &l &r &5&k!!!!!&r&2%#profitassar% Coins&5&k!!!!!"; elseif((%#profitassar%>100000)&&(%#profitassar%<1000001)); &valor=" &5&k!!!!!&r&2%#profitassar% Coins&5&k!!!!!"; elseif(%#profitassar%>1000000); &valor=" &5&k!!!!&r&2%#profitassar% Coins&5&k!!!"; endif; log("&6&l[&5CalculAssar&6&l] &5&k!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!"); log("&6&l[&5CalculAssar&6&l]%&valor%"); log("&6&l[&5CalculAssar&6&l] &5&k!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!"); log("&6&l[&5CalculAssar&6&l] A cada &b&l26 &6&lPacks assados:"); log("");log("");log(""); do(3);playsound(random.orb,100);wait(50ms);loop; unset(@xyassar);stop; else; log("");log("");log(""); log("&6&l[&5CalculAssar&6&l] A &4&lPerda &6&lsera de:"); if(%#profitassar%>-101); &valor=" &5&k!!!!!&r&4%#profitassar% Coins&5&k!!!!!"; elseif((%#profitassar%<-100)&&(%#profitassar%>-1001)); &valor=" &5&k!!!!!&r&4%#profitassar% Coins&5&k!!!!!"; elseif((%#profitassar%<-1000)&&(%#profitassar%>-10001)); &valor=" &l &r &5&k!!!!!&r&4%#profitassar% Coins&5&k!!!!!"; elseif((%#profitassar%<-10000)&&(%#profitassar%>-100001)); &valor=" &5&k!!!!!&r&4%#profitassar% Coins&5&k!!!!!"; elseif((%#profitassar%<-100000)&&(%#profitassar%>-1000001)); &valor=" &5&k!!!!&r&4%#profitassar% Coins&5&k!!!"; elseif(%#profitassar%<-1000000); &valor="&l &r&l &r &5&k!!!&r&4%#profitassar% Coins&5&k!!!"; endif; log("&6&l[&5CalculAssar&6&l] &5&k!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!"); log("&6&l[&5CalculAssar&6&l]%&valor%"); log("&6&l[&5CalculAssar&6&l] &5&k!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!"); log("&6&l[&5CalculAssar&6&l] A cada &b&l26 &6&lPacks assados:"); log("");log("");log(""); do(3);playsound(note.bass,100);wait(50ms);loop; unset(@xyassar);stop; endif; //Calculassar //Calculassar //Calculassar elseif(%#xcal%=1); //Prompt Item do(); clearchat;playsound(random.orb,100); log("&6&l[&5XylicAssar&6&l] &9&lDigite o &6&lNumero &9&lequivalente ao item:");log(" "); log("&6&l[&5XylicAssar&6&l] &6&l[1] &3Peixe -> Peixe Assado"); log("&6&l[&5XylicAssar&6&l] &6&l[2] &7Minerio de Ferro -> Barra de Ferro"); log("&6&l[&5XylicAssar&6&l] &6&l[3] &6Minerio de Ouro -> Barra de Ouro"); log("&6&l[&5XylicAssar&6&l] &6&l[4] &eAreia -> Vidro"); log("&6&l[&5XylicAssar&6&l] &6&l[5] &8Pedregulho -> Pedra"); log("&6&l[&5XylicAssar&6&l] &6&l[6] &2Cacto -> Tinta Verde"); log("&6&l[&5XylicAssar&6&l] &6&l[7] &7&lArgila -> Tijolo"); log("&6&l[&5XylicAssar&6&l] &6&l[8] &cMinerio de Diamante -> Diamante"); log(" "); prompt(#frythis,$$?,"Digite o Numero equivalente ao item"); if((%#frythis%>0)&&(%#frythis%<9)); #fryok=1; endif; until(#fryok=1); //Prompt vender ou guardar peixe #vendeguarda=""; #vengua=""; if(%#frythis%=1); playsound(random.splash,100); do(); clearchat; log("&6&l[&5XylicAssar&6&l] &9&lGostaria de &3Vender &9ou &bGuardar &9&lo Peixe?");log(" "); log("&6&l[&5XylicAssar&6&l] &6&l[1] &9Guardar"); log("&6&l[&5XylicAssar&6&l] &6&l[2] &9Vender"); log(" ");playsound(random.click,100); prompt(#vendeguarda,$$?,"Digite o Numero equivalente ao item"); if((%#vendeguarda%>0)&&(%#vendeguarda%<3)); #vengua=1; endif; until(#vengua=1); &homevenda=%&peixevip%;#poxvenda=734;#pozvenda=673; endif; if(%#vendeguarda%=2);#vender=1;else;#vender=0;endif; //Prompts minerios (vender/compactar) if((%#frythis%=2)||(%#frythis%=3)||(%#frythis%=8)); if(%#frythis%=8); #vendminer=2; else; //Vender #vendminer=""; #vndmnr=""; do(); clearchat;playsound(random.click,100); if(%#frythis%=2); log("&6&l[&5XylicAssar&6&l] &9&lVender o &7&lFerro? &f(&cWarp Vip&f)");log(" "); elseif(%#frythis%=3); log("&6&l[&5XylicAssar&6&l] &9&lVender o &6&lOuro? &f(&cWarp Vip&f)");log(" "); endif; log("&6&l[&5XylicAssar&6&l] &6&l[1] &9SIM"); log("&6&l[&5XylicAssar&6&l] &6&l[2] &9NAO"); log(" "); prompt(#vendminer,$$?,"Digite o Numero equivalente a Opcao"); if((%#vendminer%>0)&&(%#vendminer%<3)); #vndmnr=1; endif; until(#vndmnr=1); endif; #compact=""; #cmpct=""; if(%#vendminer%=2); #vender=0; do(); clearchat;playsound(random.click,100); if(%#frythis%=2); //log("&6&l[&5XylicAssar&6&l] &9&lCompactar o &7&lFerro &9&lpara &7&lBlocos?");//log(" "); log("&6&l[&5XylicAssar&6&l] &9Guardar o &7&lFerro &cCompactado &9em &cBlocos?");log(" "); elseif(%#frythis%=3); //log("&6&l[&5XylicAssar&6&l] &9&lCompactar o &6&lOuro &9&lpara &6&lBlocos?");log(" "); log("&6&l[&5XylicAssar&6&l] &9Guardar o &6&lOuro &cCompactado &9em &cBlocos?");log(" "); elseif(%#frythis%=8); log("&6&l[&5XylicAssar&6&l] &9Guardar o &3&lDiamante &cCompactado &9em &cBlocos?");log(" "); endif; log("&6&l[&5XylicAssar&6&l] &6&l[1] &9SIM"); log("&6&l[&5XylicAssar&6&l] &6&l[2] &9NAO"); log(" "); prompt(#compact,$$?,"Digite o Numero equivalente a Opcao"); if((%#compact%>0)&&(%#compact%<3)); #cmpct=1; endif; until(#cmpct=1); else; #vender=1; if(%#frythis%=2); &homevenda=%&ferrovip%;#poxvenda=687;#pozvenda=637; endif; if(%#frythis%=3); &homevenda=%&ourovip%;#poxvenda=686;#pozvenda=637; endif; endif; endif; clearchat; Log(" ");Log("&6&l[&5XylicAssar&6&l] &9&lAssar &9v%#assarbuild%.%#assarminor% &c%&assarstability% &6%&assarliber% &f&l[&2&lON&f&l]");log(" "); if(%#frythis%=1); #item=349; if(%#vender%!=1); Log("&6&l[&5XylicAssar&6&l] &9Assando &6Peixe &f[&cGuardar&f]"); else; Log("&6&l[&5XylicAssar&6&l] &9Assando &6Peixe &f[&cVender&f]"); endif; &itemname="o Peixe"; elseif(%#frythis%=2); #item=15; if(%#compact%=1); Log("&6&l[&5XylicAssar&6&l] &9Assando &6Ferro &f[&cGuardar Blocos&f]"); else; if(%#vender%=1); Log("&6&l[&5XylicAssar&6&l] &9Assando &6Ferro &f[&cVender&f]"); else; Log("&6&l[&5XylicAssar&6&l] &9Assando &6Ferro &f[&cGuardar&f]"); endif; endif; &itemname="o Ferro"; elseif(%#frythis%=3); #item=14; if(%#compact%=1); Log("&6&l[&5XylicAssar&6&l] &9Assando &6Ouro &f[&cGuardar Blocos&f]"); else; if(%#vender%=1); Log("&6&l[&5XylicAssar&6&l] &9Assando &6Ouro &f[&cVender&f]"); else; Log("&6&l[&5XylicAssar&6&l] &9Assando &6Ouro &f[&cGuardar&f]"); endif; endif; &itemname="o Ouro"; elseif(%#frythis%=4); #item=12; Log("&6&l[&5XylicAssar&6&l] &9Assando &6Areia"); &itemname="a Areia"; elseif(%#frythis%=5); #item=4; Log("&6&l[&5XylicAssar&6&l] &9Assando &6Pedregulho"); &itemname="o Pedregulho"; elseif(%#frythis%=6); #item=81; Log("&6&l[&5XylicAssar&6&l] &9Assando &6Cacto"); &itemname="o Cacto"; elseif(%#frythis%=7); #item=337; Log("&6&l[&5XylicAssar&6&l] &9Assando &6Argila"); &itemname="a Argila"; elseif(%#frythis%=8); #item=56; if(%#compact%=1); Log("&6&l[&5XylicAssar&6&l] &9Assando &6Diamante &f[&cGuardar Blocos&f]"); else; Log("&6&l[&5XylicAssar&6&l] &9Assando &6Diamante &f[&cGuardar&f]"); endif; &itemname="o Diamante"; endif; echo("/home %&home%"); do(); wait(); until((%HITID%=54)||(%HITID%=146)); wait(500ms); if(%DIRECTION%="N");&front="north";&right="east";&back="south";&left="west";endif; if(%DIRECTION%="E");&front="east";&right="south";&back="west";&left="north";endif; if(%DIRECTION%="W");&front="west";&right="north";&back="east";&left="south";endif; if(%DIRECTION%="S");&front="south";&right="west";&back="north";&left="east";endif; look(%&back%); wait(80ms); #nospace=""; #beginstor=""; #vazio=""; unsafe; gui(inventory); for(#slt,9,44); getslotitem(%#slt%,#idit); if(%#idit%=0); inc(#vazio,1); else; inc(#beginstor,1); endif; next; endunsafe; gui(); wait(150ms); #tresmais=""; if(%#vazio%>2);#tresmais=1;else;#tresmais=0;endif; if(%#tresmais%=0); look(%&back%);look(,60); wait(50ms); do(); wait(30ms); until((%HITID%=54)||(%HITID%=146)); wait(100ms); key(use); do(); wait(20ms); until(%GUI%="GUICHEST"); wait(200ms); unsafe; for(#startslt,54,89); slotclick(%#startslt%,l,true); wait(); next; wait(80ms); endunsafe; gui(); wait(100ms); echo("/fornalha vip"); do(); wait(15ms); until(%GUI%="GUIFURNACE"); wait(125ms); slotclick(0,l,true);wait(50ms); slotclick(1,l,true);wait(50ms); slotclick(2,l,true);wait(50ms); #beginstor=""; unsafe; for(#slt,3,38); getslotitem(%#slt%,#idit); if(%#idit%=0); else; inc(#beginstor,1); endif; next; endunsafe; if(%#beginstor%>0); gui(); look(%&back%);look(,60); wait(20ms); do(); wait(30ms); until((%HITID%=54)||(%HITID%=146)); wait(100ms); key(use); do(); wait(20ms); until(%GUI%="GUICHEST"); wait(100ms); unsafe; for(#startslt,54,89); slotclick(%#startslt%,l,true); wait(2ms); next; wait(50ms); endunsafe; gui(); wait(80ms); else; gui(); wait(80ms); endif; else; echo("/fornalha vip"); do(); wait(15ms); until(%GUI%="GUIFURNACE"); wait(125ms); slotclick(0,l,true);wait(50ms); slotclick(1,l,true);wait(50ms); slotclick(2,l,true);wait(50ms); #beginstor=""; unsafe; for(#slt,3,38); getslotitem(%#slt%,#idit); if(%#idit%=0); else; inc(#beginstor,1); endif; next; endunsafe; if(%#beginstor%>0); gui(); look(%&back%);look(,60); wait(20ms); do(); wait(30ms); until((%HITID%=54)||(%HITID%=146)); wait(100ms); key(use); do(); wait(20ms); until(%GUI%="GUICHEST"); wait(200ms); unsafe; for(#startslt,54,89); slotclick(%#startslt%,l,true); wait(1ms); next; wait(50ms); endunsafe; gui(); wait(50ms); else; gui(); wait(50ms); endif; endif; wait(100ms); if(%&msge%!="/g &5xylic &6#Assar"); clearchat; log("&6&l[&5XylicAssar&6&l] &9&lMacro editada. &4FINALIZANDO &f&l[&4&lOFF&f&l]"); do(10);playsound(note.bass,100);wait(2ms);loop; unset(@xyassar); stop; else; do(); do(); if(%#itcru%=1);look(%&left%);look(-48,333);endif; if(%#itcru%=2);look(%&left%);look(-48,346);endif; if(%#itcru%=3);look(%&left%);look(-48,);endif; if(%#itcru%=4);look(%&left%);look(-48,+15);endif; if(%#itcru%=5);look(%&left%);look(-48,+28);endif; if(%#itcru%=6);look(%&left%);look(-38,329);endif; if(%#itcru%=7);look(%&left%);look(-38,343);endif; if(%#itcru%=8);look(%&left%);look(-38,);endif; if(%#itcru%=9);look(%&left%);look(-38,+17);endif; if(%#itcru%=10);look(%&left%);look(-38,+32);endif; if(%#itcru%=11);look(%&left%);look(-22,325);endif; if(%#itcru%=12);look(%&left%);look(-22,340);endif; if(%#itcru%=13);look(%&left%);look(-22,);endif; if(%#itcru%=14);look(%&left%);look(-22,+20);endif; if(%#itcru%=15);look(%&left%);look(-22,+36);endif; if(%#itcru%=16);look(%&left%);look(,322);endif; if(%#itcru%=17);look(%&left%);look(,340);endif; if(%#itcru%=18);look(%&left%);endif; if(%#itcru%=19);look(%&left%);look(,+21);endif; if(%#itcru%=20);look(%&left%);look(,+38);endif; if(%#itcru%=21);look(%&left%);look(+21,325);endif; if(%#itcru%=22);look(%&left%);look(+21,340);endif; if(%#itcru%=23);look(%&left%);look(+21,);endif; if(%#itcru%=24);look(%&left%);look(+21,+20);endif; if(%#itcru%=25);look(%&left%);look(+21,+36);endif; if(%#itcru%=26);look(%&left%);look(+37,329);endif; if(%#itcru%=27);look(%&left%);look(+37,343);endif; if(%#itcru%=28);look(%&left%);look(+37,);endif; if(%#itcru%=29);look(%&left%);look(+37,+18);endif; if(%#itcru%=30);look(%&left%);look(+37,+32);endif; if(%#itcru%=31);look(%&left%);look(+49,333);endif; if(%#itcru%=32);look(%&left%);look(+49,346);endif; if(%#itcru%=33);look(%&left%);look(+49,);endif; if(%#itcru%=34);look(%&left%);look(+49,+15);endif; if(%#itcru%=35);look(%&left%);look(+49,+27);endif; wait(120ms); do(); wait(40ms); until((%HITID%=54)||(%HITID%=146)); key(use); do(); wait(30ms); until(%GUI%="GUICHEST"); wait(200ms); #slotpeixe=0; #enchi=0; unsafe; do(); getslotitem(64,#fullpeixe); if(%#fullpeixe%=%#item%); #enchi=1; else; getslotitem(%#slotpeixe%,#peixeclick); if(%#peixeclick%=%#item%); slotclick(%#slotpeixe%,l,true); inc(#slotpeixe,1); wait(7ms); else; inc(#slotpeixe,1); endif; endif; until((#enchi=1)||(%#slotpeixe%>53)); endunsafe; gui(); do(); wait(10ms); until(%GUI%!="GUICHEST"); wait(400ms); if(%#slotpeixe%>53); if(%#itcru%>35); look(%&left%);look(+49,+27); wait(120ms); do(); wait(40ms); until((%HITID%=54)||(%HITID%=146)); key(use); do(); wait(30ms); until(%GUI%="GUICHEST"); wait(150ms); unsafe; for(#fimsemitem,64,89); slotclick(%#fimsemitem%,l,true); wait(15ms); next; endunsafe; unset(@xyassar); log("&6&l[&5XylicAssar&6&l] &cERRO &6&l2"); log("&6&l[&5XylicAssar&6&l] &cAcabou &9%&itemname%"); log("&6&l[&5XylicAssar&6&l] &9&lAssar &f&l[&4&lOFF&f&l]"); gui(); stop; else; inc(#itcru,1); endif; endif; until(#fullpeixe=%#item%); //Carvao do(); if(%#fuel2%=1);look(%&front%);look(-28,334);endif; if(%#fuel2%=2);look(%&front%);look(-28,347);endif; if(%#fuel2%=3);look(%&front%);look(-28,);endif; if(%#fuel2%=4);look(%&front%);look(-28,+14);endif; if(%#fuel2%=5);look(%&front%);look(-28,+26);endif; if(%#fuel2%=6);look(%&front%);look(-16,332);endif; if(%#fuel2%=7);look(%&front%);look(-16,346);endif; if(%#fuel2%=8);look(%&front%);look(-16,);endif; if(%#fuel2%=9);look(%&front%);look(-16,+15);endif; if(%#fuel2%=10);look(%&front%);look(-16,+28);endif; if(%#fuel2%=11);look(%&front%);look(,332);endif; if(%#fuel2%=12);look(%&front%);look(,345);endif; if(%#fuel2%=13);look(%&front%);endif; if(%#fuel2%=14);look(%&front%);look(,+16);endif; if(%#fuel2%=15);look(%&front%);look(,+29);endif; if(%#fuel2%=16);look(%&front%);look(+15,332);endif; if(%#fuel2%=17);look(%&front%);look(+15,346);endif; if(%#fuel2%=18);look(%&front%);look(+15,);endif; if(%#fuel2%=19);look(%&front%);look(+15,+15);endif; if(%#fuel2%=20);look(%&front%);look(+15,+28);endif; if(%#fuel2%=21);look(%&front%);look(+28,335);endif; if(%#fuel2%=22);look(%&front%);look(+28,347);endif; if(%#fuel2%=23);look(%&front%);look(+28,);endif; if(%#fuel2%=24);look(%&front%);look(+28,+14);endif; if(%#fuel2%=25);look(%&front%);look(+28,+27);endif; wait(120ms); do(); wait(40ms); until((%HITID%=54)||(%HITID%=146)); key(use); do(); wait(30ms); until(%GUI%="GUICHEST"); wait(200ms); #slotcarvao=0; #enchi2=0; unsafe; do(); getslotitem(54,#fullcarvao,#carvaoqntd); //if((%#fullcarvao%=263)&&(%#carvaoqntd%>21)); if((%#fullcarvao%=263)&&(%#carvaoqntd%>22)); #enchi2=1; else; getslotitem(%#slotcarvao%,#carvaoclick); if(%#carvaoclick%=263); slotclick(%#slotcarvao%,l,true); inc(#slotcarvao,1); wait(7ms); else; inc(#slotcarvao,1); endif; endif; until((#enchi2=1)||(%#slotcarvao%>53)); endunsafe; gui(); do(); wait(10ms); until(%GUI%!="GUICHEST"); wait(400ms); if(%#slotcarvao%>53); if(%#fuel2%>25); look(%&left%);look(+49,+27); wait(120ms); do(); wait(40ms); until((%HITID%=54)||(%HITID%=146)); key(use); do(); wait(30ms); until(%GUI%="GUICHEST"); wait(150ms); unsafe; for(#fimsemitem,64,89); slotclick(%#fimsemitem%,l,true); wait(15ms); next; endunsafe; gui();wait(120ms); look(%&front%);look(+28,+27); wait(120ms); do(); wait(40ms); until((%HITID%=54)||(%HITID%=146)); key(use); do(); wait(30ms); until(%GUI%="GUICHEST"); wait(150ms); unsafe; for(#fimsemitem,54,63); slotclick(%#fimsemitem%,l,true); wait(15ms); next; endunsafe; unset(@xyassar); log("&6&l[&5XylicAssar&6&l] &cERRO &6&l639"); log("&6&l[&5XylicAssar&6&l] &cAcabou &9Carvao"); log("&6&l[&5XylicAssar&6&l] &9&lAssar &f&l[&4&lOFF&f&l]"); gui(); stop; else; inc(#fuel2,1); endif; endif; until(#fullcarvao=263); //Fornalha look(%&right%); echo("/fornalha vip"); do(); wait(15ms); until(%GUI%="GUIFURNACE"); wait(180ms); //Cozinhar #cozid=0; do(); //Carvao #refilcarvao=3; unsafe; do(); if(%GUI%="GUIFURNACE"); else; echo("/fornalha vip"); wait(800ms); endif; getslotitem(1,#fuelnace,#fuelqnt); if(%#fuelqnt%<23); if(%#refilcarvao%>12); clearchat; do(6);playsound(mob.bat.death,66);wait(70ms);loop; log(""); log("&6&l[&5XylicAssar&6&l] &4&lERRO CRITICO."); log("&6&l[&5XylicAssar&6&l] &4&lERRO CRITICO."); log("&6&l[&5XylicAssar&6&l] &6O Servidor lagou e a macro pegou pouco carvao"); log("&6&l[&5XylicAssar&6&l] &4&lERRO CRITICO."); log("&6&l[&5XylicAssar&6&l] &4&lERRO CRITICO."); log(""); unset(@xyassar); gui(); stop; else; getslotitem(%#refilcarvao%,#refuel); if(%#refuel%=263); slotclick(%#refilcarvao%,l,true); wait(10ms); endif; inc(#refilcarvao,1); endif; endif; until(#fuelqnt>22); endunsafe; //Item Cru if(%GUI%="GUIFURNACE"); else; echo("/fornalha vip"); wait(800ms); endif; wait(100ms); #sltcru=13; do(); #clicked=0; do(); if(%#sltcru%>38); #clicked=1; else; getslotitem(%#sltcru%,#itemraw); if(%#itemraw%=%#item%); slotclick(%#sltcru%,l,true); wait(150ms); unsafe; #debugzero=0; do(); if(%GUI%="GUIFURNACE"); else; echo("/fornalha vip"); wait(800ms); endif; if(%#debugzero%>15); log("&6&l[&5XylicAssar&6&l] &6Desbugando."); slotclick(%#sltcru%,l,true); wait(150ms); slotclick(0,l,false); wait(200ms); slotclick(%#sltcru%,l,false); wait(200ms); slotclick(%#sltcru%,l,true); wait(100ms); #debugzero=0; else; getslotitem(0,#itesla); getslotitem(2,#iteslb); inc(#debugzero,1); endif; until((#itesla!=0)||(#iteslb!=0)); #debugzero=0; endunsafe; #clicked=1; endif; inc(#sltcru,1); endif; until(#clicked=1); do(); getslotitem(2,#itemcook); wait(15ms); until((#itemcook!=0)||(#sltcru>38)); wait(80ms); if(%#itemcook%=0); else; slotclick(2,l,true); inc(#cozid,1); wait(80ms); endif; do(); slotclick(2,l,true); wait(50ms); getslotitem(2,#itemcook); until(%#itemcook%=0); until((#itemcook=0)||(#sltcru>38)); until((#cozid=26)||(#sltcru>38)); do(); slotclick(2,l,true); wait(80ms); getslotitem(2,#itemcook); until(%#itemcook%=0); do(); slotclick(1,l,true); wait(100ms); getslotitem(1,#desbcarvao); until(#desbcarvao=0); gui(); wait(200ms); //Limpando Carvoes do Inventario do(1); if(%#fuel2%=1);look(%&front%);look(-28,334);endif; if(%#fuel2%=2);look(%&front%);look(-28,347);endif; if(%#fuel2%=3);look(%&front%);look(-28,);endif; if(%#fuel2%=4);look(%&front%);look(-28,+14);endif; if(%#fuel2%=5);look(%&front%);look(-28,+26);endif; if(%#fuel2%=6);look(%&front%);look(-16,332);endif; if(%#fuel2%=7);look(%&front%);look(-16,346);endif; if(%#fuel2%=8);look(%&front%);look(-16,);endif; if(%#fuel2%=9);look(%&front%);look(-16,+15);endif; if(%#fuel2%=10);look(%&front%);look(-16,+28);endif; if(%#fuel2%=11);look(%&front%);look(,332);endif; if(%#fuel2%=12);look(%&front%);look(,345);endif; if(%#fuel2%=13);look(%&front%);endif; if(%#fuel2%=14);look(%&front%);look(,+16);endif; if(%#fuel2%=15);look(%&front%);look(,+29);endif; if(%#fuel2%=16);look(%&front%);look(+15,332);endif; if(%#fuel2%=17);look(%&front%);look(+15,346);endif; if(%#fuel2%=18);look(%&front%);look(+15,);endif; if(%#fuel2%=19);look(%&front%);look(+15,+15);endif; if(%#fuel2%=20);look(%&front%);look(+15,+28);endif; if(%#fuel2%=21);look(%&front%);look(+28,335);endif; if(%#fuel2%=22);look(%&front%);look(+28,347);endif; if(%#fuel2%=23);look(%&front%);look(+28,);endif; if(%#fuel2%=24);look(%&front%);look(+28,+14);endif; if(%#fuel2%=25);look(%&front%);look(+28,+27);endif; wait(120ms); do(); wait(40ms); until((%HITID%=54)||(%HITID%=146)); key(use); do(); wait(20ms); until(%GUI%="GUICHEST"); wait(200ms); unsafe; do(2); for(#arrumacoal,54,89); getslotitem(%#arrumacoal%,#arrumacarvao); if(%#arrumacarvao%=263); slotclick(%#arrumacoal%,l,true); wait(10ms); endif; wait(10ms); next; loop; endunsafe; loop; //Bau Carvão Cheio - Placas de Compra wait(200ms); slotclick(63,l,false); wait(25ms); slotclick(62,l,false); gui(); wait(180ms); if(%#vender%=1); echo("/home %&homevenda%"); do(); wait(); until((%XPOS%=%#poxvenda%)&&(%ZPOS%=%#pozvenda%)); wait(100ms); if(%#vistalimpa%=1); else; echo("/esconder"); echo("/menuloja off"); #vistalimpa=1; endif; do(); slot(9); ifmatches(%HIT%,"TILE"); do(2); key(attack); wait(20ms); loop; #vendi=1; else; ifmatches(%HIT%,"PLAYER"); &plname=%HITNAME%; echo("/esconder"); echo("/tell @%&plname% [XylicMacro] Com licenca %&plname% voce esta na minha frente, preciso vender. Obrigado"); wait(500ms); endif; endif; wait(250ms); do(); if(%ITEM%=%#item%); inventorydown(1); endif; until(%ITEM%!=%#item%); until(%ITEM%=0); echo("/home %&home%"); do(); wait(); until((%HITID%=54)||(%HITID%=146)); wait(250ms); else; if(%#compact%=1); echo("/compactar -a"); wait(350ms); endif; //Guardar do(); if(%#itassado%=1);look(%&right%);look(-48,333);endif; if(%#itassado%=2);look(%&right%);look(-48,346);endif; if(%#itassado%=3);look(%&right%);look(-48,);endif; if(%#itassado%=4);look(%&right%);look(-48,+15);endif; if(%#itassado%=5);look(%&right%);look(-48,+28);endif; if(%#itassado%=6);look(%&right%);look(-38,329);endif; if(%#itassado%=7);look(%&right%);look(-38,343);endif; if(%#itassado%=8);look(%&right%);look(-38,);endif; if(%#itassado%=9);look(%&right%);look(-38,+17);endif; if(%#itassado%=10);look(%&right%);look(-38,+32);endif; if(%#itassado%=11);look(%&right%);look(-22,325);endif; if(%#itassado%=12);look(%&right%);look(-22,340);endif; if(%#itassado%=13);look(%&right%);look(-22,);endif; if(%#itassado%=14);look(%&right%);look(-22,+20);endif; if(%#itassado%=15);look(%&right%);look(-22,+36);endif; if(%#itassado%=16);look(%&right%);look(,322);endif; if(%#itassado%=17);look(%&right%);look(,340);endif; if(%#itassado%=18);look(%&right%);endif; if(%#itassado%=19);look(%&right%);look(,+21);endif; if(%#itassado%=20);look(%&right%);look(,+38);endif; if(%#itassado%=21);look(%&right%);look(+21,325);endif; if(%#itassado%=22);look(%&right%);look(+21,340);endif; if(%#itassado%=23);look(%&right%);look(+21,);endif; if(%#itassado%=24);look(%&right%);look(+21,+20);endif; if(%#itassado%=25);look(%&right%);look(+21,+36);endif; if(%#itassado%=26);look(%&right%);look(+37,329);endif; if(%#itassado%=27);look(%&right%);look(+37,343);endif; if(%#itassado%=28);look(%&right%);look(+37,);endif; if(%#itassado%=29);look(%&right%);look(+37,+18);endif; if(%#itassado%=30);look(%&right%);look(+37,+32);endif; if(%#itassado%=31);look(%&right%);look(+49,333);endif; if(%#itassado%=32);look(%&right%);look(+49,346);endif; if(%#itassado%=33);look(%&right%);look(+49,);endif; if(%#itassado%=34);look(%&right%);look(+49,+15);endif; if(%#itassado%=35);look(%&right%);look(+49,+28);endif; if(%#itassado%>35); unset(@xyassar); log("&6&l[&5XylicAssar&6&l] &cERRO &6&l112"); log("&6&l[&5XylicAssar&6&l] &cAcabou &9o espaco para guardar"); log("&6&l[&5XylicAssar&6&l] &9&lAssar &f&l[&4&lOFF&f&l]"); gui(); stop; endif; wait(120ms); do(); wait(40ms); until((%HITID%=54)||(%HITID%=146)); key(use); do(); wait(30ms); until(%GUI%="GUICHEST"); wait(150ms); unsafe; for(#storeslot,64,89); getslotitem(%#storeslot%,#guardaroun); if(%#guardaroun%=0); else; if(%#guardaroun%=%#item%); log(""); log("&6&l[&5XylicAssar&6&l] &6&lErro nao Critico."); log("&6&l[&5XylicAssar&6&l] &4O Servidor lagou e nao assou esse item."); log("&6&l[&5XylicAssar&6&l] &4Voce precisara remover manualmente depois."); log("&6&l[&5XylicAssar&6&l] &6&lErro nao Critico."); log(""); endif; slotclick(%#storeslot%,l,true); wait(10ms); endif; next; endunsafe; if(%#compact%=1); getslotitem(80,#storeme); getslotitem(81,#storeme2); getslotitem(82,#storeme3); getslotitem(83,#storeme4); else; getslotitem(89,#storeme); getslotitem(88,#storeme2); getslotitem(87,#storeme3); getslotitem(86,#storeme4); endif; if((%#storeme%=0)&&(#storeme2=0)&&(#storeme3=0)&&(#storeme4=0)); else; inc(#itassado,1); endif; gui(); wait(250ms); until((%#storeme%=0)&&(#storeme2=0)&&(#storeme3=0)&&(#storeme4=0)); endif; wait(300ms); until(#itcru>35); endif; endif; endif; //Changelog //0.2 prompt escolher item. outros itens add. //0.3 prompt guardar item ou vender warp vip. tempos enxugados //0.4 compactar minerios, adicionado argila, logs de alguns erros, pequenos debugs //0.5 tempos enxugados, limpeza inicial, venda de minerios na warp vip //0.6 assar dima //0.7 Calculassar, debug por nao conseguir vender totalmente //0.8 Bug guardar carvão com bau cheio (bau com placas de compra) //0.8 2023, adicionado encurtador no lugar do host expirado //0.9 //0.10 }$$