.NLIST
;	.TITLE	RNPRE
;	.IDENT	/M03X/

; RUNOFF PREFIX FILE
;
; MODIFIED BY
;
;	C. H. SPALDING, UNIMATION, APR. '82
;
; MODIFICATIONS
;
;	CHS01 - ASSY SW FOR BUMPING HEADER LINES
;	CHS02 - ASSY SW FOR RIGHT MARGIN FOR PAGE NUMBERS
;	CHS03 - ASSY SW FOR "CH" COMMAND-LINE SWITCH
;	CHS04 - ASSY SW FOR "ALTERNATING HEADER" COMMANDS
;	CHS05 - ASSY SW FOR PAGE SIZE DEFAULTS AT TASK BUILD
;	CHS06 - ASSY SW FOR SPACE AFTER QUOTED SPACE
;	CHS07 - ASSY SW FOR DOUBLE SPACE AFTER <PUNCT><PAREN>
;	CHS08 - ASSY SW FOR SINGLE SPACE AFTER SEMICOLON
;	CHS09 - ASSY SW FOR PREFERRED HYPHEN
;	CHS10 - ASSY SW FOR CHANGE DEFAULT HEADER TYPE TO "MIXED"
;	CHS11 - ASSY SW FOR HEADER TYPE "BLANK"
;	CHS12 - ASSY SW FOR "EVEN" AND "ODD" COMMANDS
;	CHS14 - ASSY SW FOR ALTERNATING TITLE COMMANDS
;	CHS15 - ASSY SW FOR NO "BL 3" FROM "HL" IF AFTER "CH" OR "AX"
;	CHS18 - ASSY SW FOR HYPHENATE AT EXISTING HYPHENS
;	CHS19 - ASSY SW FOR AUTOMATIC SUBTITLE
;	CHS20 - ASSY SW FOR OPTIONAL TEXT INCLUSION
;	CHS23 - ASSY SW FOR "RIGHT JUSTIFY" COMMAND
;	CHS24 - ASSY SW FOR CHANGE TO SKIP
;	CHS25 - ASSY SW FOR ALLOWING HYPHENATION IN FILL-ONLY MODE
;	CHS26 - ASSY SW FOR "=" FLAG TO PRECEED NON-ALPHA CHARACTER
;	CHS27C- ASSY SW FOR FINAL SPACING ON LISTS
;	CHS28B- ASSY SW FOR "TEST PAGE 3" BEFORE EACH INDEX LETTER GROUP
;	CHS29 - ASSY SW FOR MISSING NUMERIC ARG. NOT ASSUMED ZERO
;	CHS30 - ASSY SW FOR ALLOWING NEG. ARGUMENT FOR SKIP & BLANK
;	CHS32 - ASSY SW TO ALLOW "PARAGRAPH" IN FOOTNOTES
;	CHS33 - ASSY SW FOR MISC. FIXES TO FOOTNOTE PROCESSING
;	CHS34 - ASSY SW'S FOR CHANGES TO "PARAGRAPH" PROCESSING
;	CHS35 - ASSY SW FOR RELATIVE TAB STOPS
;	CHS36 - ASSY SW FOR EXPANDED SCOPE OF "STANDARD"
;	CHS37 - ASSY SW TO MAKE "FIGURE" WORK AS CLAIMED & ADD QUEUE
;	CHS38 - ASSY SW FOR BLANK PAGE AT END OF OUTPUT
;	CHS39 - ASSY SW'S FOR PERM. LEFT MARGIN AND "LAYOUT" COMMAND
;	CHS40 - ASSY SW FOR EXPANDED "HEADER" COMMAND
;	CHS41 - ASSY SW FOR CONTROL OF BLANK LINES IN INDEX
;	CHS42 - ASSY SW FOR "BAD PARAMETER" ERROR MESSAGE
;	CHS43 - ASSY SW FOR "QUOTE CHARACTER" COMMAND
;	CHS44 - ASSY SW FOR "!" COMMENT COMMAND AND FLAG
;	CHS45 - ASSY SW FOR /IN & /EX SWITCHES
;	CHS46 - ASSY SW FOR "ALTERNATE" COMMANDS
;	CHS47 - ASSY SW FOR SUBPAGE FIX
;	CHS48 - ASSY SW'S FOR CHANGES TO "NUMBER" COMMAND
;	CHS49 - ASSY SW'S FOR MULTIPLE INPUT FILES & APPEND TO OUTPUT
;	CHS50 - ASSY SW FOR TASK EXPANSION
;	CHS51 - ASSY SW'S FOR "ENTRY" COMMAND & SUBINDEXING
;	CHS52 - ASSY SW FOR CHECK OF RIGHT MARGIN IN INDEX
;	CHS53 - ASSY SW FOR ADDING WIDOW CONTROL TO "TEST PAGE"
;	CHS54 - ASSY SW'S FOR REWORK OF FOOTNOTE PROCESSING
;	CHS55 - ASSY SW FOR FIX TO "AUTOPARAGRAPH" PROCESSING
;	CHS56 - ASSY SW FOR "PAGE NAME" COMMAND
;	CHS57 - ASSY SW'S FOR CHANGES TO "NOTE" COMMAND
;	CHS58 - ASSY SW FOR TESTS FOR UNREASONABLE COMMAND PARAMETERS
;	CHS59 - ASSY SW FOR LIMIT ON CHAPTERS OUTPUT
;	CHS60 - ASSY SW FOR COMMON SYNTAX FOR COMMAND ARGUMENTS
;	CHS61 - ASSY SW'S FOR CHANGES TO "LITERAL"

