Colores.

  • Iniciador del tema Miembro eliminado 136
  • Fecha de inicio
Estado
Cerrado para nuevas respuestas.
M

Miembro eliminado 136

Invitado
Como podria hacer para cambiar el color de habla ?


osea

Si es Ciuda que hable en azul
Si es crimi que hable en Rojo
si es mujer que hable en Celeste.


Eso por un lado y despues crear la manera de habla de iao...
osea


TODO LO QUE HABLAN EN EL CAMPO DE VISION DEL USUARIO, SE PONE EN LA CONSOLA.

Muchas gracias.
 
M

Miembro eliminado 136

Invitado
:d

muchisimas grax!! despues lo pruebo y te digo que onda! pero vale ;)
 
M

Miembro eliminado 136

Invitado
:)

Mira lo probe, anda, pero me gustaria arreglarle algunas cositas :p

por ejemplo que los gms hablen en verde, y que lo de consola aparesca en otro color, pero voy a ver si me sale amí, sino te aviso!
muchas gracias che
 
A

Anonymous

Invitado
Lo de la consola, fijate las declarariones del front_tiype, creo que ya vienen en rgb asi que es mas facil.
 
M

Miembro eliminado 136

Invitado
je, me vas a matar :p

gente linda xD! Lo probe y no me gusto como queda! pero me gustaria hacer esto


que todo lo que hablan en el campo de vision se ponga x consola en blanco comun. y que lo de gm aparesca en verde x consola ;)


grax che, y perdonen ;)
 
M

Miembro eliminado 136

Invitado
:)

je, la verdad q me re perdi

en fin, lo que uqiero



dejar todo como esta pero que aparesca todo lo que hablen por consola..(del campo de vision)

lo que hablen los gms en Verde gm :p
lo que hablen los useres comunes en blanco y lo que hablen los muertos en gris feo :p

nada mas...

todo por consoloa :p


grax
 
M

Miembro eliminado 136

Invitado
Le agregue una linea ;)

If UserList(UserIndex).flags.Muerto = 1 And UserList(UserIndex).flags.Privilegios " & rdata & "~127~127~127~0~0")
ElseIf UserList(UserIndex).flags.Muerto = 0 And UserList(UserIndex).flags.Privilegios " & rdata & "~255~255~255~0~0")
ElseIf UserList(UserIndex).flags.Privilegios > 0 Then
Call SendData(ToPCArea, UserIndex, UserList(UserIndex).Pos.Map, "||" & UserList(UserIndex).Name & "> " & rdata & "~0~255~0~0~0")
Call SendData(ToPCArea, UserIndex, UserList(UserIndex).Pos.Map, "||" & vbGreen & "°" & rdata & "°" & str(ind))
End If

anda perfecto!
tenia un errorsito el que me pusiste vos! grax che
 

facundo

Oráculo Lvl 3
Si, seguramente tenia un error porque lo hice ak asi nomas. Y cuando miraba no entendia nada :lol:

De nada
:wink:
 
M

Miembro eliminado 136

Invitado
:D

jaja si, realmente es una boludes el code, pero nose porque es tan complicado!!
 
Estado
Cerrado para nuevas respuestas.
Arriba