Aldeia RPG

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Suporte ao desenvolvimento de jogos


+4
Spooky
Pablo Kawan
Grilox
Kotol
8 participantes

    [EO]Equipamentos com adições de EXP em porcentagem

    Spooky
    Spooky
    Membro Ativo
    Membro Ativo


    Mensagens : 267
    Créditos : 24

    [EO]Equipamentos com adições de EXP em porcentagem - Página 2 Empty Re: [EO]Equipamentos com adições de EXP em porcentagem

    Mensagem por Spooky Dom Nov 08, 2015 4:01 pm

    Profane ~ escreveu:Nah, ><

    Spooky, leia o que o Genza pediu;

    Genza, Quando ele pede para que você adicione algo dentro; vá na form, e dentro do utensilio a qual vc criou e dê um duplo click.

    Ex:

    Criou uma barra de scroll; Clique nela duas vezes, e você irá para a área de sourcer dentro do sua Scroll.

    Por isso "dentro". Acho que eh a forma mais fácil de explicar.

    Coloque esse codigo ali dentro.



    ~

    Já Spooky, se está bugando é porque você no ModCombat colocou de forma errada, por isso o conflito entre o Vip e o Item Exp.

    Att
    Aahh sim, não tinha entendido direito, pensei que o código que estava na foto era o de dentro da scroll dele, então por isso n me preocupei com isso kk'

    Genza, Faça o que o Profane disse, e se der algum erro, tente fazer o que eu disse que é GG 
    APSAPKSAPKS


    _________________
    Sign
    [EO]Equipamentos com adições de EXP em porcentagem - Página 2 Hticjn

    Sign¹:

    Sign²:
    avatar
    gabrielcpv
    Novato
    Novato


    Mensagens : 6
    Créditos : 0

    [EO]Equipamentos com adições de EXP em porcentagem - Página 2 Empty Re: [EO]Equipamentos com adições de EXP em porcentagem

    Mensagem por gabrielcpv Sex Mar 29, 2024 4:07 pm

    A exp extra está funcionando para os equipamentos, porém para os "Enchants" que ficam no cantinho superior esquerdo, não está... tenho uma linha de itens especiais para esse espaço que eu queria que tivesse esse boost de exp. Sad


    Descobri como resolve, mas deu uma quebrada na cabeça, o código tava dando problema no finalzinho, então eu arrumei assim e deu certo:


    Código:
    Dim add As Long
            add = 0
            If GetPlayerEquipment(attacker, weapon) > 0 Then
                add = add + Item(GetPlayerEquipment(attacker, weapon)).ExtraEXP
            End If
                
            If GetPlayerEquipment(attacker, Armor) > 0 Then
                add = add + Item(GetPlayerEquipment(attacker, Armor)).ExtraEXP
            End If
            
            If GetPlayerEquipment(attacker, Shield) > 0 Then
                add = add + Item(GetPlayerEquipment(attacker, Shield)).ExtraEXP
            End If
            
            If GetPlayerEquipment(attacker, Helmet) > 0 Then
                add = add + Item(GetPlayerEquipment(attacker, Helmet)).ExtraEXP
            End If
            
            If GetPlayerEquipment(attacker, Enchant) > 0 Then
                add = add + Item(GetPlayerEquipment(attacker, Enchant)).ExtraEXP
            End If

      Data/hora atual: Qui Abr 25, 2024 3:49 am