; LOCAL SYMBOL DEFINITIONS


H$$PHN=	0		;DEFINE THIS SYMBOL IF HYPHENATION
;RSTS=	0		;DEFINE THIS SYMBOL IF RUNNING ON RSTS/E
RSX11M	=1		;RUNNING UNDER RSX-11M? (0 = NO)		;CHS

.IIF DF RSTS, .IIF NZ RSX11M,	.ERROR ; RSX11M AND RSTS ARE EXCLUSIVE!

BMPHDR	=1		;BUMP HEADER LINES UP ONE LINE? (0 = NO)	;CHS01
HPRMRG	=1		;ALIGN PAGE NO. W/ PERM. RT. MARGIN? (0 = NO)	;CHS02
BLSW	=1		;INCLUDE /BL SWITCH? (0 = NO)			;CHS03
ALTHDR	=1		;INCLUDE ALT. HEADER (SEE CHS46)? (0 = NO)	;CHS04
TKBPS	=1		;PS SETTINGS AVAIL. AT TASK BUILD? (0 = NO)	;CHS05
QTSPSP	=1		;TREAT "# " SAME AS " #"? (0 = NO)		;CHS06
PDPAR	=1		;DOUBLE SPACE AFTER <PUNCT><PAREN>? (0 = NO)	;CHS07
SEMISS	=1		;SINGLE SPACE AFTER SEMICOLON? (0 = NO)		;CHS08
PRFHYP	=1		;INCLUDE PREFERRED-HYPHEN FEATURE? (0 = NO)	;CHS09
MXDHDR	=1		;DEFAULT HEADER TYPE TO "MIXED"? (0 => "UPPER")	;CHS10
BLNKHD	=1		;ALLOW HEADER TYPE "BLANK"? (0 = NO)		;CHS11
EVNODD	=1		;INCLUDE "EVEN" & "ODD" COMMANDS? (0 = NO)	;CHS12
ALTTIT	=1&ALTHDR	;INCLUDE ALTERNATING-TITLE COMMAND? (0 = NO)	;CHS14
HLSKP	=1		;"HL" => NO BLANKS AFTER "CH"? (0 = NO)		;CHS15
EXSTHY	=1		;HYPHENATE AT EXISTING HYPHENS? (0 = NO)	;CHS18
ATOSUB	=1		;INCLUDE AUTOSUBTITLE COMMAND? (0 = NO)		;CHS19
OPTTXT	=32.		;MAXIMUM NUMBER OF TEXT OPTIONS (0 = NONE)	;CHS20
OPTXSW	=1		;INCLUDE /IN & /EX SWITCHES? (0 = NO)		;CHS45
RTJUST	=1		;INCLUDE RIGHT-JUSTIFY COMMAND? (0 = NO)	;CHS23
SKPFIX	=1		;HAVE SKIP SET $PGPSW IF PAGE DUE? (0 = NO)	;CHS24
FILLHY	=1		;HYPHENATE WHEN FILL-ONLY MODE ON? (0 = NO)	;CHS25
GLBLFH	=1		;ALLOW "=" FLAG TO PRECEED NON-ALPHA? (0 = NO)	;CHS26
LFSPAC	=0		;VERTICAL SPACING FROM "END LIST" (O = NONE)	;CHS27C
XTSTPG	=2		;DO A "TP <XTSTPG>" BEFORE INDEX GRP? (0 = NO)	;CHS28B
NOPARM	=1		;MISSING # ARG. NOT DEFAULT TO 0? (0 = NO)	;CHS29
SKPNEG	=1		;ALLOW NEG. ARG. FOR SKIP & BLANK? (0 = NO)	;CHS30
PARFN	=1		;ALLOW "PARAGRAPH" IN FOOTNOTES? (0 = NO)	;CHS32
FNFIX	=1		;MISC. FIXES TO FOOTNOTE PROCESSING? (0 = NO)	;CHS33
DEFPTP	=1		;USE DEFAULT PARAGRAPH TEST-PAGE? (0 = NO)	;CHS34A
PARORD	=1		;SKIP LINES BEFORE TEST PAGE IN PARA.? (0 = NO)	;CHS34B
RELTAB	=1		;ALLOW RELATIVE TAB STOPS? (0 = NO)		;CHS35C
BIGSTD	=1		;EXPAND SCOPE OF "STANDARD"? (0 = NO)		;CHS36
FIGFIX	=16.		;MAX. NUMBER OF PENDING FIGURES (0 = OLD CODE)	;CHS37
LSTPG	=0		;PUT BLANK PAGE AT END OF OUTPUT? (0 = NO)	;CHS38
LAYOUT	=1		;INCLUDE "LAYOUT" COMMAND? (0 = NO)		;CHS39
LAYSW	=1&LAYOUT	;INCLUDE SWITCHES FOR "LAYOUT" PARMS? (0 = NO)	;CHS39A
EXTHDR	=1		;EXPAND "HEADER" COMMAND? (0 = NO)		;CHS40
XHDRSW	=1&EXTHDR	;INCLUDE SWITCHES FOR "HEADER" PARMS? (0 = NO)	;CHS40A
XSPNG	=1		;ADD CONTROL OF BLANK LINES IN INDEX? (0 = NO)	;CHS41
BADPRM	=1		;ADD "BAD PARAMETER" ERROR MESSAGE? (0 = NO)	;CHS42
QTCHAR	=1		;ADD "QUOTE CHARACTER" COMMAND? (0 = NO)	;CHS43
EXCMNT	=1		;ADD "!" COMMENT COMMAND AND FLAG? (0 = NO)	;CHS44
ALTSHF	=1&ALTHDR&LAYOUT;INCLUDE ALTERNATE-PAGE SHIFT? (0 = NO)		;CHS46
SBPFIX	=1		;ALLOW CONSECUTIVE SUBPAGES? (0 = NO)		;CHS47
NUMFIX	=1		;HAVE "NUMBER" TAKE ACTUAL PAGE #? (0 = N0)	;CHS48A
NUMREL	=1		;ALLOW RELATIVE ARGUMENT TO "NUMBER"? (0 = NO)	;CHS48B
MULTIN	=1		;ALLOW MULTIPLE INPUT FILES? (0 = NO)		;CHS49
APNDSW	=1		;ALLOW /AP ON OUTPUT FILE SPEC? (0 = NO)	;CHS49A
SAVPS	=1&MULTIN	;SAVE /PS VALUES UNLESS SW USED? (0 = NO)	;CHS49B
EXTEND	=1&RSX11M	;EXPAND TASK IF INDEX/FOOTNOTE OVRFLO? (0 = NO)	;CHS50
XENTRY	=1		;INCLUDE "ENTRY" COMMAND? (0 = NO)		;CHS51A
SUBIDX	=1&XENTRY	;INCLUDE SUBINDEXING? (0 = NO)			;CHS51B
IDXRM	=1		;CHECK RIGHT MARGIN IN INDEX? (0 = NO)		;CHS52B
EXPTP	=1		;ADD WIDOW CONTROL TO "TEST PAGE"? (0 = NO)	;CHS53
NEWFTN	=1		;USE REWORKED FOOTNOTE PROCESSING? (0 = NO)	;CHS54A
AUTOFN	=1&NEWFTN	;INCLUDE AUTOMATIC FOOTNOTE LINE? (0 = NO)	;CHS54B
AUTFIX	=1		;STOP DUPLICATE OUTPUT OF BLANK LINES? (0 = NO)	;CHS55
PAGNAM	=1		;INCLUDE "PAGE NAME" COMMAND? (0 = NO)		;CHS56
NOTEMR	=1		;ADD ARG. TO "NOTE" FOR INDENTS? (0 = NO)	;CHS57A
NOTETP	=1		;IN "NOTE," SKIP & THEN TEST? (0 = NO)		;CHS57B
PRMCHK	=1		;ADD TESTS FOR RIDICULOUS PARAMETERS? (0 = NO)	;CHS58
CHSW	=1		;ADD /CH SW TO LIMIT CHAPTERS OUTPUT? (0 = NO)	;CHS59
GENSEP	=1		;COMMON SYNTAX FOR COMMAND ARGUMENTS? (0 = NO)	;CHS60
LITSPC	=1		;SET SPACING TO 1 DURING "LITERAL"? (0 = NO)	;CHS61A
LITMRG	=1		;SET RT. MARGIN WIDE DURING "LITERAL"? (0 = NO)	;CHS61B
LITMSG	=1&LITMRG	;WARNING FOR LONG LINES IN LITERALS? (0 = NO)	;CHS61C

; 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