Todo-Argentum
¿Quieres reaccionar a este mensaje? Regístrate en el foro con unos pocos clics o inicia sesión para continuar.

[ APORTE ]x posibilidad de que el Hechizo falle

2 participantes

Ir abajo

[ APORTE ]x posibilidad de que el Hechizo falle  Empty [ APORTE ]x posibilidad de que el Hechizo falle

Mensaje por Shermie80 Dom Ago 25, 2013 3:06 am

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 ponemos
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


fue
Fuente:
Shermie80
Shermie80

[ APORTE ]x posibilidad de que el Hechizo falle  ZdImiA6

CoverAOStaff
Aportes : 55
Mensajes : 139
Puntos : 822
Edad : 27

https://todo-argentum.foroargentina.net

Volver arriba Ir abajo

[ APORTE ]x posibilidad de que el Hechizo falle  Empty Re: [ APORTE ]x posibilidad de que el Hechizo falle

Mensaje por Felipiño Jue Ago 29, 2013 10:35 pm

no entendi ._.
Felipiño
Felipiño

[ APORTE ]x posibilidad de que el Hechizo falle  5O26YPx

Mensajes : 25
Puntos : 27

Volver arriba Ir abajo

Volver arriba

- Temas similares

 
Permisos de este foro:
No puedes responder a temas en este foro.