Aporte de Estados

Bueno.. les vengo a dejar unos Estados que no vi en el Foro y que quizas les pueden gustar ^^

buscamos:

Mostrar Todo el Código | Numero de Linea | Ocultar/Mostrar | Seleccionar todo

1. Stat = "Ves a " & UserList(TempCharIndex).name & Stat & " - " & UserList(TempCharIndex).Desc
2. Else
3. Stat = "Ves a " & UserList(TempCharIndex).name & Stat
4. End If



y debajo colocamos

Mostrar Todo el Código | Numero de Linea | Ocultar/Mostrar | Seleccionar todo

1. If UserList(TempCharIndex).flags.Estupidez = True Then
2. Stat = Stat & ""
3. End If
4. If UserList(TempCharIndex).flags.Ceguera = True Then
5. Stat = Stat & ""
6. End If
7. If UserList(TempCharIndex).flags.Navegando = True Then
8. Stat = Stat & ""
9. End If
10. If UserList(TempCharIndex).flags.Silenciado = True Then
11. Stat = Stat & ""
12. End If
13.
14. If UserList(TempCharIndex).flags.Desnudo = True Then
15. Stat = Stat & ""
16. End If




Y con esto agregariamos los estados del usuario , , , .

Espero que les guste son todos echos por mí, no estan testeados pero deberían ser funcionales ^.^

Funciones: por si estas con algun Team y acabas de loguear y el esta con ceguera, te podes dar cuenta.
su funcion es nula.
tiene una gran funcion ya que me ha pasado en varios server que yo queria hablar con amigos, pero estaba silenciado y ellos no sabian.
por si estas con algun amigo, y no se mueve bien, le haces click y verificas si tiene estupidez.
su funcion es nula.

Nos vemos...