Todo sobre AO
 
ÍndiceFAQBuscarMiembrosGrupos de UsuariosRegistrarseConectarse

Comparte | 
 

 Los NPC nos dicen el daño

Ver el tema anterior Ver el tema siguiente Ir abajo 
AutorMensaje
Agus
Admin


Mensajes : 69
Fecha de inscripción : 01/07/2008

MensajeTema: Los NPC nos dicen el daño   Vie Ago 01, 2008 8:10 pm

Para que los NPC nos digan el daño, o curacion que le realizamos sobre sus cabezas

En modHechizos....
Buscamos
Citación :
If Hechizos(hIndex).SubeHP = 1 Then
daño = RandomNumber(Hechizos(hIndex).MinHP, Hechizos(hIndex).MaxHP)
daño = daño + Porcentaje(daño, 3 * UserList(UserIndex).Stats.ELV)

Debajo colocamos...
Citación :
Call SendData(ToPCArea, UserIndex, UserList(UserIndex).Pos.Map, "||" & vbGreen & "°+" & daño & "°" & str(Npclist(NpcIndex).Char.charindex))


Buscamos
Citación :
Npclist(NpcIndex).Stats.MinHP = Npclist(NpcIndex).Stats.MinHP - daño
SendData ToIndex, UserIndex, 0, "||Le has causado " & daño & " puntos de daño a la criatura!" & FONTTYPE_FIGHT
Call CalcularDarExp(UserIndex, NpcIndex, daño)

y arriba colocamos....
Citación :
Call SendData(ToPCArea, UserIndex, UserList(UserIndex).Pos.Map, "||" & vbRed & "°-" & daño & "°" & str(Npclist(NpcIndex).Char.charindex))


Ahora en SistemaCombate
Buscamos....
Citación :

Call SendData(ToIndex, UserIndex, 0, "U2" & daño)
Call CalcularDarExp(UserIndex, NpcIndex, daño)

y arriba ponemos....
Citación :
Call SendData(ToPCArea, UserIndex, UserList(UserIndex).Pos.Map, "||" & vbRed & "°-" & daño & "°" & str(Npclist(NpcIndex).Char.charindex))
Volver arriba Ir abajo
Ver perfil de usuario http://recompilacionao.forosactivos.com
 
Los NPC nos dicen el daño
Ver el tema anterior Ver el tema siguiente Volver arriba 
Página 1 de 1.
 Temas similares
-
» AOM: que dicen ellos?
» Imagenes que dicen la verdad
» Mis amigas dicen que estoy cambiada
» Me dicen chachi
» ¿Dicen que soy un falso es verdad?

Permisos de este foro:No puedes responder a temas en este foro.
 :: Argentum Online :: Programación :: 0.11.2-
Cambiar a: