1. Home
  2. DSAVE directive

DSAVE directive

Saves the current graphics environment settings to an external file.

No options

Parameters

FILENAME = text File in which to save the environment settings
DESCRIPTION = text Description for these settings

Description

High-resolution graphics in Genstat takes place in a “graphics environment” that specifies exactly how the display is produced. So it controls aspects like whether or not boxes are drawn around the plots, the positioning of the plots on the graphics frame, the styles of axes, and the colours and symbols of points. There are commands to modify all of these aspects, so that you can customize your graphs as required for a particular situation:

    FRAME defines the positions of the plotting windows within the graphics frame (or screen)
    XAXIS defines the x-axis in a window
    YAXIS defines the y-axis in a window
    ZAXIS defines the z-axis in a window
    PEN defines properties of the graphics “pens”
    COLOUR defines the colour map

To simplify the future plotting of graphs in the same style, the DSAVE directive allows you to save the current settings of the graphics environment to an external file. You can then use the DLOAD directive to read them back into Genstat, so that you can produce similar plots in future.

The FILE parameter gives the name of the file in which to save the settings. You can also set the DESCRIPTION parameter to a text containing a one-line description of the settings. This could be used, for example, to note that they were designed for a particular type of publication or report.

Options: none.

Parameters: FILENAME, DESCRIPTION.

See also

Directives: DLOAD, FRAME, XAXIS, YAXIS, ZAXIS, PEN, DEVICE, COLOUR.

Procedures: DHELP, FFRAME, GETRGB.

Commands for: Graphics.

Example

" Examples of creating graphics environments "

JOB 'An environment with larger fonts and thicker lines'
DLOAD "Set default environment"
FRAME [RESET=yes;GRID=*] 1...32; BOX=include; BOXKEY=bounded; BOXSURFACE=*
PEN [RESET=yes]  -1; FONT=1; SIZE=2; COLOUR='black'              "Axis Title Pen"
PEN [RESET=yes]  -2; THICKNESS=1.6; LINESTYLE=1; COLOUR='black'  "Axis Pen"
PEN [RESET=yes]  -3; FONT=1; SIZE=1.6; COLOUR='black'            "Axis Labels Pen"
PEN [RESET=yes]  -4; THICKNESS=1; LINESTYLE=2; COLOUR='DarkGray' "Grid Pen"
PEN [RESET=yes]  -5; FONT=1; SIZE=2.2; COLOUR='black'            "Title Pen"
PEN [RESET=yes]  -6; FONT=1; SIZE=1.1; COLOUR='black'            "Key Pen"
PEN [RESET=yes]  -7; THICKNESS=1; LINESTYLE=1; COLOUR=0          "DSHADE grid"
PEN [RESET=yes]  -8; THICKNESS=1; LINESTYLE=1; COLOUR=0          "Histogram Outlines"
PEN [RESET=yes]  -9; THICKNESS=1; LINESTYLE=1; COLOUR=0          "Barchart Outlines"
PEN [RESET=yes] -10; THICKNESS=1; LINESTYLE=1; COLOUR=0          "Pie Outlines"
PEN [RESET=yes] -11; COLOUR='black'; LINESTYLE=1; METHOD=line; SIZE=1.0 "Error Bars"
VARIATE [NVAL=256] symbols; !((2,5,6,7,8,4,12,13,18,11)25,2,5,6,7,8,4)
VARIATE [NVAL=256] colours; !((0,16711680,48896,255,65535,16711935,128,\
16744448,8453888,65408,33023,8388863,16711808,5592405,9211020,12599360,\
12632128,4243520,4243648,4210880,12599488,8388608,32768,128,16744576,\
8454016,8421631,2368548,7368816,9211020,14408667,16744448)8)
PEN [RESET=yes] 1...256; SYMBOL=#symbols; COLOUR=#colours; CSYMBOL=#colours;\ 
    CFILL=#colours; SIZE=1; THICKNESS=2
DSAVE 'Bold.ggd'; DESCRIP='Bold symbols and lines'


JOB 'An environment similar to graphs in Excel 2003'
DLOAD "Set default environment"
FRAME [RESET=yes;GRID=yx] 1...32;  CINTERIOR=12632256;\ 
      BOX=include; BOXKEY=bounded; BOXSURFACE=*
