ENTREGUE [Macro] ArmorStatusHUD

Discussão em 'Macro Entregue' iniciado por LincolnSSC, 27 Julho 2014.

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

    LincolnSSC Craftlandiano
    VIP

    Afiliado:
    16 Abril 2012
    Mensagens:
    1,200
    Curtidas Recebidas:
    689
    Curtiu:
    1,492
    Sexo:
    Masculino
    Cubos:
    293.00
    Nick:
    Edsson/Lincoln45620
    Clan:
    [ITs] Take iT eaSy
    [Macro] ArmorStatusHUD

    Esse macro tem a mesma função do mod ArmorStatusHUD, que mostra na tela a durabilidade da armadura e item na mão. Ele pode ser muito útil para o servidor Titan, já que tal mod não é compatível com o Launcher.

    Video de Instalação, com demonstração no final:
    [youtube]http://www.youtube.com/watch?v=9S3pzMcoe6s[/youtube]

    Código para 1.5/1.7:
    $${
    do;

    #dur=%DURABILITY%+1;
    #dur1=%HELMDURABILITY%+1;
    #dur2=%CHESTPLATEDURABILITY%+1;
    #dur3=%LEGGINGSDURABILITY%+1;
    #dur4=%BOOTSDURABILITY%+1;

    getslotitem(%INVSLOT%,#id,#stack,#meta);
    if(%#meta%!=%DURABILITY%);

    #max=%#meta%+%DURABILITY%;
    #a=%#max%-(%#max%/7);
    #b=%#max%-((%#max%/7)*2);
    #c=%#max%-((%#max%/7)*3);
    #d=%#max%-((%#max%/7)*4);
    #e=%#max%-((%#max%/7)*5);

    if(%DURABILITY%=%#max%);SETLABEL(ITEM,"&f%#dur%");
    elseif(%DURABILITY%<%#e%);SETLABEL(ITEM,"&0%#dur%");
    elseif(%DURABILITY%<%#d%);SETLABEL(ITEM,"&4%#dur%");
    elseif(%DURABILITY%<%#c%);SETLABEL(ITEM,"&c%#dur%");
    elseif(%DURABILITY%<%#b%);SETLABEL(ITEM,"&6%#dur%");
    elseif(%DURABILITY%<%#a%);SETLABEL(ITEM,"&e%#dur%");
    elseif(%DURABILITY%<%#max%);SETLABEL(ITEM,"&a%#dur%");
    endif;
    else;
    SETLABEL(ITEM,"&4x");

    endif;
    endif;

    if(%HELMDURABILITY%!=0);

    #a=%HELMDAMAGE%-(%#max%/7);
    #b=%HELMDAMAGE%-((%#max%/7)*2);
    #c=%HELMDAMAGE%-((%#max%/7)*3);
    #d=%HELMDAMAGE%-((%#max%/7)*4);
    #e=%HELMDAMAGE%-((%#max%/7)*5);

    if(%HELMDAMAGE%=%HELMDURABILITY%);SETLABEL(CAPACETE,"&f%#dur1%");
    elseif(%HELMDURABILITY%<%#e%);SETLABEL(CAPACETE,"&0%#dur1%");
    elseif(%HELMDURABILITY%<%#d%);SETLABEL(CAPACETE,"&4%#dur1%");
    elseif(%HELMDURABILITY%<%#c%);SETLABEL(CAPACETE,"&c%#dur1%");
    elseif(%HELMDURABILITY%<%#b%);SETLABEL(CAPACETE,"&6%#dur1%");
    elseif(%HELMDURABILITY%<%#a%);SETLABEL(CAPACETE,"&e%#dur1%");
    elseif(%HELMDURABILITY%<%HELMDAMAGE%);SETLABEL(CAPACETE,"&a%#dur1%");
    endif;

    else;
    SETLABEL(CAPACETE,"&4x");
    endif;

    if(%CHESTPLATEDURABILITY%!=0);

    #a=%CHESTPLATEDAMAGE%-(%#max%/7);
    #b=%CHESTPLATEDAMAGE%-((%#max%/7)*2);
    #c=%CHESTPLATEDAMAGE%-((%#max%/7)*3);
    #d=%CHESTPLATEDAMAGE%-((%#max%/7)*4);
    #e=%CHESTPLATEDAMAGE%-((%#max%/7)*5);

    if(%CHESTPLATEDAMAGE%=%CHESTPLATEDURABILITY%);SETLABEL(PEITORAL,"&f%#dur2%");
    elseif(%CHESTPLATEDURABILITY%<%#e%);SETLABEL(PEITORAL,"&0%#dur2%");
    elseif(%CHESTPLATEDURABILITY%<%#d%);SETLABEL(PEITORAL,"&4%#dur2%");
    elseif(%CHESTPLATEDURABILITY%<%#c%);SETLABEL(PEITORAL,"&c%#dur2%");
    elseif(%CHESTPLATEDURABILITY%<%#b%);SETLABEL(PEITORAL,"&6%#dur2%");
    elseif(%CHESTPLATEDURABILITY%<%#a%);SETLABEL(PEITORAL,"&e%#dur2%");
    elseif(%CHESTPLATEDURABILITY%<%CHESTPLATEDAMAGE%);SETLABEL(PEITORAL,"&a%#dur2%");
    endif;

    else;
    SETLABEL(PEITORAL,"&4x");
    endif;

    if(%LEGGINGSDURABILITY%!=0);

    #a=%LEGGINGSDAMAGE%-(%#max%/7);
    #b=%LEGGINGSDAMAGE%-((%#max%/7)*2);
    #c=%LEGGINGSDAMAGE%-((%#max%/7)*3);
    #d=%LEGGINGSDAMAGE%-((%#max%/7)*4);
    #e=%LEGGINGSDAMAGE%-((%#max%/7)*5);

    if(%LEGGINGSDAMAGE%=%LEGGINGSDURABILITY%);SETLABEL(CALCA,"&f%#dur3%");
    elseif(%LEGGINGSDURABILITY%<%#e%);SETLABEL(CALCA,"&0%#dur3%");
    elseif(%LEGGINGSDURABILITY%<%#d%);SETLABEL(CALCA,"&4%#dur3%");
    elseif(%LEGGINGSDURABILITY%<%#c%);SETLABEL(CALCA,"&c%#dur3%");
    elseif(%LEGGINGSDURABILITY%<%#b%);SETLABEL(CALCA,"&6%#dur3%");
    elseif(%LEGGINGSDURABILITY%<%#a%);SETLABEL(CALCA,"&e%#dur3%");
    elseif(%LEGGINGSDURABILITY%<%LEGGINGSDAMAGE%);SETLABEL(CALCA,"&a%#dur3%");
    endif;

    else;
    SETLABEL(CALCA,"&4x");
    endif;

    if(%BOOTSDURABILITY%!=0);

    #a=%BOOTSDAMAGE%-(%#max%/7);
    #b=%BOOTSDAMAGE%-((%#max%/7)*2);
    #c=%BOOTSDAMAGE%-((%#max%/7)*3);
    #d=%BOOTSDAMAGE%-((%#max%/7)*4);
    #e=%BOOTSDAMAGE%-((%#max%/7)*5);

    if(%BOOTSDAMAGE%=%BOOTSDURABILITY%);SETLABEL(BOTAS,"&f%#dur4%");
    elseif(%BOOTSDURABILITY%<%#e%);SETLABEL(BOTAS,"&0%#dur4%");
    elseif(%BOOTSDURABILITY%<%#d%);SETLABEL(BOTAS,"&4%#dur4%");
    elseif(%BOOTSDURABILITY%<%#c%);SETLABEL(BOTAS,"&c%#dur4%");
    elseif(%BOOTSDURABILITY%<%#b%);SETLABEL(BOTAS,"&6%#dur4%");
    elseif(%BOOTSDURABILITY%<%#a%);SETLABEL(BOTAS,"&e%#dur4%");
    elseif(%BOOTSDURABILITY%<%BOOTSDAMAGE%);SETLABEL(BOTAS,"&a%#dur4%");
    endif;

    else;
    SETLABEL(BOTAS,"&4x");
    endif;

    loop;
    }$$

    Obs: O que diferencia esse macro é que cor da durabilidade muda, de acordo com a durabilidade do item.
    Agradecimentos ao [member='Phodalao'] por sempre ajudar e tirar dúvidas.
    22/08: Script melhorado por [member='BeetleJuice'] <3 .

    [hr]
    Outros Macros:
    StatusEffectHUD: http://forum.craftlandia.com.br/ipb/index.php?/topic/358480-macro-statuseffecthud/#entry2949055
    DirectionHUD: http://forum.craftlandia.com.br/ipb/index.php?/topic/364371-macro-directionhud/#entry3002863
    Ensinando a instalar macro de ArmorStatus + StatusEffect: http://forum.craftlandia.com.br/ipb/index.php?/topic/368987-macro-armorstatushud-statuseffecthud/#entry3042644
     
  2. fraga

    fraga Hardcore
    VIP

    Afiliado:
    19 Maio 2013
    Mensagens:
    10,676
    Curtidas Recebidas:
    3,087
    Curtiu:
    4,210
    Cubos:
    31.00
    Nick:
    Fraga
    Clan:
    nLL
    Boa, ótimo
     
    LincolnSSC curtiu isso.
  3. iThisEpicG4mer

    iThisEpicG4mer Razoavel
    Banido

    Afiliado:
    6 Julho 2014
    Mensagens:
    818
    Curtidas Recebidas:
    85
    Curtiu:
    80
    Sexo:
    Masculino
    Cubos:
    953.00
    Nick:
    ThisEpicG4mer
    Clan:
    | THS - RnG
  4. Eduarte

    Eduarte Craftlandiano
    VIP

    Afiliado:
    2 Agosto 2013
    Mensagens:
    10,766
    Curtidas Recebidas:
    1,215
    Curtiu:
    1,649
    Sexo:
    Masculino
    Localização:
    Bahia.
    Cubos:
    397.00
    Nick:
    Eduarte
  5. LincolnSSC

    LincolnSSC Craftlandiano
    VIP

    Afiliado:
    16 Abril 2012
    Mensagens:
    1,200
    Curtidas Recebidas:
    689
    Curtiu:
    1,492
    Sexo:
    Masculino
    Cubos:
    293.00
    Nick:
    Edsson/Lincoln45620
    Clan:
    [ITs] Take iT eaSy
    Eduarte curtiu isso.
  6. Eduarte

    Eduarte Craftlandiano
    VIP

    Afiliado:
    2 Agosto 2013
    Mensagens:
    10,766
    Curtidas Recebidas:
    1,215
    Curtiu:
    1,649
    Sexo:
    Masculino
    Localização:
    Bahia.
    Cubos:
    397.00
    Nick:
    Eduarte
    há então parasse mais realista este macro tendi
     
  7. Waffles

    Waffles Craftlandiano
    VIP

    Afiliado:
    26 Julho 2013
    Mensagens:
    8,340
    Curtidas Recebidas:
    878
    Curtiu:
    1,134
    Sexo:
    Masculino
    Cubos:
    181.00
    Nick:
    zWaffles
  8. Lucas Gonçalves

    Lucas Gonçalves Craftlandiano
    Banido

    Afiliado:
    7 Novembro 2011
    Mensagens:
    3,981
    Curtidas Recebidas:
    1,195
    Curtiu:
    0
    Sexo:
    Masculino
    Localização:
    Águas de...
    Cubos:
    1,536.00
    Nick:
    LeSabio
    Boa garoto
     
    LincolnSSC curtiu isso.
  9. Lombax

    Lombax Craftlandiano
    VIP Banido

    Afiliado:
    30 Agosto 2013
    Mensagens:
    2,205
    Curtidas Recebidas:
    568
    Curtiu:
    0
    Sexo:
    Masculino
    Localização:
    Na Casa do...
    Cubos:
    686.00
    Nick:
    LukasBRZ
    Clan:
    Parei
     
  10. RaissaMarschall

    Afiliado:
    23 Junho 2014
    Mensagens:
    71
    Curtidas Recebidas:
    15
    Curtiu:
    0
    Sexo:
    Feminino
    Cubos:
    119.00
    Nick:
    Raissa
    ♥ Top demais

    ________________________________________________________________

    [​IMG]
    ________________________________________________________________
    Me da um cubinho ? *^* >>>
     
    blitzsupremo e LincolnSSC curtiram isso.
  11. LincolnSSC

    LincolnSSC Craftlandiano
    VIP

    Afiliado:
    16 Abril 2012
    Mensagens:
    1,200
    Curtidas Recebidas:
    689
    Curtiu:
    1,492
    Sexo:
    Masculino
    Cubos:
    293.00
    Nick:
    Edsson/Lincoln45620
    Clan:
    [ITs] Take iT eaSy
    ^^
     
  12. EndeerZ

    EndeerZ Craftlandiano
    VIP

    Afiliado:
    29 Março 2013
    Mensagens:
    6,161
    Curtidas Recebidas:
    1,301
    Curtiu:
    0
    Cubos:
    678.10
    Nick:
    Endeer_Dragon
    Clan:
    TzT
    Como faço para colocar junto com o de tempo de pot?
     
  13. wh1sky

    wh1sky Craftlandiano
    VIP

    Afiliado:
    27 Maio 2014
    Mensagens:
    1,582
    Curtidas Recebidas:
    708
    Curtiu:
    932
    Sexo:
    Masculino
    Cubos:
    260.00
    Nick:
    Wh1sky_
    tbm queria saber
     
  14. LincolnSSC

    LincolnSSC Craftlandiano
    VIP

    Afiliado:
    16 Abril 2012
    Mensagens:
    1,200
    Curtidas Recebidas:
    689
    Curtiu:
    1,492
    Sexo:
    Masculino
    Cubos:
    293.00
    Nick:
    Edsson/Lincoln45620
    Clan:
    [ITs] Take iT eaSy
    Vou mandar MP e responder ^^
     
  15. DoubleSeven

    DoubleSeven Excelente
    VIP

    Afiliado:
    15 Janeiro 2013
    Mensagens:
    998
    Curtidas Recebidas:
    230
    Curtiu:
    229
    Sexo:
    Masculino
    Cubos:
    194.00
    Nick:
    doublesevenn
    Clan:
    THS
    boa braço!
     
    LincolnSSC curtiu isso.
  16. xpedra

    xpedra Excelente
    VIP

    Afiliado:
    19 Dezembro 2013
    Mensagens:
    3,116
    Curtidas Recebidas:
    393
    Curtiu:
    0
    Sexo:
    Masculino
    Localização:
    São Paulo
    Cubos:
    199.00
    Nick:
    xThePedro
    Boa cara , Cubo pra vc
     
  17. Ernanik

    Ernanik Excelente
    VIP

    Afiliado:
    8 Setembro 2013
    Mensagens:
    1,555
    Curtidas Recebidas:
    442
    Curtiu:
    19
    Sexo:
    Masculino
    Cubos:
    1,640.00
    Nick:
    Ernanikk
    Clan:
    UPM
    Legal a parte da cor na durabilidade, mas podia dexa menor o scrip né
     
    LincolnSSC curtiu isso.
  18. LincolnSSC

    LincolnSSC Craftlandiano
    VIP

    Afiliado:
    16 Abril 2012
    Mensagens:
    1,200
    Curtidas Recebidas:
    689
    Curtiu:
    1,492
    Sexo:
    Masculino
    Cubos:
    293.00
    Nick:
    Edsson/Lincoln45620
    Clan:
    [ITs] Take iT eaSy
    Preguiça, assim estava rápido pra fazer, só copiei e colei as partes das Labels que eram praticamente iguais e mudei o item e o valor. O mais difícil mesmo foi saber mais ou menos em qual durabilidade mudava de cor, essa provavelmente foi a parte que mais demorou.
    @Edit: E acho difícil deixar muito menor que isso, porque a cada item eu coloquei 5 cores diferentes, e quando mudava de cor, setava a cor na label ou seja, mais ou menos 17 linhas por item.
     
  19. Ernanik

    Ernanik Excelente
    VIP

    Afiliado:
    8 Setembro 2013
    Mensagens:
    1,555
    Curtidas Recebidas:
    442
    Curtiu:
    19
    Sexo:
    Masculino
    Cubos:
    1,640.00
    Nick:
    Ernanikk
    Clan:
    UPM
    kk asim sim , sempre procuro encutar os scripts meus kk, to fazendo um macro de buildiing, ja deu mais de 500 linhas o qrquivo txt ja ta com 9 kb
     
  20. LincolnSSC

    LincolnSSC Craftlandiano
    VIP

    Afiliado:
    16 Abril 2012
    Mensagens:
    1,200
    Curtidas Recebidas:
    689
    Curtiu:
    1,492
    Sexo:
    Masculino
    Cubos:
    293.00
    Nick:
    Edsson/Lincoln45620
    Clan:
    [ITs] Take iT eaSy
    Haha, nesse macro, o código para a 1.5 deu 1267 linhas e 24kb, e o da 1.7 deu 1332 linhas e 28kb.
     
Status do Tópico:
Não esta aberto para novas mensagens.