!    NAME
!	areafill.pen
!
!    DESCRIPTION
!	This pen table demonstrates area and pattern fill for closed element
!	types.  In addition, boundary_display and boundary_color are used to
!	show how the boundary of an element can be emphasized by using a
!	different color than the fill color.
!
!    HISTORY
!	08/09/93 (INGR) Initial creation.


!   Area fill shapes on level 60

if ((type == shape) and (level == 60)) then
    area_fill = true

!   Area fill ellipses on level 50 and specify a fill color of 2

else if ((type == ellipse) and (level == 50)) then
    area_fill = true
    fill_color = 2

!   Area fill complex shapes on level 40 with a color specified
!   with an RGB value.

else if ((type == complex_shape) and (level == 40)) then
    area_fill = true
    fill_color = (255,0,255)

!   Area fill shapes on level 30  with blue and display the
!   boundary in red.

else if ((type == shape) and (level == 30)) then
    fill_color = 'blue'		! Setting fill color also sets area_fill = true
    boundary_display = true
    boundary_color = 'red'

!   Pattern fill shapes on level 20

else if ((type == shape) and (level == 20)) then
    area_fill = true
    pattern = 'swamp grass'	! Select a pattern from the pattern library
    pattern_color = 'khaki'	! Select a color from the color library
    fill_color = 'green, spring'! Select fill color from the color library
endif

