Rangos

Estado
Cerrado para nuevas respuestas.

Lagalot

Newbie Lvl 6
[SERVIDOR] Rangos

Codigo Para El Servidor

*Origenes del codigo: me base en un juego pago que se llama tibia, en el se pueden encontrar cosas diversas y bastante interesantes, soy un druida lvl 22 =).. Pueden bajar el tibia de http://Www.tibia.com.

+Objetivo del codigo: segun tu nivel obtener una clasificacion en tu nick, ideal para duelos ya que puedes tener cierta idea del nivel de tu oponente.

-Instalacion: realmente sencilla, no hay que declarar nada, solo crear algunos if y ya esta ;).

Here we go...

Buscamos:
Código:
if EsNewbie(TempCharIndex) Then
                    Stat = " <NEWBIE>"
                End If
Lo reemplazamos por:
Código:
If UserList(TempCharIndex).Stats.ELV < X Then
                    Stat = " <Y>"
                ElseIf UserList(TempCharIndex).Stats.ELV > X _
                And UserList(TempCharIndex).Stats.ELV < X Then
                    Stat = " <Y>"
                ElseIf UserList(TempCharIndex).Stats.ELV > X _
                And UserList(TempCharIndex).Stats.ELV < X Then
                    Stat = " <Y>"
                ElseIf UserList(TempCharIndex).Stats.ELV > X _
                And UserList(TempCharIndex).Stats.ELV < X Then
                    Stat = " <Y>"
                ElseIf UserList(TempCharIndex).Stats.ELV > X Then
                    Stat = " <Y>"
                Else
                    Stat = " <No rankeado>"
                End If
Nota: Las X deben ser reemplazadas por los requisitos de nivel y las Y deben ser reemplazadas por los rangos.
 
A

Anonymous

Invitado
en que parte buscamos esto?
if EsNewbie(TempCharIndex) Then
Stat = " "
End If


osea en que parte de codigo
 
Estado
Cerrado para nuevas respuestas.
Arriba