Macro - Reparar Arcos TRAP INFINITA MKB - compra linha por home (v2)

MrBlueees · 1 Junho 2022

Salve rapazeada!
Liberando aqui uma macro que achei muito difícil de conseguir... Boa pra upar de 100 à 1000 de rep. Usei pra pegar 300 só, em um dia com uns 100 baús duplos de arco no vermelho.

Toda postagem que eu encontrei ou era pago, ou não funcionava ou era versão trial que pra tu pegar tem que mandar pv pro cara de uma postagem de 1 ano atrás, sem nem saber se estão ativos... E aí vem modpack que não funciona com o antihack e sei lá, meio que saiu do propósito desse jogo.

Acho que a Craftlandia tem um modo diferente de jogar minecraft. É um servidor que crianças aprendem o que é programação, scripts, editar variáveis... Para serem melhores no jogo é necessário criarem artimanhas dentro do servidor, com macros cabulosas que vendem e guardam tudo sozinhas, ainda por cima já reconectam e tudo mais.

Lembro da época em que esse servidor tinha os caras mais brabos em programação de macros (tudo criança de 10~15 anos) e que eles traziam suas ideias/macros gratuitamente pro público.

Talvez a gente precise incentivar que os mais novos cheguem e tomem liberdade para criar coisas novas, faz anos que vejo só postagens antigas... Ou quem sabe até mudar algumas mecânicas e lugares do servidor, para novos criadores de macros surgirem. Acho que geral está acomodado baixando tudo pronto, sendo que na minha época a macro de pesca nem reparava, foram várias versões diferentes que foram surgindo mês a mês, uma melhorando a outra.

Estou de volta por pouco tempo, mas o que eu for fazendo de macros disponibilizo para vocês aqui.

FUNÇÕES DA MACRO:
+ Upa reparação com arco no vermelho
+ Baús infinitos MKB
+ Compra linha na /home linha caso você não tenha mais
+ Finaliza a macro quando acabar os baús
+ Todos Delays já pré-otimizados
+ Verifica quando a linha acabou: (ONCHAT DO SLEEP)
+ Não precisa setar home pra começar, basta iniciar a macro na coluna de baús que você quer começar a reparar.

TUTORIAL:
Não sabe como instalar macros? Confira o Tutorial do Sleep!

CÓDIGO:
Clique aqui para abrir o código.

-----------
Changelog:
04-06-2022 às 10:45 - Macro atualizada no mesmo link! BUG de não continuar nos outros baús resolvido.
02-06-2022 às 16:43 - Suporte para a macro finalizado. (Não serão feitas mais alterações) kkkk já peguei 300 de REP, pra upar mais terão macros melhores.
01-06-2022 às 11:46 - v2 postada no fórum.
01-06-2022 às 04:17 - Correção de erros no texto.
01-06-2022 às 04:16 - v1 postada no fórum.
-----------
Não cobro nada pela macro, mas se puder deixar um like aí!
Qualquer coisa manda um coin lá no Farewell (/money pay MrBlueees 1)

Att,
MrBlueees.

Darkant_ · 1 Junho 2022

Vídeo infelizmente está privado

MrBlueees · 1 Junho 2022

Darkant_ disse: ↑

Vídeo infelizmente está privado
Clique para expandir...

Estava arrumando kkkk

marlik1ng · 1 Junho 2022

Mago!!

Zackals · 1 Junho 2022

Novo SLEEP, acredita quem não quer

x64 · 1 Junho 2022

dahora a macro

zJoninho (YT) · 1 Junho 2022

Top

BruceLee · 1 Junho 2022

Aqui nao esta indo para a fileira de bau ao lado, ele finaliza uma coluna e para.

MrBlueees · 1 Junho 2022

BruceLee disse: ↑

Aqui nao esta indo para a fileira de bau ao lado, ele finaliza uma coluna e para.
Clique para expandir...

Você colou na tecla ou colocou em um arquivo txt?

BruceLee · 1 Junho 2022

MrBlueees disse: ↑

Você colou na tecla ou colocou em um arquivo txt?
Clique para expandir...

Coloquei em arquivo txt assim como todas as macros..

MrBlueees · 1 Junho 2022

BruceLee disse: ↑

