3 PS

  PRIMARY PLOT SYMBOL
 
  PS          PSYMBL(10)                      PRIMARY PLOT SYMBOL STRING

              PSYMBL    L*1   10A1     '.'    Primary plot symbol string


3 SS

  SECONDARY PLOT SYMBOL
 
  SS          SSYMBL(20)                      SECONDARY PLOT SYMBOL STRING

              SSYMBL    L*1   10A1     '.'    Secondary plot symbol string


3 SF

  SCALE FACTOR
 
  SF          SFXA,SFXB,SFYA,SFYB             SCALE FACTORS
              SFXA      R*4   E14.0    1.0    X-scale factor A
              SFXB      R*4   E14.0    1.0    X-scale factor B
              SFYA      R*4   E14.0    1.0    Y-scale factor A
              SFYB      R*4   E14.0    1.0    Y-scale factor B


3 OF

  OFFSETS
 
  OF          XOFFA,XOFFB,YOFFA,YOFFB         OFFSETS

              XOFFA     R*4   E14.0    0.0    X-offset A
              XOFFB     R*4   E14.0    0.0    X-offset B
              YOFFA     R*4   E14.0    0.0    Y-offset A
              YOFFB     R*4   E14.0    0.0    Y-offset B


3 FM

  ASCII
 
  FM          RDFORM(15)                       DATA LINE FORMATS (ASCII FILE)

              RDFORM    L*1   15A1    (2E15.0) Data input FORMAT


3 FM

  BINARY
 
  FM          '#',INDEXX,INDEXY               INDICES OF X AND Y POINT 
						(BINARY FILE)

              INDEXX    I*2   I7      ---     X=YY(INDEXX) where YY is the 
						binary record
              INDEXY    I*2   I7      ---     Y=YY(INDEXY) where YY is the 
						binary record


3 TG

  DATA TAG 
 
  TG          ITAG                            DATA LINE TAG

              ITAG      I*2   A2      'RD'    Input line tag that identifies
					        data line


3 IM

  INCREMENTAL MODE PARAMETERS
 
  IM          XINIT,XDELTA                    INCREMENTAL MODE PARAMETERS

              XINIT     R*4   E14.0    ---    Initial value for x (incremental
					        mode)
              XDELTA    R*4   E14.0    0.0    X-increment and incremental mode
					        indicator
                                                .EQ. 0.0 (X,Y mode)
                                                .NE. 0.0 (incremental mode)


3 XE

  X-EXTREMA
 
  XE          XFMIN,XFMAX                     FILE EXTREMA

              XFMAX     R*4   E14.0    RMAX   Maximum X (raw data space)
					        allowed
              XFMIN     R*4   E14.0   -RMAX   Minimum X (raw data space) 
						allowed


3 YE

  Y-EXTREMA
 
  YE          YFMIN,YFMAX                     FILE EXTREMA

              YFMAX     R*4   E14.0    RMAX   Maximum Y (raw data space) 
						allowed
              YFMIN     R*4   E14.0   -RMAX   Minimum Y (raw data space) 
						allowed


3 ND

  DATA
 
  ND          NUMPPL,IDEL                     # POINTS PER DATA LINE

              NUMPPL    I*2   I7       1      Number of data points in each 
						record
              IDEL      I*2   I7       1      Every "IDEL'th" plottable point 
						is plotted


3 FT

  TYPE

  FT          KPLTYP,ISDELT,ISINIT            PLOT TYPE

              KPLTYP    I*2   I7       1      Plot type
                                                1: Point plot with Secondary 
						   Symbols
                                                2: Line plot with Secondary 
						   Symbols
                                                3: Symbol plot with Secondary 
						   Symbols
                                                4: Bar graphs
                                                5: Annotated points (running 
						   index)
              ISDELT    I*2   I7      32000   Plot secondary symbol every 
						   ISDELT points
              ISINIT    I*2   I7       0      Initial value of ISDELT counter


3 FF

  PLOT FUNCTION
 
  FF          KFUNCX,KFUNCY                           PLOT FUNCTION
              KFUNCX    I*2   I7       1      Selects transformation function 
						for X
                                                1: X = X (no transformation)
                                                2: X = 1.0/X (reciprocal)
                                                3: X = ALOG(X)/ALOG(BASLOG)
						   (logarithmic)
              KFUNCY    I*2   I7       1      Selects transformation function 
						for Y
                                                1: Y = Y (no transformation)
                                                2: Y = 1.0/Y (reciprocal)
                                                3: Y = ALOG(Y)/ALOG(BASLOG) 
						   (logarithmic)


3 FS

  SPACE
 
  FS          KSPACX,KSPACY                   PLOT SPACES

              KSPACX    I*2   I7       1      Data space (1 or 2) for the 
						X-coordinate
              KSPACY    I*2   I7       1      Data space (1 or 2) for the 
						Y-coordinate


3 BG

  BAR GRAPH PARAMETERS
 
  BG          DXBAR,BGBASE,KBGOPN             BAR GRAPH PARAMETERS

              DXBAR     R*4   E14.0    0.1    Width (inches) of the bar graph 
						bars
              BGBASE    R*4   E14.0    DSMIN  Bar Graph base value
              KBGOPN    I*2   I7       0      Bar Graph base flag
                                                0: base of bars are open (gap 
						   in baseline)
                                                1: base of bars is closed 
						   (solid baseline)


