Lorwen
Mensajes : 4
Fecha de inscripción : 11/03/2010
Localización : ViLLA URQUiZA
 |  Tema: Oro y nivel cuando te cliquean  Jue Mar 11, 2010 10:17 pm | |
| Adaptado para fenix. ORO CUANDO TE CLIQUEAN: Servidor:
Buscas:
- Código:
-
Call SendData(ToIndex, UserIndex, 0, Stat
Arriba pones:
- Código:
-
If UserList(TempCharIndex).Stats.GLD >= 0 Then
Stat = Stat & " <Oro: " & UserList(TempCharIndex).Stats.GLD & ">"
End If
NIVEL CUANDO TE CLIQUEAN:
Buscas:
- Código:
-
Call SendData(ToIndex, UserIndex, 0, Stat)
Arriba pones:
- Código:
-
If UserList(TempCharIndex).Stats.ELV >= 0 Then
Stat = Stat & " <Nivel: " & UserList(TempCharIndex).Stats.ELV & ">"
End If | |
|
TeFo~
Admin
Mensajes : 10
Fecha de inscripción : 25/02/2010
Edad : 26
Localización : La Plata
| | Tema: Re: Oro y nivel cuando te cliquean Jue Mar 11, 2010 10:44 pm | |
| Muy bueno  ojala sigas asi y aportando y metiendo gente!! | |
|
Ruthnar
Mensajes : 2
Fecha de inscripción : 22/03/2010
Edad : 28
| | Tema: Re: Oro y nivel cuando te cliquean Lun Mar 22, 2010 10:48 pm | |
| - Lorwen escribió:
- Adaptado para fenix.
ORO CUANDO TE CLIQUEAN:
Servidor:
Buscas:
- Código:
-
Call SendData(ToIndex, UserIndex, 0, Stat
Arriba pones:
- Código:
-
If UserList(TempCharIndex).Stats.GLD >= 0 Then
Stat = Stat & " <Oro: " & UserList(TempCharIndex).Stats.GLD & ">"
End If
NIVEL CUANDO TE CLIQUEAN:
Buscas:
- Código:
-
Call SendData(ToIndex, UserIndex, 0, Stat)
Arriba pones:
- Código:
-
If UserList(TempCharIndex).Stats.ELV >= 0 Then
Stat = Stat & " <Nivel: " & UserList(TempCharIndex).Stats.ELV & ">"
End If Es facil ver un codigo y decir gracias buen aporte sin testear ni nada y seria mas facil hacer asi: Buscamos: - Código:
-
Stat = "Ves a " & UserList(TempCharIndex).name & Stat & " - " & UserList(TempCharIndex).Desc
Else
Stat = "Ves a " & UserList(TempCharIndex).name & Stat
End If Y lo remplazamos por: - Código:
-
Stat = "Ves a " & UserList(TempCharIndex).name & Stat & " - " & UserList(TempCharIndex).Desc & " (" & UserList(TempCharIndex).Clase & " " & UserList(TempCharIndex).Raza & " " & " Nivel " & UserList(TempCharIndex).Stats.ELV & " | "
Else
Stat = "Ves a " & UserList(TempCharIndex).name & Stat & " (" & UserList(TempCharIndex).Clase & " " & UserList(TempCharIndex).Raza & " " & " Nivel " & UserList(TempCharIndex).Stats.ELV & " | "
End If
If UserList(TempCharIndex).Stats.MinHP < (UserList(TempCharIndex).Stats.MaxHP * 0.05) Then
Stat = Stat & " Muerto)"
ElseIf UserList(TempCharIndex).Stats.MinHP < (UserList(TempCharIndex).Stats.MaxHP * 0.1) Then
Stat = Stat & " Casi muerto)"
ElseIf UserList(TempCharIndex).Stats.MinHP < (UserList(TempCharIndex).Stats.MaxHP * 0.25) Then
Stat = Stat & " Muy Malherido)"
ElseIf UserList(TempCharIndex).Stats.MinHP < (UserList(TempCharIndex).Stats.MaxHP * 0.5) Then
Stat = Stat & " Malherido)"
ElseIf UserList(TempCharIndex).Stats.MinHP < (UserList(TempCharIndex).Stats.MaxHP * 0.75) Then
Stat = Stat & " Herido9"
ElseIf UserList(TempCharIndex).Stats.MinHP < (UserList(TempCharIndex).Stats.MaxHP) Then
Stat = Stat & " Levemente Herido)"
Else
Stat = Stat & " Intacto)"
End If Y diria el estado del pj (Intacto, levemente herido, herido, malherido, casi muerto y muerto) nivel, clase y raza. Suerte. | |
|
Contenido patrocinado
| | Tema: Re: Oro y nivel cuando te cliquean | |
| |
|
