Colocando Vila Encima da cabeça do personagen.

por Monotoshi Qua 06 Fev 2013, 20:16

Primeiro va no cliente side:
Procure no modText
Drawplayervila algo do tipo do seu sistema de vila.
Substitui a sub inteira por:

Public Sub DrawPlayerVila(ByVal Index As Long)
If Player(Index).Vila < 0 Then Exit Sub

Dim VilaX As Long
Dim VilaY As Long
Dim VilaColor As Long
Dim VilaName As String

Select Case Player(Index).Vila
Case 1
VilaName = "Konohagakure"
VilaColor = QBColor(BrightRed)
Case 2 'Suna
VilaName = "Sunagakure"
VilaColor = QBColor(Brown)
Case 3 'Iwa
VilaName = "Iwagakure"
VilaColor = QBColor(Brown)
Case 4 'Kiri
VilaName = "Kirigakure"
VilaColor = QBColor(Cyan)
Case 5 'Kumo
VilaName = "Kumogakure"
VilaColor = QBColor(Cyan)
Case Else
VilaName = vbNullString
End Select

VilaX = ConvertMapX(GetPlayerX(Index) * PIC_X) + Player(Index).XOffset + (PIC_X \ 2) - getWidth(TexthDC, (Trim$(VilaName)))
If GetPlayerSprite(Index) < 1 Or GetPlayerSprite(Index) > NumCharacters Then
VilaY = ConvertMapY(GetPlayerY(Index) * PIC_Y) + Player(Index).YOffset - 18
Else
VilaY = ConvertMapY(GetPlayerY(Index) * PIC_Y) + Player(Index).YOffset - (DDSD_Character(GetPlayerSprite(Index)).lHeight / 4) + 2
End If

Call DrawText(TexthDC, VilaX, VilaY, VilaName, VilaColor)

End Sub

Agora procure

Call DrawPlayerName(i)

Abaixo add:

Call DrawPlayerVila(i)

50% De Chance de funcionar

Creditos:
Kaue
Robin.............................

por Mark- Qui 07 Fev 2013, 07:46

Não testei, mas deve estar funcionando, +1

por Snake Qui 07 Fev 2013, 09:59

O nome fica em cima da cabeça do jogador ?? ou fica em cima do nome do jogador ??
Eu uso isso pra ficar em sima do nome do jogador

VilaX = ConvertMapX(GetPlayerX(Index) * PIC_X) + Player(Index).XOffset + (PIC_X \ 2) - getWidth(TexthDC, (Trim$(VilaName))) + 2
If GetPlayerSprite(Index) < 1 Or GetPlayerSprite(Index) > NumCharacters Then
VilaY = ConvertMapY(GetPlayerY(Index) * PIC_Y) + Player(Index).YOffset -18
Else
VilaY = ConvertMapY(GetPlayerY(Index) * PIC_Y) + Player(Index).YOffset - (DDSD_Character(GetPlayerSprite(Index)).lHeight / 4) +2
End If

Concerteza funciona 100 % o nome da vila em cima do nome do play !

Se alguém quiser mudar a posição do nome da vila é só mudar esses números vermelhos no código.

por Monotoshi Qui 07 Fev 2013, 15:58

Snake se você não leu o titulo é encima da cabeça do personagen...

por Conteúdo patrocinado

Colocando Vila Encima da cabeça do personagen.

Colocando Vila Encima da cabeça do personagen.

Re: Colocando Vila Encima da cabeça do personagen.

Re: Colocando Vila Encima da cabeça do personagen.

Re: Colocando Vila Encima da cabeça do personagen.

Re: Colocando Vila Encima da cabeça do personagen.