whatcolortext color graphics function

Syntax   whatcolor : int

Description   The whatcolor function is used to determine the current (foreground) color, ie., the color used for characters that are output using put. The alternate spelling is whatcolour.

Example   This program outputs the currently-active color number. The message is also given in the currently-active color.

        setscreen ("graphics")
        put "This writing is in color number ", whatcolor
Details   The screen should be in a "screen" or "graphics" mode. See setscreen for details.

See also   the color procedure, which is used to set the color. See also colorback and whatcolorback.

See also predefined unit Text.