Previous: setpn Up: ../plot79_s.html Next: setppo


SETPPA

       SUBROUTINE  SETPPA (PARRAY,MAXROW,MAXCOL,NROW,NCOL)
 C$    (Set Polygon Pixel Array)
 C$    Set the polygon pixel array which is to be used for filling
 C$    polygons of interior style "patterned" on devices which can
 C$    support that feature.   Each row  of NCOL  elements in  the
 C$    array corresponds  to NCOL  successive pixels  on a  raster
 C$    line,  and  the   row  is  repeated   every  NCOL   pixels.
 C$    Similarly, the NROW rows correspond  to the same number  of
 C$    raster lines,  and  the  pattern  is  repeated  every  NROW
 C$    rasters.  The origin of the pattern array may be  specified
 C$    with routine  SETPPO (Set  Polygon Pixel  Pattern  Origin).
 C$    The arguments are:
 C$
 C$    PARRAY(*,*)......INTEGER array of pixel values which are to
 C$                     be used for filling a polygon of  interior
 C$                     style "patterned".  The  range of  integer
 C$                     values which  may  be  used  for  a  pixel
 C$                     element  is  device  dependent,  and   the
 C$                     contents of the array are not checked  for
 C$                     range validity by this routine.
 C$    MAXROW,MAXCOL....Actual  declared dimensions of PARRAY(*,*)
 C$                     in the calling program.
 C$    NROW,NCOL........Number  of rows and columns in PARRAY(*,*)
 C$                     which are currently in use.  A minimum  of
 C$                     16 rows and  columns is  guaranteed to  be
 C$                     available for each display device.
 C$
 C$    Note that  the facility  offered by  this routine  is  only
 C$    available on  rather sophisticated  (and expensive)  raster
 C$    display devices, and  cannot be  conveniently simulated  on
 C$    non-raster display  devices.  No  warning is  given if  the
 C$    selected  display  device  cannot   support  it,  and   the
 C$    operation requested will simply be ignored.
 C$    (27-JAN-82)