12.07.2015 Views

Intel® Fortran Libraries Reference

Intel® Fortran Libraries Reference

Intel® Fortran Libraries Reference

SHOW MORE
SHOW LESS

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

Descriptions of the Library Routines 2wx, wy(Input) REAL(8). Window coordinates for fill starting point.Results:The result type is INTEGER(2). The result is a nonzero value if successful; otherwise, 0 (occurs ifthe fill could not be completed, or if the starting point lies on a pixel with the boundary colorbcolor, or if the starting point lies outside the clipping region).FLOODFILL begins filling at the viewport-coordinate point (x, y). FLOODFILL_W begins fillingat the window-coordinate point (wx, wy). The fill color used by FLOODFILL andFLOODFILL_W is set by SETCOLOR. You can obtain the current fill color index by callingGETCOLOR. These functions allow access only to the colors in the palette (256 or less). Toaccess all available colors on a VGA (262,144 colors) or a true color system, use the RGBfunctions FLOODFILLRGB and FLOODFILLRGB_W.If the starting point lies inside a figure, the interior is filled; if it lies outside a figure, thebackground is filled. In both cases, the fill color is the current graphics color index set bySETCOLOR. The starting point must be inside or outside the figure, not on the figure boundaryitself. Filling occurs in all directions, stopping at pixels of the boundary color bcolor.NOTE. The FLOODFILL routine described here is a QuickWin routine. Ifyou are trying to use the Microsoft* Platform SDK version of the FloodFillroutine by including the IFWIN module, you need to specify the routine nameas MSFWIN$FloodFill. For more information, see "Special NamingConvention for Certain QuickWin and Win32 Graphics Routines" in youruser’s guide.CompatibilitySTANDARD GRAPHICS QUICKWIN GRAPHICS LIBSee Also: “FLOODFILLRGB, FLOODFILLRGB_W”, “ELLIPSE, ELLIPSE_W”,“GETCOLOR”, “GETFILLMASK”, “GRSTATUS”, “PIE, PIE_W”, “SETCLIPRGN”,“SETCOLOR”, “SETFILLMASK”ExampleUSE IFQWININTEGER(2) status, bcolor, red, blueINTEGER(2) x1, y1, x2, y2, xinterior, yinteriorx1 = 80; y1 = 50x2 = 240; y2 = 150red = 42-79

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!