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

MrBlueees · Jun 1, 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_ · Jun 1, 2022

Vídeo infelizmente está privado

MrBlueees · Jun 1, 2022

Darkant_ disse:
Vídeo infelizmente está privado

Estava arrumando kkkk

marlik1ng · Jun 1, 2022

Mago!!

Zackals · Jun 1, 2022

Novo SLEEP, acredita quem não quer

x64 · Jun 1, 2022

dahora a macro

zJoninho (YT) · Jun 1, 2022

BruceLee · Jun 1, 2022

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

MrBlueees · Jun 1, 2022

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

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

BruceLee · Jun 1, 2022

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

Coloquei em arquivo txt assim como todas as macros..

MrBlueees · Jun 1, 2022

BruceLee disse:
Coloquei em arquivo txt assim como todas as macros..

Chama discord MUR4I#0409

LolfodaRX · Jun 1, 2022

quanto tempo xD

MrBlueees · Jun 2, 2022

Zackals disse:
Novo SLEEP, acredita quem não quer

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

E D U A R D O · Jun 2, 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 · Jun 2, 2022

E D U A R D O disse:
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

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 · Jun 2, 2022

boa macro bora testar

AlemaoNAQUEBRADA · Jun 2, 2022

Muito bom, obrigado!

Karpath1 · Jun 3, 2022

brabo demais

Jbarcelaa · Jun 3, 2022

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

Rodrigo Miguel · Jun 3, 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)

Bem-vindo!

Craftlandiano

Excelente

Craftlandiano

Razoavel

Hardcore

Craftlandiano

Craftlandiano

Neutro

Craftlandiano

Neutro

Craftlandiano

Craftlandiano

Craftlandiano

Excelente

Craftlandiano

Excelente

Razoavel

Bom

Craftlandiano

Neutro

Users who are viewing this thread

Estatísticas online

Em alta

Novos membros

Stay Connected