.NLIST
	.ENABL	LC			; Allow lower case chars
;
; COPYRIGHT (C) 1976
; DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASS.
;
; THIS SOFTWARE IS FURNISHED UNDER  A LICENSE FOR USE ONLY  ON  A
; SINGLE COMPUTER SYSTEM AND MAY BE  COPIED ONLY WITH  THE INCLU-
; SION OF  THE  ABOVE  COPYRIGHT NOTICE.  THIS SOFTWARE,  OR  ANY
; OTHER COPIES THEREOF, MAY NOT BE  PROVIDED  OR  OTHERWISE  MADE
; AVAILABLE TO ANY OTHER PERSON EXCEPT  FOR  USE  ON  SUCH SYSTEM
; AND TO  ONE WHO AGREES  TO  THESE LICENSE  TERMS.  TITLE TO AND
; OWNERSHIP OF THE SOFTWARE SHALL AT ALL TIMES REMAIN IN DEC.
;
; THE INFORMATION IN THIS SOFTWARE  IS  SUBJECT TO CHANGE WITHOUT
; NOTICE AND SHOULD NOT BE CONSTRUED  AS  A COMMITMENT BY DIGITAL
; EQUIPMENT CORPORATION.
;
; DEC ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS
; SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DEC.
;
; VERSION 03
;
; RUNOFF PREFIX FILE
;
;	Extensive additions by J. CLEMENT
;			Bonner Lab, Rice Univ.
;			Box 1892, Houston, Tx.
;				77251
;

;	Conditional definitions
;
$FLORD=1		; remove (;) to define escape seq for FLORIDA DATA
;$DIAB=1		; remove (;) to define escape seq for Diablo etc.
;$SPIN=1		; remove (;) to define varsp for spinwriter
;$DEBUG=1		; enable this to get debugging aids
H$$PHN=0		; Define this symbol if autohyphenation
;RSTS=0			; remove (;) if running on RSTS/E
;				NOTE: RSTS compatability not guaranteed !!
;
; FLAG BITS IN F.1
;
;	NOTE: THE LOW ORDER BYTE CORRESPONDS TO A LEGAL COMMAND MASK
;		THAT IS TESTED AGAINST THE TRAILING BYTE OF THE
;		APPROPRIATE COMMAND NAME.
;
NOTF=1				; NOTE PROCESSING ACTIVE
FOTF=2				; FOOTNOTE PROCESSING ACTIVE
LCKF=4				; Parameters locked off
TEXF=10				; Text on
TEXDF=20			; Deferred text on
RELF=40				; RELATIVE NUMBER CONVERSION (1=YES)
BRKF=100			; CORRESPONDS TO BREAK FLAG IN TRAILING BYTE
JUSTF=400			; JUSTIFY ENABLED
PJUSTF=1000			; PREVIOUS JUSTIFY FLAG
FILLF=2000			; FILL ENABLED
LITFG=4000			; LITERAL PROCESSING FLAG
TXDEF=10000			; Text deferred flag
;
; SWITCH WORD FLAG BIT DEFINITIONS FOR S1
;
FFDSW=1				; SIMULATE FORM FEEDS (0=YES)
HYPSW=2				; HYPHENATE OUTPUT TEXT (1=YES)
PAUSW=4				; PAUSE BETWEEN PAGES (1=YES)
SPLSW=10			; SPOOL TEXT FILE (1=YES)
UPCSW=20			; FORCE ALL TEXT TO UPPER CASE (1=YES)
CRSW=40				; No CR,LF switch
;
; SWITCH FLAGS (BYTE)
;	Definitins
;
SW.DIS=200			; Permanent disable
SW.TDS=1			; Temporary disable
SW.TD2=2			; Temporary disable 2
;
;
;
;	Bits for LAYOUT
;
LAY.NB=1			; Page number at bottom of page
LAY.CP=2			; Center page number
LAY.CT=4			; Center title/subtitle
LAY.LR=10			; Alternate right left
LAY.TB=20			; Title at bottom of page
;
;	INDEX Table format:
;
;		byte 1+2	Foreward link to next entry
;		byte 3		Status byte
X.ENT=200		; Index entry follows page/chapter.. bytes
X.SPG=100		; Subpage byte present
X.PAG=40		; Page word present
X.CH=20			; Chapter byte present
X.AP=10			; Appendix byte present
X.SEN=7			; these bits number subentries.
;		byte 4-n	Subpage/page word/chapter/appendix bytes
;		byte n+1-m	Index entry if X.ENT
;
;	The following control the .DISPLAY commands
;
CH.HD1=10.		; Number of characters in pre-header
CH.HD2=10.		; Number of characters in post-header
;
;	List elements stack
;
LS.CNT=0		; Current number
LS.PRE=2		; Pre char
LS.PST=4		; Post char
LS.CHR=5		; Current char
LS.VSP=6		; Vertical spacing
LS.FMT=7		; Element format
LS.MRG=10		; saved margin
LS.SIZ=12		; Size of entry
;
;	Size of buffers
;
IBFSZ=512.			; Input buffer size
;	This  needs to be larger than the maximum input line.
;
OBFSZ=256.			; Output buffer size
;	This needs to be larger than the maximum output line if /-CR is used.
;
ULNSZ=150.			; Underline buffer size
;	This needs to be larger than the maximum number of characters/line
;	for your printer if either /UL:S or /UL:L are used.
;
;	
TRCLN=40.			; Traceback line size
;
;	Definitions for text header
;
BFHED=8.			; # BYTE I/O HEADER
;
;	1=	Skip line count
;	2=	Status byte
;	3=	First spacing count
;	4=	Second spacing count
;	5=	Real spaces/expandable spaces
;	6=	Spaces before break in extra spaces
;	7=	-1=Extra to left	0=Extra to right
;	8=	Micro spaces to add per space
;
;
;	Line header status bits
;
HD.BAR=1			; Output change bar
HD.VAR=2			; Enable variable spacing
HD.LIN=4			; Line to output
HD.TXD=40			; Text deferred stat.
HD.FG=100			; Skip for figure
HD.SKP=200			; Skip count only

