pen
Entity: predicate and function

Usage:
pen(PenWidth, Color)
Pen is pen(PenWidth, Color)

Gets/sets the current pen color and line width.
 
PenWidth line width in pixels (put zero for transparent pen).
Color  integer containing a color, you can use rgb to create such integer.

If some of the arguments are not-instantiated variables, they take the current values. Otherwise their values are set.

Example:

?-window( _, _, win_func(_), "Pen Demo", 100, 100, 200, 200).

win_func(paint):-
  pen(1, rgb(255,0,0)), line(0,0,200,200),
  pen(5, rgb(0,0,255)), line(0,200,200,0).

See also:

brush
color_text
color_text_back