2 GP Reference Entries

draw-polygons

Function

Summary

Draws several polygons.

Signature

draw-polygon port description &rest args &key filled closed fill-rule =>

Arguments

port: A graphics port
description: A list of real numbers
filled: A boolean
closed: A boolean
fill-rule: A keyword
args: General graphics port drawing arguments

Description

Thedraw-polygons function draws several polygon using a sequence alternating x and y values in the description argument as the vertices. The description arguments consists of groups of points as indraw-polygon. When closed is non-nil the edge from the last vertex to the first to be drawn. When filled is non-nil a filled, closed polygons are drawn; the closed argument is ignored if filled is non-nil. transform, foreground, background, operation, thickness, scale-thickness, dashed, dash, line-end-style, line-joint-style, stipple, pattern, mask-x, mask-y, and mask from the port's graphics state are all used. The fill-rule specifies how overlapping regions are filled. Possible values are:even-odd and:winding.

Example

This draws two heaxgons, one inside the other:

(gp:draw-polygons oo 
                  '((150 100 200 100 235 150 200 
                     200 150 200  115 150)
                    (140 90  210 90  250 150  
                     210 210  140 210  100 150))
                  :closed t)

See also
: draw-polygon