;
;	Escape sequence options
;
ES.LCK=1			; Sequence is lock/unlock sequence
ES.VSP=2			; Vertical spacing param present
ES.HSP=4			; Horiz spacing param present
ES.PSP=10			; Spacing is permanent change
ES.WRD=40			; Lock till next word
ES.CHR=100			; Lock till next char
ES.NUL=200			; Dummy status
;
;	Parameters
;
;		These parameters may be made installtion dependent
;
TABTL=32.			; Number of settable tab stops
LINSP=2				; Partial spacing per line
HWPLN=66.*LINSP			; Hardware lines per page
ILSTTP=2			; INITIAL LIST ELEMENT PAGE TEST COUNT
ILSTVS=1			; INITIAL LIST ELEMENT VERTICAL SPACING
IPARTP=2			; INITIAL PARAGRAPH PAGE TEST
IPARVS=1			; INITIAL PARAGRAPH VERTICAL SPACING
IRMRG=60.			; INITIAL RIGHT MARGIN
ILMRG=0				; INITIAL LEFT MARGIN
ITMRG=0				; INITIAL TOP MARGIN
IHSPAC=3*LINSP			; Initial header spacing
INLPG=53.*LINSP			; INITIAL LENGTH OF PAGE
LOLMAR=9.			; INITIAL LEFT MARGIN INDENT ON LISTS
LSLMAR=4			; LEFT MARGIN INDENT ON EMBEDDED LISTS
NHSPAC=2			; INITIAL VERTICAL SPACING BEFORE NOTES
NASPAC=1			; Vertical spacing after note title
NFSPAC=2			; FINAL VERTICAL SPACING AFTER NOTES
NPMARG=20.			; PRIMARY MARGIN CHANGE ON NOTES
NSMARG=5			; SECONDARY MARGIN CHANGE ON NOTES
ISPNG=1*LINSP			; STANDARD LINE SPACING
CBNSP=3				; CHAR OFFSET FOR CHANGE BARS
MINPG=16.*LINSP			; Min page length
MINLN=16.			; Min line length
MAXPS=5.			; Max paragraph spacing allowed
;
;	Character definitions (should not be messed with)
;
BS=10				; BACKSPACE CHARACTER
TAB=11				; TAB
LF=12				; LIN FEED
FF=14				; FORM FEED
CR=15				; Carriage return character
INDX=26				; Index entry follows
REPO=27				; Repeat on output
TABO=30				; Internal output tab character
ELIP=31				; Internal ellipses output character
EOF=32				; END OF FILE
ESC=33				; ESCAPE CHARACTER
ULCHS=34			; UNDERLINE CHARACTER IN INTERNAL STORAGE
SPC=40				; SPACE
PD='.				; PERIOD. FOR SPECIAL SPACING AFTER PERIOD
CMA=',				; COMMA
LPUS='_				; LINE-PRINTER UNDERSCORE IN OUTPUT FILE
SEMI=';				; SEMICOLON
BAR='|				; BAR FOR CHANGE BAR
NXS=177				; NON-EXPANDABLE	SPACE (INTERNAL)

