[EO] Colocando Nome nos NPCs 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.

[EO] Colocando Nome nos NPCs

Ir para baixo

[EO] Colocando Nome nos NPCs Empty [EO] Colocando Nome nos NPCs

Mensagem por Valentine Qui Out 28, 2010 3:56 pm

1)Vá até:
modDirectDraw7

2)Procure por:
Código:
' draw player names

3)Embaixo desse código coloque:
Código:
    ' draw npc names
    For i = 1 To MAX_MAP_NPCS
        Call DrawNPCName(i)
    Next i



4)Agora procure por:
Public Sub DrawPlayerName

5)Obs.: No código abaixo, para mudar a cor vá na linha:
Código:
Call DrawText(TexthDC, TextX, TextY, NpcName, QBColor(White))

E mude o White

6)Embaixo ou antes desse código coloque:
Código:
Public Sub DrawNPCName(ByVal Index As Long)
    Dim NpcName As String
    Dim TextX As Long, TextY As Long, Sprite As Long, NpcNum As Long
 
    NpcNum = MapNpc(Index).Num
 
    If NpcNum = 0 Then
        Exit Sub
    End If
 
    Sprite = Npc(NpcNum).Sprite
    NpcName = Trim$(Npc(NpcNum).Name)
 
    ' Calculate the X coordinate to place the name
    TextX = ConvertMapX(MapNpc(Index).X * PIC_X) + MapNpc(Index).XOffset + (PIC_X \ 2) - getWidth(TexthDC, NpcName)
 
    If Sprite < 1 Or Sprite > NumCharacters Then
        TextY = ConvertMapY(MapNpc(Index).Y * PIC_Y) + MapNpc(Index).YOffset - 17
    Else
        TextY = ConvertMapY(MapNpc(Index).Y * PIC_Y) + MapNpc(Index).YOffset - (DDSD_Character(Sprite).lHeight) + 16
    End If
 
    ' Draw name
    Call DrawText(TexthDC, TextX, TextY, NpcName, QBColor(White))
End Sub
Valentine
Valentine
Administrador
Administrador

Medalhas : [EO] Colocando Nome nos NPCs ZgLkiRU
Mensagens : 5341
Créditos : 1164

https://www.aldeiarpg.com/

Ir para o topo Ir para baixo

[EO] Colocando Nome nos NPCs Empty Re: [EO] Colocando Nome nos NPCs

Mensagem por Valentine Ter Fev 15, 2011 4:06 pm

Tópico trancado devido a nova versão do eclipse ja ter esse sistema
Valentine
Valentine
Administrador
Administrador

Medalhas : [EO] Colocando Nome nos NPCs ZgLkiRU
Mensagens : 5341
Créditos : 1164

https://www.aldeiarpg.com/

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