1. Home
  2. DLOAD directive

DLOAD directive

Loads the graphics environment settings from an external file.

No options

Parameter

    text File from which to lead the environment settings

Description

DLOAD allows you to (re)load the graphics environment settings into Genstat, from an external file saved earlier by the DSAVE directive. If the parameter is unset, Genstat restores the default graphics environment.

Options: none.

Parameter: unnamed.

See also

Directives: DSAVE, 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 June 20, 2019

Was this article helpful?