[Aporte] Al clickear a un usuario dice el oro, la vida, el nivel y los frags.

Estado
Cerrado para nuevas respuestas.

Ambrousin

hgghjfgj
Hola, éste es mi primer aporte, acá les digo el code para que al clickear a un usuario dice el oro, la vida, los frags y el nivel
Empezemos:

Buscamos
Código:
                       If Len(.desc) > 0 Then
                            Stat = "Ves a " & .name & Stat & " - " & .desc
                        Else
                            Stat = "Ves a " & .name & Stat
                        End If
Y lo reemplazamos por:
Código:
If Len(UserList(TempCharIndex).desc) > 0 Then
                    Stat = "Ves a " & UserList(TempCharIndex).name & Stat & " - " & "<" & "Nivel: " & UserList(TempCharIndex).Stats.ELV & "> " & "<Frags: " & (UserList(TempCharIndex).Stats.UsuariosMatados) & "> " & "<Oro: " & (UserList(TempCharIndex).Stats.GLD) & "> " & UserList(TempCharIndex).desc
                Else
                    Stat = "Ves a " & UserList(TempCharIndex).name & Stat & " - " & "<" & "Nivel: " & UserList(TempCharIndex).Stats.ELV & "> " & "<Frags: " & (UserList(TempCharIndex).Stats.UsuariosMatados) & "> " & "<Oro: " & (UserList(TempCharIndex).Stats.GLD) & "> "
                End If
                        
                         If UserList(TempCharIndex).Stats.MinHp < (UserList(TempCharIndex).Stats.MaxHp * 0.05) Then
                    Stat = Stat & " <Vida 0%>"
                ElseIf UserList(TempCharIndex).Stats.MinHp < (UserList(TempCharIndex).Stats.MaxHp * 0.1) Then
                    Stat = Stat & " <Vida 15%>"
                ElseIf UserList(TempCharIndex).Stats.MinHp < (UserList(TempCharIndex).Stats.MaxHp * 0.25) Then
                    Stat = Stat & " <Vida 35%>"
                ElseIf UserList(TempCharIndex).Stats.MinHp < (UserList(TempCharIndex).Stats.MaxHp * 0.5) Then
                    Stat = Stat & " <Vida 55%>"
                ElseIf UserList(TempCharIndex).Stats.MinHp < (UserList(TempCharIndex).Stats.MaxHp * 0.75) Then
                    Stat = Stat & " <Vida 75%>"
                ElseIf UserList(TempCharIndex).Stats.MinHp < (UserList(TempCharIndex).Stats.MaxHp) Then
                    Stat = Stat & " <Vida 95%>"
                Else
                    Stat = Stat & " <Vida 100%>"
                End If
Nos vemos, espero que les sirva.
 

Samke

Connectis-ICT Services
Lo mejor es cuando robas por ejemplo ami ^^, lo unico que hicistes es agarrar lo que hice yo y agarrar otro aporte y ponerlo aca y cambiar enves que diga "Intacto", "Vida 0%" ¬¬, si empesas asi, dedicate a otra cosa ;)

Saludos ^^
 
Estado
Cerrado para nuevas respuestas.
Arriba