Visible to Intel only — GUID: GUID-C4C580DD-E1C0-4409-B204-D452E19FC11F
Visible to Intel only — GUID: GUID-C4C580DD-E1C0-4409-B204-D452E19FC11F
INTEGERTORGB
QuickWin Subroutine: Converts an RGB color value into its red, green, and blue components. This routine is only available for Windows.
Module
USE IFQWIN
CALL INTEGERTORGB (rgb,red,green,blue)
rgb |
(Input) INTEGER(4). RGB color value whose red, green, and blue components are to be returned. |
red |
(Output) INTEGER(4). Intensity of the red component of the RGB color value. |
green |
(Output) INTEGER(4). Intensity of the green component of the RGB color value. |
blue |
(Output) INTEGER(4). Intensity of the blue component of the RGB color value. |
INTEGERTORGB separates the four-byte RGB color value into the three components as follows:
Example
! build as a QuickWin App.
USE IFQWIN
INTEGER(4) r, g, b
CALL INTEGERTORGB(2456, r, g, b)
write(*,*) r, g, b
END