Intel® Fortran Libraries Reference

2 Intel Fortran Libraries ReferenceSyntaxresult = SETCOLOR (color)color(Input) INTEGER(2). Color index to set the current graphics color to.Results:The result type is INTEGER(2). The result is the previous color index if successful; otherwise, –1.The SETCOLOR function sets the current graphics color index, which is used by graphicsfunctions such as ELLIPSE. The background color index is set with SETBKCOLOR. The colorindex of text over the background color is set with SETTEXTCOLOR. These non-RGB colorfunctions use color indexes, not true color values, and limit the user to colors in the palette, at most256. For access to all system colors, use SETCOLORRGB, SETBKCOLORRGB, andSETTEXTCOLORRGB.CompatibilitySTANDARD GRAPHICS QUICKWIN GRAPHICS LIBSee Also: “SETCOLORRGB”, “GETCOLOR”, “REMAPPALETTERGB”, “SETBKCOLOR”,“SETTEXTCOLOR”, “SETPIXEL, SETPIXEL_W”, “SETPIXELS”ExampleUSE IFQWININTEGER(2) color, oldcolorLOGICAL statusTYPE (windowconfig) wcstatus = GETWINDOWCONFIG(wc)color = wc%numcolors - 1oldcolor = SETCOLOR(color)ENDSETCOLORRGBGraphics Function: Sets the current graphics color to the specified Red-Green-Blue (RGB)value. This function is only available on Windows* systems.Module: USE IFQWINSyntaxresult = SETCOLORRGB (color)2-392