Coloquei em arquivo txt assim como todas as macros..
Clique para expandir...

Chama discord MUR4I#0409

LolfodaRX · 1 Junho 2022

quanto tempo xD

MrBlueees · 2 Junho 2022

Zackals disse: ↑

Novo SLEEP, acredita quem não quer
Clique para expandir...

novo nada kkkkk comecei fazer macros antes do SLEEP, e ele mesmo assim é mais brabo

E D U A R D O · 2 Junho 2022

Se aceitar sugestões, a minha é a macro encher o inventário e não pegar apenas 1hot
Também jogar os arcos para trás e não para os lados

MrBlueees · 2 Junho 2022

Negócio de pegar uma hot só é pq aí cabe mais linha no inventário... Quem quiser reparar um inv lotado de linha que farmou em um mob de aranha pode.

Fiz uma versão que joga os arcos reparados pra trás e que pega os arcos no baú de uma forma mais rápida. Nem testei, só editei aqui, se puder testar:

Código:

$${
////////////////////////////////////////////////////////////
////////////////////////////// by MUR4I#0409
////////////////////////////// Macro - Reparar Arcos TRAP INFINITA MKB (v2)
////////////////////////////////////////////////////////////
    LOG(" ");TOGGLE(blues);IF(!blues);LOG("&b&l[MACRO] &6Reparar Arcos (v2): &cOFF&4!");STOP;ENDIF;
    PLAYSOUND(tile.piston.in);LOG("&b&l[MACRO] &6Reparar Arcos (v2): &aON&2!");
////////////////////////////////////////////////////////////
////////////////////////////// CONFIG
////////////////////////////////////////////////////////////

    SET(&homelinha,"linha"); //----------- Home olhando para uma placa que vende linha

    SET(&hometemp,"bluestemp"); //-------- Home temporária para voltar depois de ir comprar linhas

    SET(#bau_atual,"1"); //----------- Começar sempre pelo baú 1 (de cima pra baixo)


////////////////////////////////////////////////////////////
////////////////////////////// VARIÁVEIS
////////////////////////////////////////////////////////////
    SET(#player_xpos,"%XPOS%");SET(#player_ypos,"%YPOS%");SET(#player_zpos,"%ZPOS%");
    SET(#bau_n_abre,0);SET(#tentativas,0);SET(#qtdarco,0);SET(#qtdlinha,0);SET(#ultimo_slot,0);                
    UNSET(parar);UNSET(pegou_arco);UNSET(limpeza);NSET(@sleeplack);UNSET(#yawblocoferro);UNSET(#pitchblocoferro);UNSET(trocarfila);
    IF(%DIRECTION% = "N"); SET(&frente,"NORTH"); SET(&atras,"SOUTH"); SET(&direita,"EAST"); SET(&esquerda,"WEST"); ENDIF;
    IF(%DIRECTION% = "S"); SET(&frente,"SOUTH"); SET(&atras,"NORTH"); SET(&direita,"WEST"); SET(&esquerda,"EAST"); ENDIF;
    IF(%DIRECTION% = "E"); SET(&frente,"EAST"); SET(&atras,"WEST"); SET(&direita,"SOUTH"); SET(&esquerda,"NORTH"); ENDIF;
    IF(%DIRECTION% = "W"); SET(&frente,"WEST"); SET(&atras,"EAST"); SET(&direita,"NORTH"); SET(&esquerda,"SOUTH"); ENDIF;
    GETIDREL(0,-1,0,#blocoferro1);IF(%#blocoferro1%=42);SET(#yawblocoferro,"0");SET(#pitchblocoferro,"90");ENDIF;
    GETIDREL(-1,0,0,#blocoferro2);IF(%#blocoferro2%=42);SET(#yawblocoferro,"270");SET(#pitchblocoferro,"64");ENDIF;
    GETIDREL(1,0,0,#blocoferro3);IF(%#blocoferro3%=42);SET(#yawblocoferro,"90");SET(#pitchblocoferro,"64");ENDIF;
    GETIDREL(0,0,-1,#blocoferro4);IF(%#blocoferro4%=42);SET(#yawblocoferro,"0");SET(#pitchblocoferro,"64");ENDIF;
    GETIDREL(0,0,1,#blocoferro5);IF(%#blocoferro5%=42);SET(#yawblocoferro,"180");SET(#pitchblocoferro,"64");ENDIF;
    SET(&verificar_baus,"");
    GETIDREL(0,-1,-2,#bau1);GETIDREL(0,0,-2,#bau2);GETIDREL(0,1,-2,#bau3);GETIDREL(0,2,-2,#bau4);GETIDREL(0,3,-2,#bau5);
    GETIDREL(0,-1,-3,#bau6);GETIDREL(0,0,-3,#bau7);GETIDREL(0,1,-3,#bau8);GETIDREL(0,2,-3,#bau9);GETIDREL(0,3,-3,#bau10);
    SET(&setbau,"23482348/2348g 2348&62348r2348e2348p2348a2348r2348a2348n2348d2348o2348 a2348r2348c2348o2348s2348 2348e2348m2348 2348b2348a2348ú2348s2348 2348i2348n2348f2348i2348n2348i23482348t2348o2348s 2348(2348m23482348k2348b2348) 23482348co2348m2348 2348a2348 2348m2348a2348c2348r2348o2348 2348d2348o2348 2348&f#2348&234882348m2348r2348&234832348b2348l2348u2348e2348ee23482348s 23482348&234842348<32348");                      
    SET(&verificar_baus,"%#bau1%-%#bau2%-%#bau3%-%#bau4%-%#bau5%-%#bau6%-%#bau7%-%#bau8%-%#bau9%-%#bau10%");                  
    IFMATCHES("%&verificar_baus%","^(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)-(54|146)$");
        LOG("");
        LOG("&b&l[MACRO] &6Reparar Arcos (v2): &aBaús posicionados corretamente!");
        LOG("&bIniciando a macro...");
        LOG("");
    ELSE;
        LOG("");
        LOG("&b&l[MACRO] &6Reparar Arcos (v2): &cOs baús não estão conforme a trap MKB!");
        LOG("&bFinalizando...");
        LOG("");
        TOGGLE(blues);
        LOG("&b&l[MACRO] &6Reparar Arcos (v2): &cOFF&4!");
        STOP;
    ENDIF;
    REPLACE(&setbau,"2348","");
    ECHO("%&setbau%")
    IF(#pitchblocoferro);
        DO();
            GUI();
            LOOK(NORTH);
            IF(trocarfila);
                #pos_next_chest = (%XPOS% + 1);
                DO;
                    LOOK(NORTH);
                    IF(%XPOS%==%#pos_next_chest%);
                        WAIT(20MS);
                        BREAK;
                    ELSEIF((%XPOS%>%#pos_next_chest%)||(%YPOS%!=%#baus_ypos%)||(%ZPOS%!=%#baus_zpos%));
                        LOG("");
                        LOG("&b&l[MACRO] &6Reparar Arcos (v2): &cAconteceu algum problema.");
                        LOG("&bFinalizando a macro...");
                        LOG("");
                        SET(parar);                                  
                        BREAK;
                    ELSE;
                        GUI(INVENTORY);
                        KEYDOWN(RIGHT);
                        IF(%XPOS%==%#pos_next_chest%);
                            KEYUP(SNEAK);
                            BREAK;
                        ELSE;
                            KEYDOWN(SNEAK);
                        ENDIF;
                    ENDIF;
                LOOP;
                KEYUP(SNEAK);
                KEYUP(RIGHT);  
                UNSET(trocarfila);
            ENDIF;

            IF(parar);
                BREAK;
            ENDIF;          
           
            IF((%#bau_atual%=1));
                LOOK(+0,+312);
            ELSEIF((%#bau_atual%=2));
                LOOK(+0,+328);                                          
            ELSEIF((%#bau_atual%=3));
                LOOK(+0,+0);                
            ELSEIF((%#bau_atual%=4));
                LOOK(+0,+33);              
            ELSEIF((%#bau_atual%=5));
                LOOK(+0,+50);
            ENDIF;

            LOOK(+0,+1,1);
            DO(3);
                IF((HITID == 54)||(HITID == 146));
                    KEY(use);
                    DO(200);
                    UNTIL(%GUI%="GUICHEST");
                ENDIF;
            UNTIL(%GUI%="GUICHEST");
            WAIT(1T);

            IF(%GUI%="GUICHEST");
               
                FOR(#slot,%#ultimo_slot%,53);
                    GETSLOTITEM(%#slot%,#id,#stack,#data);
                    IF(%#id%=261);
                        SLOTCLICK(%#slot%,L,TRUE);
                        INC(#qtdarco,1);
                    ENDIF;
                    INC(#tentativas,1);
                    IF(%#qtdarco%>=9);
                        SET(pegou_arco);
                        SET(#qtdarco,0);
                        SET(#ultimo_slot,"%#slot%");
                        GUI();
                        BREAK;
                    ELSEIF(%#tentativas%>=54);
                        LOG("&b&l[MACRO] &6Reparar Arcos (v2): &cNão foram encontrados 9 arcos!");
                        LOG("&bVerificando no próximo baú...");
                        IF(%#bau_atual% < 5);
                            INC(#bau_atual,1)
                        ELSEIF;
                            SET(#bau_atual,"1");
                            SET(trocarfila);
                        ENDIF;
                        SET(#ultimo_slot,0);
                        SET(#tentativas,0);
                        GUI();
                        BREAK;
                    ENDIF;
                NEXT;

            ELSEIF((HITID == 54)||(HITID == 146));
                INC(#bau_n_abre,1);
                IF(%#bau_n_abre%<=3);
                    LOG("");
                    LOG("&b&l[MACRO] &6Reparar Arcos (v2): &cO baú não está abrindo! Tentando novamente... &7&o#MR&3&oBLUEEES");
                    LOG("");
                ELSE;
                    LOG("");
                    LOG("&b&l[MACRO] &6Reparar Arcos (v2): &cAconteceu algum problema.");
                    LOG("&bFinalizando a macro...");
                    LOG("");
                    SET(parar);
                    BREAK;
                ENDIF;
            ELSE;
                LOG("");
                LOG("&b&l[MACRO] &6Reparar Arcos (v2): &cVocê não está olhando para um baú.");
                LOG("&bFinalizando a macro...");          
                LOG("");
                SET(parar);
                BREAK;
            ENDIF;

            IF(pegou_arco);
                WAIT(1);
                GUI();        
                DO(2);
                FOR(#slot,1,9);
                    SLOT(%#slot%);
                    DO();
                        LOOK(%#yawblocoferro%,%#pitchblocoferro%);
                        KEY(use);
                        WAIT(100ms);
                        IF(@sleeplack);
                            BREAK;
                        ENDIF;                      
                    UNTIL((%DURABILITY%=384)||(@sleeplack));
                    IF(@sleeplack);
                        LOG("");
                        LOG("&b&l[MACRO] &6Reparar Arcos (v2): &cAcabaram as linhas!");
                        LOG("&bTentando realizar a compra...");
                        LOG("");
                        // UNSET(pegou_arco);
                        // SET(parar);
                        // BREAK;
                        ECHO("/sethome %&hometemp%");
                        WAIT(200ms);
                        ECHO("/sethome %&hometemp%");
                        WAIT(1);                      
                        DO(2);
                            ECHO("/home %&homelinha%");
                            WAIT(3);
                        LOOP;
                        WAIT(100ms)
                        ECHO("/menuloja on")
                        WAIT(100ms)
                        ECHO("/esconder")
                        DO;
                            KEY(use);
                            WAIT(500ms);
                        UNTIL(%GUI% = "GUICHEST");
                        WAIT(1);
                        DO(10);
                            SLOTCLICK(2,l,false)
                            WAIT(1)
                        LOOP;
                        DO(2);
                            ECHO("/home %&hometemp%");
                            KEYDOWN(JUMP);
                            WAIT(3);
                        LOOP;
                        KEYUP(JUMP);
                        UNSET(@sleeplack);
                    ENDIF;                
                NEXT;
                LOOP;
                IF(!parar);
                LOG("");
                LOG("&b&l[MACRO] &6Reparar Arcos (v2): &aReparei toda hotbar!");
                LOG("&bIniciando limpeza...");
                LOG("");
                UNSET(pegou_arco);
                SET(limpeza);
                ENDIF;
            ENDIF;
            IF(limpeza);
                WAIT(1);
                GUI();
                DO(2)
                FOR(#slot,1,9);
                    LOOK(%&frente%);
                    SLOT(%#slot%);
                    DO();
                        KEY(DROP);
                        WAIT(100ms);
                    UNTIL(%DURABILITY%=0);
                NEXT;
                LOOP;
                LOG("");
                LOG("&b&l[MACRO] &6Reparar Arcos (v2): &aLimpeza finalizada!");
                LOG("");
                UNSET(limpeza);
            ENDIF;
        UNTIL(parar);
    ELSE;
        LOG("");
        LOG("&b&l[MACRO] &6Reparar Arcos (v2): &cNão foi encontrado nenhum bloco de ferro por perto!");
        LOG("");
    ENDIF;
    TOGGLE(blues);
    PLAYSOUND(tile.piston.out);
    LOG("");
    LOG("&b&l[MACRO] &6Reparar Arcos (v2): &aFinalizado! &7&o#MR&3&oBLUEEES");
    LOG("&b&l[MACRO] &6Reparar Arcos (v2): &cOFF&4!");
    LOG("");
    STOP;
}$$

Soufakedenub · 2 Junho 2022

boa macro bora testar

AlemaoNAQUEBRADA · 2 Junho 2022

Muito bom, obrigado!

Karpath1 · 3 Junho 2022

brabo demais

Jbarcelaa · 3 Junho 2022

Boa macro irmão, estava precisando mesmo.
Ainda nem peguei os 300 de rep

Rodrigo Miguel · 3 Junho 2022

Também não estou conseguindo que o macro mude para a outra fileira de baus

Macro - Reparar Arcos TRAP INFINITA MKB - compra linha por home (v2)

Shoutbox (0)

MrBlueees Craftlandiano
VIP

Darkant_ Excelente
VIP

MrBlueees Craftlandiano
VIP

marlik1ng Razoavel

Zackals Hardcore
Gamers VIP

x64 Craftlandiano
VIP

zJoninho (YT) Craftlandiano
VIP

BruceLee Neutro
VIP

MrBlueees Craftlandiano
VIP

BruceLee Neutro
VIP

MrBlueees Craftlandiano
VIP

LolfodaRX Craftlandiano
VIP

MrBlueees Craftlandiano
VIP

E D U A R D O Excelente
VIP

MrBlueees Craftlandiano
VIP

Soufakedenub Excelente
VIP

AlemaoNAQUEBRADA Razoavel
VIP

Karpath1 Bom
VIP

Jbarcelaa Craftlandiano
VIP

Rodrigo Miguel Neutro

Macro - Reparar Arcos TRAP INFINITA MKB - compra linha por home (v2)

Shoutbox (0)

MrBlueees Craftlandiano VIP

Darkant_ Excelente VIP

MrBlueees Craftlandiano VIP

marlik1ng Razoavel

Zackals Hardcore Gamers VIP

x64 Craftlandiano VIP

zJoninho (YT) Craftlandiano VIP

BruceLee Neutro VIP

MrBlueees Craftlandiano VIP

BruceLee Neutro VIP

MrBlueees Craftlandiano VIP

LolfodaRX Craftlandiano VIP

MrBlueees Craftlandiano VIP

E D U A R D O Excelente VIP

MrBlueees Craftlandiano VIP

Soufakedenub Excelente VIP

AlemaoNAQUEBRADA Razoavel VIP

Karpath1 Bom VIP

Jbarcelaa Craftlandiano VIP

Rodrigo Miguel Neutro

MrBlueees Craftlandiano
VIP

Darkant_ Excelente
VIP

MrBlueees Craftlandiano
VIP

Zackals Hardcore
Gamers VIP

x64 Craftlandiano
VIP

zJoninho (YT) Craftlandiano
VIP

BruceLee Neutro
VIP

MrBlueees Craftlandiano
VIP

BruceLee Neutro
VIP

MrBlueees Craftlandiano
VIP

LolfodaRX Craftlandiano
VIP

MrBlueees Craftlandiano
VIP

E D U A R D O Excelente
VIP

MrBlueees Craftlandiano
VIP

Soufakedenub Excelente
VIP

AlemaoNAQUEBRADA Razoavel
VIP

Karpath1 Bom
VIP

Jbarcelaa Craftlandiano
VIP