| !Run file for PGPlot        last update 13 Feb 1996
|
|  ensure the Floating point emulator and colourtrans are loaded
|
RMEnsure FPEmulator 0.00 RMLoad System:Modules.FPEmulator
RMEnsure FPEmulator 0.00 Error You need the Floating-point Emulator
RMEnsure ColourTrans 0.00 RMLoad System:Modules.Colours
RMEnsure ColourTrans 0.00 Error You need the ColourTrans module
|
| now set up the global variables for PGPlot
Set PGPLOT_DIR <Obey$Dir>
Iconsprites <PGPLOT_DIR>.!Sprites
|
| use SetMacro to avoid the 30 character maximum file name length bug.
|
SetMacro PGPLOT_FONT <PGPLOT_DIR>.GRFont
SetMacro PGPLOT_RGB <PGPLOT_DIR>.RGBTxt
|
| change (or add to) the following to suit your taste
|
|     default driver (Archi screen)
Set PGPLOT_DEV /ARCV
|     default background colour
Set PGPLOT_BACKGROUND black
Set PGPLOT_IDENT "Fortran Friends"
|     PSDriver needs this
Set PGPLOT_USER "Fortran Friends"
|       the following define the Postscript dimensions
|       they are inverted if you use /VPS or /VPCS
Set PGPLOT_PS_WIDTH "7560"          | PostScript width (Portrait)
Set PGPLOT_PS_HEIGHT "11190"        | Postscript height (Portrait)
Set PGPLOT_ARC_WIDTH "800"          | Sprite width (pixels for /ARCF driver)
Set PGPLOT_ARC_HEIGHT "600"         | Sprite height
echo Global variables now set up for PGPlot
