Graphics Subroutine: Redefines the graphics viewport by defining a clipping region in the same manner as SETCLIPRGN and then setting the viewport-coordinate origin to the upper-left corner of the region.
Module: USE DFLIB
Syntax
The physical coordinates (x1, y1) and (x2, y2) are the upper-left and lower-right corners of the rectangular clipping region. Any window transformation done with the SETWINDOW function is relative to the viewport, not the entire screen.
Compatibility
STANDARD GRAPHICS QUICKWIN GRAPHICS LIB
See Also: GETVIEWCOORD, GETPHYSCOORD, GRSTATUS, SETCLIPRGN, SETVIEWORG, SETWINDOW
Example
USE DFLIB
INTEGER(2) upx, upy
INTEGER(2) downx, downy
upx = 0
upy = 30
downx= 250
downy = 100
CALL SETVIEWPORT(upx, upy, downx, downy)