GESC(3NCARG) | NCAR GRAPHICS | GESC(3NCARG) |
gesc - Provide "Escape" for non-standard GKS features
GESC (Escape) - provides a standard way of implementing nonstandard GKS features. NCAR GKS has only two user-accessible escape functions defined: one for changing the name of a metafile and another for pausing in an X window.
CALL GESC (FCTID, LIDR, IDR, MXODR, LODR, ODR)
#include <ncarg/gks.h>
void gescape(Gint func_id, const Gescape_in_data *in_data, Gstore *store_data,Gescape_out_data **out_data);
LIDR, MXODR, and LODR must always be at least "1" in value.
GESC can be used to dynamically change the name of an output metafile and to do so one should use the calls GOPKS and GOPWK instead of OPNGKS. If you are using OPNGKS, see the man page for SETUSV for changing the name of the metafile.
To change the name of the output metafile inside your program, you should make a call similar to the following:
The call to GESC to change the metafile name must always occur just before the call to GOPWK that opens a CGM workstation. Setting the environment variable NCARG_GKS_OUTPUT overrides any attempt to change the name of an output metafile via a GESC call.
CHARACTER*80 MFNAME
CALL GOPKS (6,IDUM)
MFNAME = 'new.cgm.name'
CALL GESC(-1391,1,MFNAME,1,1,CDUM)
See the "User's Guide for NCAR GKS-0A Graphics" for a more complete example of changing metafile names from within a code.
Here is an example of a code that will create an X window, draw a line, and then pause waiting for a mouse click or a key click.
CHARACTER*80 IREC,ODUM
CALL GOPKS(6,0)
CALL GOPWK(3,0,8)
CALL GACWK(3)
CALL LINE(0.,0.,1.,1.)
CALL SFLUSH
IREC = ' 3'
CALL GESC(-1396,1,IREC,1,1,ODUM)
CALL GDAWK(3)
CALL GCLWK(3)
CALL GCLKS
STOP
END
The functions FRAME and NGPICT are in general much easier to use and more flexible than the direct ESCAPE call for pausing in an X window. It is suggested that those functions be used.
To use GKS routines, load the NCAR GKS-0A library ncarg_gks.
Online: SETUSV, FRAME, NGPICT, gescape
Hardcopy: User's Guide for NCAR GKS-0A Graphics; NCAR Graphics Fundamentals, UNIX Version
Copyright (C) 1987-2009
University Corporation for Atmospheric Research
The use of this Software is governed by a License Agreement.
March 1993 | UNIX |