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:
Lo reemplazamos por:
Nota: Las X deben ser reemplazadas por los requisitos de nivel y las Y deben ser reemplazadas por los 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
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.