FRAME 2; CINTERIOR='white' "No shading in key window"
PEN [RESET=yes]  -1; FONT=1; SIZE=2; COLOUR='black'              "Axis Title Pen"
PEN [RESET=yes]  -2; THICKNESS=1.6; LINESTYLE=1; COLOUR='black'  "Axis Pen"
PEN [RESET=yes]  -3; FONT=1; SIZE=1.6; COLOUR='black'            "Axis Labels Pen"
PEN [RESET=yes]  -4; THICKNESS=1; LINESTYLE=1; COLOUR='Black'    "Grid Pen"
PEN [RESET=yes]  -5; FONT=1; SIZE=2.2; COLOUR='black'            "Title Pen"
PEN [RESET=yes]  -6; FONT=1; SIZE=1.1; COLOUR='black'            "Key Pen"
PEN [RESET=yes]  -7; THICKNESS=1; LINESTYLE=1; COLOUR=0          "DSHADE grid"
PEN [RESET=yes]  -8; THICKNESS=1; LINESTYLE=1; COLOUR=0          "Histogram Outlines"
PEN [RESET=yes]  -9; THICKNESS=1; LINESTYLE=1; COLOUR=0          "Barchart Outlines"
PEN [RESET=yes] -10; THICKNESS=1; LINESTYLE=1; COLOUR=0          "Pie Outlines"
PEN [RESET=yes] -11; COLOUR='black'; LINESTYLE=1; METHOD=line; SIZE=1.0 "Error Bars"
VARIATE [NVAL=256] symbols; !((6,5,7,13,9,2,11,4,18,8,12)23,18,5,7)
VARIATE [NVAL=256] colours; !((128,16711935,16776960,65535,8388736,8388608,\
   32896,255,52479,13434879,13434828,16777113,10079487,16751052,13408767,\
   16764057,3368703,3394764,10079232)13,128,16711935,16776960,65535,\
   8388736,8388608,32896,255,52479)
PEN [RESET=yes] 1...256; SYMBOL=#symbols; COLOUR=#colours; CSYMBOL=#colours;\ 
    CFILL=#colours; SIZE=1; THICKNESS=2
DSAVE 'Excel2003.ggd'; DESCRIP='Microsoft Excel 2003 style graphics'


JOB 'An environment similar to graphs in Excel 2010'
DLOAD "Set default environment"
FRAME [RESET=yes;GRID=yx] 1...32; BOX=include; BOXKEY=bounded; BOXSURFACE=*
PEN [RESET=yes]  -1; FONT=1; SIZE=2; COLOUR='black'              "Axis Title Pen"
PEN [RESET=yes]  -2; THICKNESS=1.6; LINESTYLE=1; COLOUR='black'  "Axis Pen"
PEN [RESET=yes]  -3; FONT=1; SIZE=1.6; COLOUR='black'            "Axis Labels Pen"
PEN [RESET=yes]  -4; THICKNESS=1; LINESTYLE=2; COLOUR='DarkGray' "Grid Pen"
PEN [RESET=yes]  -5; FONT=1; SIZE=2.2; COLOUR='black'            "Title Pen"
PEN [RESET=yes]  -6; FONT=1; SIZE=1.1; COLOUR='black'            "Key Pen"
PEN [RESET=yes]  -7; THICKNESS=1; LINESTYLE=1; COLOUR=0          "DSHADE grid"
PEN [RESET=yes]  -8; THICKNESS=1; LINESTYLE=1; COLOUR=0          "Histogram Outlines"
PEN [RESET=yes]  -9; THICKNESS=1; LINESTYLE=1; COLOUR=0          "Barchart Outlines"
PEN [RESET=yes] -10; THICKNESS=1; LINESTYLE=1; COLOUR=0          "Pie Outlines"
PEN [RESET=yes] -11; COLOUR='black'; LINESTYLE=1; METHOD=line; SIZE=1.0 "Error Bars"
VARIATE [NVAL=256] symbols; !((6,5,7,13,9,2,11,4,18,8,12)23,18,5,7)
VARIATE [NVAL=256] colours; !((3694994,9779511,7770432,6376061,3507354,\ 
  12677680,4552111,11683395,9350478,7625109,4300728,15108155,7968709,\
  13138296,11191422,9930160,7845837,16164211,11583448)13,3694994,9779511,\
  7770432,6376061,3507354,12677680,4552111,11683395,9350478)
PEN [RESET=yes] 1...256; SYMBOL=#symbols; COLOUR=#colours; CSYMBOL=#colours;\ 
    CFILL=#colours; SIZE=1; THICKNESS=2
DSAVE 'Excel2010.ggd'; DESCRIP='Microsoft Excel 2010 style graphics'


