Colocar do lado esquerdo do nome do jogador,seu cargo,exemplo:
[administrador] Zé Mayer
[Moderador] Camila Pitanga
Abra o Client~Side e procure por
Código: [Selecionar]
DrawPlayerNameDepois procure por:
Código: [Selecionar]
' Check access level
If GetPlayerPK(Index) = NO ThenTroque a antiga " Select Case GetPlayerAcess por esta:
Código: [Selecionar]
Select Case GetPlayerAccess(Index)
Case 0
color = QBColor(White)
Case 1
color = QBColor(Grey)
Stag = "[Game Master]"
Case 2
color = QBColor(Cyan)
Stag = "[Mapeador]"
Case 3
color = QBColor(Green)
Stag = "[Staff]"
Case 4
color = QBColor(Yellow)
Stag = "[Administrador]"
End SelectedAbaixo de,ainda na mesma sub
Código: [Selecionar]
Dim Name As Stringadicione abaixo disso:
Código: [Selecionar]
Dim Stag As String Na mesma Sub procure por:
Código: [Selecionar]
Textx =Depois do "=" substitua o que tiver lá por:
Código: [Selecionar]
ConvertMapX(GetPlayerX(Index) * PIC_X) + Player(Index).XOffset + (PIC_X \ 2) - getWidth(TexthDC, Stag & (Trim$(Name)))Faça mesma coisa com TextY
Depois do "=" substitua o que estiver lá por:
Código: [Selecionar]
ConvertMapY(GetPlayerY(Index) * PIC_Y) + Player(Index).YOffset - 16Depois Substitua a linha:
Código: [Selecionar]
Call DrawText Substitua essa linha toda por essa:Código: [Selecionar]
Call DrawText(TexthDC, TextX, TextY, Stag & Name, color)Créditos:



Nenhum comentário:
Postar um comentário