ÍndiceCalendarioIndiceFAQBuscarMiembrosGrupos de UsuariosRegistrarseConectarseReglamento
¿Quién está en línea?
En total hay 1 usuario en línea: 0 Registrados, 0 Ocultos y 1 Invitado

Ninguno

La mayor cantidad de usuarios en línea fue 16 el Miér Ago 07, 2013 8:12 pm.
Mejores posteadores
Rango
 
Habauc
 
Trogclodita
 
WhoTeR
 
Tomm-
 
ZankuR
 
GM-PekeMixz
 
LuciMoyo
 
MwM
 
Diclut s2 Lalaa♥
 
Estadísticas
Tenemos 97 miembros registrados.
El último usuario registrado es PekeMixzGamer1

Nuestros miembros han publicado un total de 1289 mensajes en 264 argumentos.

Comparte | 
 

 X Posibilidad De Que El Echizo Falle 11.5

Ir abajo 
AutorMensaje
powerid
Inicial
Inicial
avatar

Cantidad de envíos : 18
Fecha de inscripción : 14/08/2013
Edad : 18
Localización : Pehuajo

MensajeTema: X Posibilidad De Que El Echizo Falle 11.5   Miér Ago 14, 2013 2:24 pm

Explicación:Al intentar pegarle a un usuario con hechizo tenes x posibilidades de que el hechizo falle.

Comenzamos.

En el sub hechizopropusuario buscamos
Código:
'If UserList(UserIndex).Name = "EL OSO" Then
        '    Call SendData(SendTarget.ToIndex, UserIndex, 0, "|| le tiro el hechizo " & H & " a " & UserList(tempChr).Name & FONTTYPE_VENENO)
        'End If
Abajo ponen
       
Código:
Dim defensaAzar As Integer
        defensaAzar = RandomNumber(1, 6)
        If defensaAzar = 1 Then
        Call SendData(SendTarget.ToIndex, userindex, 0, "||Tu hechizo ha fallado." & FONTTYPE_GUILD)
        Call SendData(SendTarget.ToPCArea, userindex, UserList(userindex).Pos.Map, "||" & &HFFFF& & "°¡Fallo!" & "°" & str(UserList(userindex).Char.CharIndex))
        Exit Sub
        End If
Listo gente es funcional,testeado.
Volver arriba Ir abajo
Ver perfil de usuario http://Www.sleyderao.es.tl
 
X Posibilidad De Que El Echizo Falle 11.5
Volver arriba 
Página 1 de 1.
 Temas similares
-
» Mi novia me pidio un tiempo
» [Debate] Posibilidad de NE a China

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