SpikeL Comunidad
Hola, bienvenido a SpikeL Foro.

Si eres nuevo, deves registrarte.

Si ya tienes una cuenta, deves ingresar.

¡Muchas gracias!

PD: Si te has registrado pero no puedes logear tienes que activar tu cuenta desde tu e-mail.


Unirse al foro, es rápido y fácil

SpikeL Comunidad
Hola, bienvenido a SpikeL Foro.

Si eres nuevo, deves registrarte.

Si ya tienes una cuenta, deves ingresar.

¡Muchas gracias!

PD: Si te has registrado pero no puedes logear tienes que activar tu cuenta desde tu e-mail.
SpikeL Comunidad
¿Quieres reaccionar a este mensaje? Regístrate en el foro con unos pocos clics o inicia sesión para continuar.



Dados siempre +18

SpikeL Comunidad :: Argentum Online :: Programación :: AO 13.x

Ir abajo

Tutorial Dados siempre +18

Mensaje por Rinnegan Sáb Feb 05, 2011 2:31 am

Todo en el servidor

Apretamos control+f y seleccionamos la 3ra opcion y buscamos :

Private Sub HandleThrowDices(ByVal UserIndex As Integer)

Remplazamos todo ese sub por este :

Private Sub HandleThrowDices(ByVal UserIndex As Integer)

Call UserList(UserIndex).incomingData.ReadByte

With UserList(UserIndex).Stats
.UserAtributos(eAtributos.Fuerza) = 18
.UserAtributos(eAtributos.Agilidad) = 18
.UserAtributos(eAtributos.Inteligencia) = 18
.UserAtributos(eAtributos.Carisma) = 18
.UserAtributos(eAtributos.Constitucion) = 18
End With

Call WriteDiceRoll(UserIndex)
End Sub
Rinnegan
Rinnegan
Nivel 1
Nivel 1

Medallas
Dados siempre +18 Prensa1
Mensajes Mensajes : 17
Puntos Puntos : 48520
Reputación Reputación : 0
Fecha de inscripción Fecha de inscripción : 05/02/2011
País País : Argentina


Volver arriba Ir abajo

Volver arriba

SpikeL Comunidad :: Argentum Online :: Programación :: AO 13.x

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