JOB 'An environment similar to R graphics'
DLOAD "Set default environment"
FRAME [RESET=yes;GRID=*] 1...32; BOX=include; BOXKEY=bounded; BOXSURFACE=*
PEN [RESET=yes]  -1; FONT=1; SIZE=1.2; COLOUR='black'            "Axis Title Pen"
PEN [RESET=yes]  -2; THICKNESS=1; LINESTYLE=1; COLOUR='black'    "Axis Pen"
PEN [RESET=yes]  -3; FONT=1; SIZE=1; COLOUR='black'              "Axis Labels Pen"
PEN [RESET=yes]  -4; THICKNESS=1; LINESTYLE=2; COLOUR='DarkGray' "Grid Pen"
PEN [RESET=yes]  -5; FONT=1; SIZE=1.6; COLOUR='black'            "Title Pen"
PEN [RESET=yes]  -6; FONT=1; SIZE=1; COLOUR='black'              "Key Pen"
PEN [RESET=yes]  -7; THICKNESS=1; LINESTYLE=1; COLOUR=0          "DSHADE grid"
PEN [RESET=yes]  -8; THICKNESS=1; LINESTYLE=1; COLOUR=0          "Histogram Outlines"
PEN [RESET=yes]  -9; THICKNESS=1; LINESTYLE=1; COLOUR=0          "Barchart Outlines"
PEN [RESET=yes] -10; THICKNESS=1; LINESTYLE=1; COLOUR=0          "Pie Outlines"
PEN [RESET=yes] -11; COLOUR='black'; LINESTYLE=1; METHOD=line; SIZE=1.0 "Error Bars"
YAXIS [RESET=yes] 1...32; LDIRECTION=parallel
VARIATE [NVAL=256] colours; !((0,33023,16711935,25600,16711680,16753920,\ 
   65280,10824234,33023,16711935,25600,16711680,16753920,65280,10824234,\ 
   33023,16711935,25600,16711680,16753920)12,0,33023,16711935,25600,\
   16711680,16753920,65280,10824234,33023,16711935,25600,16711680,\
   16753920,65280,10824234,33023)
PEN [RESET=yes] 1...256; SYMBOL=2; COLOUR=#colours; CSYMBOL=#colours;\ 
    CFILL=*; SIZE=0.8; THICKNESS=1
DSAVE 'RStyle.ggd'; DESCRIP='R style graphics'


JOB 'Set up black and white graphics environment'
DLOAD "Set default environment"
FRAME [RESET=yes;GRID=*] 1...32; BOX=include; BOXKEY=bounded; BOXSURFACE=*
PEN [RESET=yes]  -1; FONT=1; SIZE=1.6; COLOUR='black'            "Axis Title Pen"
PEN [RESET=yes]  -2; THICKNESS=1.6; LINESTYLE=1; COLOUR='black'  "Axis Pen"
PEN [RESET=yes]  -3; FONT=1; SIZE=1.4; COLOUR='black'            "Axis Labels Pen"
PEN [RESET=yes]  -4; THICKNESS=1; LINESTYLE=2; COLOUR='black'    "Grid Pen"
PEN [RESET=yes]  -5; FONT=1; SIZE=2; COLOUR='black'              "Title Pen"
PEN [RESET=yes]  -6; FONT=1; SIZE=1; COLOUR='black'              "Key Pen"
PEN [RESET=yes]  -7; THICKNESS=1; LINESTYLE=1; COLOUR='black'    "DSHADE grid"
PEN [RESET=yes]  -8; THICKNESS=1; LINESTYLE=1; COLOUR='black'    "Histogram Outlines"
PEN [RESET=yes]  -9; THICKNESS=1; LINESTYLE=1; COLOUR='black'    "Barchart Outlines"
PEN [RESET=yes] -10; THICKNESS=1; LINESTYLE=1; COLOUR='black'    "Pie Outlines"
PEN [RESET=yes] -11; COLOUR='black'; LINESTYLE=1; METHOD=line; SIZE=1 "Error Bars"
VARIATE [NVAL=256] symbols; !((2,5,6,7,8,4,12,13,18,11,1,3,9,19,20,21,22)15,2)
VARIATE [NVAL=256] linestyle; !((1...10)25,1...6)
PEN [RESET=yes] 1...256; SYMBOL=#symbols; COLOUR='black'; CSYMBOL='black';\ 
    CFILL='black'; LINESTYLE=#linestyle; SIZE=1; THICKNESS=2
DSAVE 'Black.ggd'; DESCRIP='Grayscale graphics'
Updated on March 8, 2019

Was this article helpful?