Todo sobre AO
 
ÍndiceFAQBuscarMiembrosGrupos de UsuariosRegistrarseConectarse

Comparte | 
 

 Invisibilidad Informa cuando faltan 5 segundos

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


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

MensajeTema: Invisibilidad Informa cuando faltan 5 segundos   Jue Jul 03, 2008 12:24 am

en el sub efectoInvisibilidad, tienen q reemplazar TODO( todo todo eh!!) por esto
Citación :

Public Sub EfectoInvisibilidad(ByVal UserIndex As Integer)
If UserList(UserIndex).Counters.Invisibilidad < IntervaloInvisible Then
UserList(UserIndex).Counters.Invisibilidad = UserList(UserIndex).Counters.Invisibilidad + 1
If UserList(UserIndex).Counters.Invisibilidad >= IntervaloInvisible - (ContadorParaInvi * 25) Then
If UserList(UserIndex).Counters.Invisibilidad Mod 25 = 0 Then
Call SendData(ToIndex, UserIndex, 0, "||Te quedan " & str$((IntervaloInvisible - UserList(UserIndex).Counters.Invisibilidad) / 25) & " segundos antes de quedar visible!!" & FONTTYPE_INFO)
End If
End If
Else
Call SendData(ToIndex, UserIndex, 0, "||Has vuelto a ser visible." & FONTTYPE_INFO)
UserList(UserIndex).Counters.Invisibilidad = 0
UserList(UserIndex).flags.Invisible = 0
UserList(UserIndex).flags.Oculto = 0
Call SendData(ToMap, 0, UserList(UserIndex).Pos.Map, "NOVER" & UserList(UserIndex).Char.CharIndex & ",0")
End If
End Sub
despues tienen q crear una constante, para eso van al modulo declares y ponen
Citación :

Public const ContadorParaInvi = 5
Volver arriba Ir abajo
Ver perfil de usuario http://recompilacionao.forosactivos.com
 
Invisibilidad Informa cuando faltan 5 segundos
Ver el tema anterior Ver el tema siguiente Volver arriba 
Página 1 de 1.
 Temas similares
-
» jhen moran?? cuando
» ¿Cuando finaliza el juego?
» Sabes que no sirves para nada cuando...
» Que se debe de hacer cuando te aburres de la supemacía, las BOS, los negros , bako, etc....
» cuando marcais un gol a un guiri lo celebrais picandole?

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