[ APORTE ]x posibilidad de que el Hechizo falle
2 participantes
Página 1 de 1.
[ APORTE ]x posibilidad de que el Hechizo falle
En el sub hechizopropusuario buscamos
fue
- 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
- 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:
- Gs zone
Temas similares
» [Aporte]Obj de IAO 1.4.9
» [Aporte] MD ega por 1000 Style TP
» [ APORTE ] Ciudad 1
» [Aporte] Librerias
» [Aporte] 2 conectar
» [Aporte] MD ega por 1000 Style TP
» [ APORTE ] Ciudad 1
» [Aporte] Librerias
» [Aporte] 2 conectar
Página 1 de 1.
Permisos de este foro:
No puedes responder a temas en este foro.
|
|