3 BL

  BAR GRAPH LINE PARAMETERS
 
  BL          NIBBG,LPATBG,LCBG               BAR GRAPH LINE PARAMETERS

              NIBBG     I*2   I7       1      nib size for points, lines, bar 
						graphs
              LPATBG    I*2   O7      177777  line pattern for points, lines, 
						or graphs
              LCBG      I*2   I7       0      Color for points, lines and 
						bar graphs


3 BS
 
  BAR GRAPH SHADING
 
  BS          KBGSHD,BSDIST                   BAR GRAPH SHADING PARAMETERS

              KBGSHD    I*2   O7       1      direction(s) of shading lines
                                                1: ////
                                                2: llll
                                                4: \\\\
                                                10: ====
              BSDIST    R*4   E14.0    0.1    distance between shading lines


3 SL

  BAR GRAPH SHADING LINE
 
  SL          NIBBS,LPATBS,LCBS               BAR GRAPH SHADING LINE PARAMETER

              NIBBS     I*2   I7       1      nib size for shading lines
              LPATBS    I*2   O7      177777  line pattern for shading lines
              LCBS      I*2   O7       0      color for shading lines


3 CF

  CHANGE FILE
 
  CF          DATFNA(70)                      CHANGE DATA FILE SPECIFICATION

              DATFNA    L*1   70A1     ---    Data file specification string  


3 GP

  GP					      GO TO P-PHASE


3 DF

  DEFAULT
 
  DF					 SET FILE PARAMETERS TO DEFAULT VALUES


!  BOTH P AND F PHASE


3 HA

  HA						HALT

 
3 EX

  EX					 	HALT

 
3 NP

  NEW PDL FILE

  NP		PDLFNA				START NEW PDL


3 AP

  APPEND

  AP		PDLFNA				APPEND PDL
                PDLFNA L*1      70A1     ---    PDL file specification

 
3 VE

  MULPLT VERSION

  VE					PRINT MULPLT VERSION IDENTIFICATION

 
3 G?

  G?					LIST THE KNOWN GRAPHICS DEVICES


3 ZF

  ZF						REMOVE ALL DATA SETS

 
3 AP

  APPEND PDL
 
  AP          PDLFNA                          APPEND PDL

              PDLFNA L*1      70A1     ---    PDL file specification


3 GO
# GE

3 GE

  GO PLOT
 
  GO          IDEV,JFILE,JFILE1               GO PLOT

  GE          IDEV,JFILE,JFILE1               GO PLOT, ERASING SCREEN FIRST

              IDEV      I*2   I7       ---    Graphics device number
              JFILE     I*2   I7       ---    Index of first data set to be 
						processed
              JFILE1    I*2   I7      JFILE   Index of last data set to be 
						processed


3 ER

  ERASE SCREEN
 
  ER          IDEV                            ERASE THE SCREEN

              IDEV      I*2   I7       ---    Graphics device number


3 SC

  SCAN
 
  SC          JFILE,JFILE1                    SCAN FOR EXTREMA
              JFILE     I*2   I7       ---    Index of first data set to 
						process
              JFILE1    I*2   I7      JFILE   Index of last data set to 
						process


3 LI

  LIST
 
  LI          JFILE,JFILE1                    LIST CURRENT PDL PARAMATERS

              JFILE     I*2   I7       ---    Index of first data set to 
						process
              JFILE1    I*2   I7      JFILE   Index of last data set to 
						process


3 DP

  DUMP PDL
 
  DP          PDLFNA(70)                      DUMP PDL TO FILE

              PDLFNA    L*1   70A1     ---    PDL file specification string   


3 LT

  DEBUG
 
  LT          LISTXY                          DEBUGGING CONTROL FLAG

              LISTXY    I*2   I7       0      Debug list flag
                                                0: no list
                                                1: list data during scans or 
						   plots
                                                2: dump windowed points to 
						   FOR001.DAT


3 AG

  ASSIGN GRAPHICS DEVICE
 
  AG          IDEV = QDEV                     ASSIGN THE GRAPHICS DEVICE

              IDEV      I*2   I7       ---    the device number to be assigned
              QDEV      L*1   32A1    GDn:    physical device specification


3 FN

  FILE NAME
 
  FN          DATFNA(70)                      DATA SET FILE NAME

              DATFNA    L*1   70A1     ---    Data file specification string  


3 GF

  GO TO FILE
 
  GF          KFILE                          RE-OPEN DATA SET

              KFILE     I*2   I7       ---   index of data set to be processed


3 RF

  REMOVE FILE
 
  RF          KFILE                          REMOVE DATA SET

              JFILE     I*2   I7       ---   Index of data set to be processed


3 W>

  WAIT
 
  W>          MCRBUF                          WAIT FOR RSX COMMAND TO FINISH

              MCRBUF    L*1   80A1     ---    buffer for MCR command line


3 N>

  DONOT WAIT
 
  N>          MCRBUF                          DO NOT WAIT FOR RSX COMMAND TO 
						FINISH

              MCRBUF    L*1   80A1     ---    buffer for MCR command line


3 ??

  GET HELP
 
  ??          HLPSTR                          OBTAIN HELP FOR A TOPIC

              HLPSTR    L*1   80A1     ---    buffer for help topic
 
