1. IP: replay.craftlandia.com.br


    IP: chronos.craftlandia.com.br


    IP: legacy.craftlandia.com.br


ALGUEM EDITA

Discussão em 'Pedidos de Macro' iniciado por Crazy_Chappie, 10 Outubro 2021.

Status do Tópico:
Não esta aberto para novas mensagens.
  1. Crazy_Chappie

    Crazy_Chappie Neutro

    Afiliado:
    26 Julho 2014
    Mensagens:
    7
    Curtidas Recebidas:
    1
    Curtiu:
    2
    Sexo:
    Masculino
    Cubos:
    17.00
    Nick:
    Crazy_Chappie
    Clan:
    CNX
    Twitter:
    https://www.twitch.t
    YouTube:
    https://www.youtube.com/channel/UCEzb7cvq5VfsXLGCxOOE3xQ
    ESSA MACRO EQUIPA SOMENTE ARMADURA DE DIMA PODERIA ADCIONAR DO NETHER TBM




    $${

    IF(first);
    ELSE
    SET(#durabilidade == 50);
    LOG("");
    LOG("&a&oA durabilidade padrão para guardar o SET é de &450&a.");
    LOG("");
    LOG("&a&oCaso queira alterar a durabilidade basta iniciar a MACRO apertando &4CONTROL&a.");
    LOG("");
    SET(first);
    ENDIF;

    IF(KEY_LCONTROL);
    PROMPT(#durabilidade,$$?,"Quer guardar o set com qual durabilidade?");
    ifmatches("%#durabilidade%","^(\d+)$");
    LOG("&0&l[&9&lMACRO&0&l] &9O SET será guardado com &4%#durabilidade%&9.");
    ELSE
    SET(#durabilidade,50);
    LOG("&0&l[&9&lMACRO&0&l] &9Resposta &cinválida&9, durabilidade padrão setada como &450&9.");
    ENDIF;
    ENDIF;

    IF(trocaarmadura);
    LOG("&0&l[&9&lMACRO&0&l] &9Troca Armadura &4&lDESLIGADO&9.");
    UNSET(trocaarmadura);
    STOP;
    ELSE
    LOG("&0&l[&9&lMACRO&0&l] &9Troca Armadura &2&lLIGADO&9.");
    SET(trocaarmadura);
    ENDIF;

    #cap = 363;
    #pei = 528;
    #cal = 495;
    #bot = 429;
    UNSET(#idx);


    DO;

    IF((%HELMID%!=0)&&(%HELMDURABILITY%<=%#durabilidade%));
    SET(swaparmor);
    SET(#slot,5);
    SET(#part,310);
    SET(verificacao);
    ELSEIF((%CHESTPLATEID%!=0)&&(%CHESTPLATEDURABILITY%<=%#durabilidade%));
    SET(swaparmor);
    SET(verificacao);
    SET(#slot,6);
    SET(#part,311);
    ELSEIF((%LEGGINGSID%!=0)&&(%LEGGINGSDURABILITY%<=%#durabilidade%));
    SET(swaparmor);
    SET(verificacao);
    SET(#slot,7);
    SET(#part,312);
    ELSEIF((%BOOTSID%!=0)&&(%BOOTSDURABILITY%<=%#durabilidade%));
    SET(swaparmor);
    SET(verificacao);
    SET(#slot,8);
    SET(#part,313);

    ENDIF;

    IF(%HELMID%=0);
    SET(autoarmor);
    SET(verificacao);
    SET(&parte,Capacete);
    SET(#idx,"310");
    DEC(#cap,%#durabilidade%);
    SET(#durabilidadetrocar,%#cap%);
    ELSEIF(%CHESTPLATEID%=0);
    SET(autoarmor);
    SET(verificacao);
    SET(&parte,Peitoral);
    SET(#idx,"311");
    DEC(#pei,%#durabilidade%);
    SET(#durabilidadetrocar,%#pei%);
    ELSEIF(%LEGGINGSID%=0);
    SET(autoarmor);
    SET(verificacao);
    SET(&parte,Calça);
    SET(#idx,"312");
    DEC(#cal,%#durabilidade%);
    SET(#durabilidadetrocar,%#cal%);
    ELSEIF(%BOOTSID%=0);
    SET(autoarmor);
    SET(verificacao);
    SET(&parte,Bota);
    SET(#idx,"313");
    DEC(#bot,%#durabilidade%);
    SET(#durabilidadetrocar,%#bot%);

    ENDIF;

    IF(swaparmor);
    GUI(INVENTORY);
    IF(KEY_W);
    KEYDOWN(FORWARD);
    ELSEIF(KEY_S);
    KEYDOWN(BACK);
    ELSEIF(KEY_A);
    KEYDOWN(LEFT);
    ELSEIF(KEY_D);
    KEYDOWN(RIGHT);
    ELSEIF(SHIFT);
    KEYDOWN(SNEAK);
    ELSEIF(KEY_SPACE);
    KEYDOWN(JUMP);
    ELSEIF(RMOUSE);
    KEY(USE);
    ENDIF;

    SLOTCLICK(%#slot%,L,TRUE);
    GUI;
    UNSET(swaparmor);
    ENDIF;

    IF(verificacao);

    unsafe(1000);
    gui(inventory);
    for(#for,9,44);
    GETSLOTITEM(%#for%,#ifr,#stack,#data);
    IF((%#ifr%=%#idx%)&&(%#data%<%#durabilidadetrocar%));
    SET(#trocar,"%#for%");
    SET(noarmor)
    ENDIF;
    next;
    gui();
    IF(noarmor);
    UNSET(noarmor);
    ELSE
    LOG("&7&l>>&9Você está sem &4&l%&parte%, &9encerrando macro.");
    LOG("&0&l[&9&lMACRO&0&l] &9Troca Armadura &4&lDESLIGADO&9.");
    UNSET(trocaarmadura);
    STOP;
    ENDIF;
    endunsafe;

    UNSET(verificacao);
    ENDIF;

    IF(autoarmor);
    GUI(INVENTORY);
    IF(KEY_W);
    KEYDOWN(FORWARD);
    ELSEIF(KEY_S);
    KEYDOWN(BACK);
    ELSEIF(KEY_A);
    KEYDOWN(LEFT);
    ELSEIF(KEY_D);
    KEYDOWN(RIGHT);
    ELSEIF(SHIFT);
    KEYDOWN(SNEAK);
    ELSEIF(KEY_SPACE);
    KEYDOWN(JUMP);
    ELSEIF(RMOUSE);
    KEY(USE);
    ENDIF;

    LOG("&7&l>>&9%&parte% &7substituído&9!");
    SLOTCLICK(%#trocar%,L,TRUE);
    GUI;
    ENDIF;

    #cap = 363;
    #pei = 528;
    #cal = 495;
    #bot = 429;
    UNSET(#idx);
    UNSET(autoarmor);

    LOOP;

    }$$
     
  2. lomexicano

    lomexicano Craftlandiano
    VIP

    Afiliado:
    20 Agosto 2013
    Mensagens:
    612
    Curtidas Recebidas:
    759
    Curtiu:
    735
    Sexo:
    Masculino
    Ocupação:
    Estudante...
    Localização:
    Rio Grande...
    Cubos:
    2,314.00
    Nick:
    lomexicano
    Discord:
    lomexicano#0001
    YouTube:
    LoMexicano
Status do Tópico:
Não esta aberto para novas mensagens.