Gama de colores para todos
Posted: Sat Feb 04, 2006 9:06 pm
Por si a alguien le interesa, ahí van algunos colores que utilizo en todos mis programas. Los he incluido en mi Colors.ch para no tener que definirlos a cada vez.
Primero, un par de funciones precompiladas que también tengo en Colors.ch, para los que como yo gustan de utilizar una amplia gama de colores. Son para aclarar u oscurecer colores especificos. Por Ejemplo ACLORO(CLR_BLUE,64) probadlas.
#xTranslate OSCURO( <nColor>,<nVar> ) => ;
RGB( MAX(0,nRGBRed( <nColor> )-<nVar> ) , ;
MAX(0,nRGBGreen( <nColor> )-<nVar> ) , ;
MAX(0,nRGBBlue( <nColor> )-<nVar> ) )
#xTranslate ACLARO( <nColor>,<nVar> ) => ;
RGB( MIN(255,nRGBRed( <nColor> )+<nVar> ) , ;
MIN(255,nRGBGreen( <nColor> )+<nVar> ) , ;
MIN(255,nRGBBlue( <nColor> )+<nVar> ) )
Los siguientes son colores pasteles, muy claritos para los fondos de los GET's
#define CLR_AZUL 16711408 // RGB( 240, 254, 254 )
#define CLR_PALIDO 14483198 // RGB( 254, 254, 220 )
#define CLR_ROSA 16771327 // RGB( 255, 232, 255 )
#define CLR_VERDE 15793904 // RGB( 240, 254, 240 )
Este es el Gris WINDOWS 95/98:
#define CLR_WGRAY 12566463 // RGB( 191, 191, 191 )
Estos colores faltaban en mi gama cromática:
#define CLR_NARANJA 42234 // RGB( 250, 164, 0 )
#define CLR_VIOLETA 7234710 // RGB( 150, 100, 110 ) violeta oscuro
#define CLR_BLUEW 10521740 // RGB( 140, 140, 160 ) azul grisaceo
#define CLR_CIELO 16774388 // RGB( 244, 244, 255 )
#define CLR_MARRON 3707588 // RGB( 212, 162, 72 )
Disfrutadlos.
Primero, un par de funciones precompiladas que también tengo en Colors.ch, para los que como yo gustan de utilizar una amplia gama de colores. Son para aclarar u oscurecer colores especificos. Por Ejemplo ACLORO(CLR_BLUE,64) probadlas.
#xTranslate OSCURO( <nColor>,<nVar> ) => ;
RGB( MAX(0,nRGBRed( <nColor> )-<nVar> ) , ;
MAX(0,nRGBGreen( <nColor> )-<nVar> ) , ;
MAX(0,nRGBBlue( <nColor> )-<nVar> ) )
#xTranslate ACLARO( <nColor>,<nVar> ) => ;
RGB( MIN(255,nRGBRed( <nColor> )+<nVar> ) , ;
MIN(255,nRGBGreen( <nColor> )+<nVar> ) , ;
MIN(255,nRGBBlue( <nColor> )+<nVar> ) )
Los siguientes son colores pasteles, muy claritos para los fondos de los GET's
#define CLR_AZUL 16711408 // RGB( 240, 254, 254 )
#define CLR_PALIDO 14483198 // RGB( 254, 254, 220 )
#define CLR_ROSA 16771327 // RGB( 255, 232, 255 )
#define CLR_VERDE 15793904 // RGB( 240, 254, 240 )
Este es el Gris WINDOWS 95/98:
#define CLR_WGRAY 12566463 // RGB( 191, 191, 191 )
Estos colores faltaban en mi gama cromática:
#define CLR_NARANJA 42234 // RGB( 250, 164, 0 )
#define CLR_VIOLETA 7234710 // RGB( 150, 100, 110 ) violeta oscuro
#define CLR_BLUEW 10521740 // RGB( 140, 140, 160 ) azul grisaceo
#define CLR_CIELO 16774388 // RGB( 244, 244, 255 )
#define CLR_MARRON 3707588 // RGB( 212, 162, 72 )
Disfrutadlos.