Chapter 5 Drawing in Color

5.7 Examples of Simple Drawing Effects

To draw in the foreground color, use the default, or specify:ink +foreground-ink+.

To erase, specify:ink +background-ink+.

To draw in color, specify:ink +green+,:ink (make-rgb-color 0.6 0.0 0.4), and so forth.

To draw an opaque gray, specify:ink (make-gray-color 0.25). This will draw a shade of gray independent of the window's foreground color. On a non-color, non-grayscale display this will generally turn into a stipple.

To draw a stipple of little bricks, specify:ink bricks, wherebricks is defined as:

(make-rectangular-tile
 (make-pattern #2a(0 0 0 0 1 0 0 0 0)
               (0 0 0 1 0 0 0 0)
               (0 0 0 1 0 0 0 0)
               (1 1 1 1 1 1 1 1)
               (0 0 0 0 0 0 0 1)
               (0 0 0 0 0 0 0 1)
               (0 0 0 0 0 0 0 1)
               (1 1 1 1 1 1 1 1))
 (list +background+ +foreground+)) 8 8)
To draw a tiled pattern, specify :ink (make-rectangular-tile (make-pattern array colors)).

To draw a pixmap, use(draw-design (make-pattern array colors) medium).

5.7.1 - Using Flipping Ink

CLIM 2.0 User's Guide - OCT 1998

Generated with Harlequin WebMaker