;
; MACRO DEFINITIONS
;
; BIT TEST EQUAL AND BRANCH
;

	.MACRO	BITEQ ARG1,ARG2,BDST
	BIT	ARG1,ARG2
	BEQ	BDST
	.ENDM

;
; BIT TEST NOT EQUAL AND BRANCH
;

	.MACRO	BITNE ARG1,ARG2,BDST
	BIT	ARG1,ARG2
	BNE	BDST
	.ENDM

;
; BIT TEST EQUAL BYTE AND BRANCH
;

	.MACRO	BITEQB ARG1,ARG2,BDST
	BITB	ARG1,ARG2
	BEQ	BDST
	.ENDM

;
; BIT TEST NOT EQUAL BYTE AND BRANCH
;

	.MACRO	BITNEB ARG1,ARG2,BDST
	BITB	ARG1,ARG2
	BNE	BDST
	.ENDM

;
; COMPARE EQUAL AND BRANCH
;

	.MACRO	CMPEQ ARG1,ARG2,BDST
	CMP	ARG1,ARG2
	BEQ	BDST
	.ENDM

;
; COMPARE NOT EQUAL AND BRANCH
;

	.MACRO	CMPNE ARG1,ARG2,BDST
	CMP	ARG1,ARG2
	BNE	BDST
	.ENDM

;
; COMPARE EQUAL BYTE AND BRANCH
;

	.MACRO	CMPEQB ARG1,ARG2,BDST
	CMPB	ARG1,ARG2
	BEQ	BDST
	.ENDM

;
; COMPARE NOT EQUAL BYTE AND BRANCH
;

	.MACRO	CMPNEB ARG1,ARG2,BDST
	CMPB	ARG1,ARG2
	BNE	BDST
	.ENDM

;
; TEST EQUAL AND BRANCH
;

	.MACRO	TSTEQ ARG1,BDST
	TST	ARG1
	BEQ	BDST
	.ENDM

;
; TEST NOT EQUAL AND BRANCH
;

	.MACRO	TSTNE ARG1,BDST
	TST	ARG1
	BNE	BDST
	.ENDM

;
; TEST EQUAL BYTE AND BRANCH
;

	.MACRO	TSTEQB ARG1,BDST
	TSTB	ARG1
	BEQ	BDST
	.ENDM

;
; TEST NOT EQUAL BYTE AND BRANCH
;

	.MACRO	TSTNEB ARG1,BDST
	TSTB	ARG1
	BNE	BDST
	.ENDM
	.LIST