Correção - Informações de um jogador Hitskin_logo Hitskin.com

Isto é uma pré-visualização de um tema em Hitskin.com
Instalar o temaVoltar para a ficha do tema

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

Correção - Informações de um jogador

Ir para baixo

Correção - Informações de um jogador Empty Correção - Informações de um jogador

Mensagem por Ricardo Sex Ago 31, 2012 7:55 pm

Explicação

Quando você usa o comando "/info" nada acontece.

Server~Side

modHandleData

Troque toda a Sub HandlePlayerInfoRequest por:

Código:
Sub HandlePlayerInfoRequest(ByVal index As Long, ByRef Data() As Byte, ByVal StartAddr As Long, ByVal ExtraVar As Long)
    Dim Name As String
    Dim i As Long
    Dim Buffer As clsBuffer
   
    Set Buffer = New clsBuffer
    Buffer.WriteBytes Data()
    Name = Buffer.ReadString
    Set Buffer = Nothing
    i = FindPlayer(Name)
   
    Call PlayerMsg(index, Trim$(Name) & vbNewLine & "Stats" & vbNewLine & "Força: " & GetPlayerStat(i, Strength) & "/" & "Defesa: " & GetPlayerStat(i, Endurance) & "/" & "Inteligência: " & GetPlayerStat(i, Intelligence) & "/" & "Agilidade: " & GetPlayerStat(i, Agility) & "/" & "Força de Vontade: " & "/" & GetPlayerStat(i, Willpower) & vbNewLine & "Vitals" & vbNewLine & GetPlayerVital(i, HP) & " de " & GetPlayerMaxVital(i, HP) & "/" & GetPlayerVital(i, MP) & " de " & GetPlayerMaxVital(i, MP), White)
End Sub

Créditos

Ricardo
Ricardo
Ricardo
Ocasional
Ocasional

Mensagens : 162
Créditos : 71

Ficha do personagem
Nível: 1
Experiência:
Correção - Informações de um jogador Left_bar_bleue0/0Correção - Informações de um jogador Empty_bar_bleue  (0/0)
Vida:
Correção - Informações de um jogador Left_bar_bleue30/30Correção - Informações de um jogador Empty_bar_bleue  (30/30)

Ir para o topo Ir para baixo

Ir para o topo

- Tópicos semelhantes

 
Permissões neste sub-fórum
Não podes responder a tópicos