Universo Games
Ola , Convidado



Você ainda não e cadastrado então cadastre-se e veja todas as atualizações no mundo rpg!!!
Universo Games

Suporte e Desenvolvimento só no Universo Games

Ola Convidado, Seja Bem vindo a equipe lhe deseja boa sorte no seu projeto!

Você não está conectado. Conecte-se ou registre-se

Mudando a cor do nome do pet (Do acesso)

Ver o tópico anterior Ver o tópico seguinte Ir em baixo  Mensagem [Página 1 de 1]

1Tutorial Mudando a cor do nome do pet (Do acesso) em Sab 25 Jun 2011, 10:45

RicardoxD


Membro
Membro
Começando

Client~Side

Procure pela sub:

Código:
Sub BltPetName(ByVal Index As Long)


Nessa parte:

Código:
    ' Check access level
    If GetPlayerPK(Index) = NO Then
        Select Case GetPlayerAccess(Index)
            Case 0
                Color = QBColor(Brown)
            Case 1
                Color = QBColor(BrightBlue)
            Case 2
                Color = QBColor(DarkGrey)
            Case 3
                Color = QBColor(Blue)
            Case 4
                Color = QBColor(Pink)
        End Select
    Else
        Color = QBColor(BrightRed)
    End If

Você escolhe a cor dos acessos, tipo:

Código:
    ' Check access level
    If GetPlayerPK(Index) = NO Then
        Select Case GetPlayerAccess(Index)
            Case 0
                Color = QBColor(Cor do acesso 1 em Ingles)
            Case 1
                Color = QBColor(Cor do acesso 2 em Ingles)
            Case 2
                Color = QBColor(Cor do acesso 3 em Ingles)
            Case 3
                Color = QBColor(Cor do acesso 4 em Ingles)
            Case 4
                Color = QBColor(Cor do acesso 5 em Ingles)
        End Select
    Else
        Color = QBColor(BrightRed)
    End If

Creditos:

Ricardo XD

Ver o tópico anterior Ver o tópico seguinte Voltar ao Topo  Mensagem [Página 1 de 1]

Permissão deste fórum:
Você não pode responder aos tópicos neste fórum