SETVIEWORG

Graphics Subroutine: Moves the viewport-coordinate origin (0, 0) to the specified physical point.

Module: USE DFLIB

Syntax

CALL SETVIEWORG (x, y, t)

x, y
(Input) INTEGER(2). Physical coordinates of new viewport origin.

t
(Output) Derived type xycoord. Physical coordinates of the previous viewport origin. The derived type xycoord is defined in DFLIB.F90 (in the \DF98\INCLUDE subdirectory) as follows:

 TYPE xycoord
   INTEGER(2) xcoord ! x-coordinate
   INTEGER(2) ycoord ! y-coordinate
 END TYPE xycoord

The xycoord type variable t, defined in DFLIB.F90 (in the \DF98\INCLUDE subdirectory), returns the physical coordinates of the previous viewport origin.

Compatibility

STANDARD GRAPHICS QUICKWIN GRAPHICS LIB

See Also: GETCURRENTPOSITION, GETPHYSCOORD, GETVIEWCOORD, GETWINDOWCOORD, GRSTATUS, SETCLIPRGN, SETVIEWPORT

Example

 USE DFLIB
 TYPE ( xycoord ) xy

 CALL SETVIEWORG(INT2(30), INT2(30), xy)