El usuario o npc dice si falla arriba de ellos

En SistemasDeCombate en

Citación :

Public Sub UsuarioAtacaNpc(ByVal UserIndex As Integer, ByVal NpcIndex As Integer)

Buscas:

Citación :

Call SendData(ToPCArea, UserIndex, UserList(UserIndex).Pos.Map, "TW" & SOUND_SWING)
Call SendData(ToIndex, UserIndex, 0, "U1")

y abajo de eso pones :

Citación :

Call SendData(ToPCArea, UserIndex, UserList(UserIndex).Pos.Map, "||" & vbRed & "Fallas" & str(UserList(UserIndex).Char.charindex))

y quedaria asi :

Citación :

Call SendData(ToPCArea, UserIndex, UserList(UserIndex).Pos.Map, "TW" & SOUND_SWING)
Call SendData(ToIndex, UserIndex, 0, "U1")
Call SendData(ToPCArea, UserIndex, UserList(UserIndex).Pos.Map, "||" & vbRed & "Fallas" & str(UserList(UserIndex).Char.charindex))

PARA LOS NPCS
En

Citación :

Public Sub NpcAtacaUser(ByVal NpcIndex As Integer, ByVal UserIndex As Integer)

y ahi buscas

Citación :

Call SendData(ToIndex, UserIndex, 0, "N1")

y abajo pones

Citación :

Call SendData(ToPCArea, UserIndex, UserList(UserIndex).Pos.Map, "||" & vbRed & "°Falla" & "°" & str(Npclist(NpcIndex).Char.charindex))