home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
ARM Club 3
/
TheARMClub_PDCD3.iso
/
hensa
/
maths
/
pgplot_1
/
!PGPlot
/
!Run
< prev
next >
Wrap
Text File
|
1996-02-13
|
1KB
|
35 lines
| !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