;TALKPRE.MAC		2DEC81
	.PAGE
	.SBTTL	MACRO DEFINITIONS AND DATA AREA
	.ENABL LC
;
	.MACRO	QIOMAC	R, D, A, C, G		; MACRO TO SET UP DPB
	.IIF	NB <D>	MOV	D, R		; AND ISSUE DIR$;
	.IIF	NB <A>	MOV	A, Q.IOPL(R)	; ANY BLANK ARGUMENT
	.IIF	NB <C>	MOV	C, Q.IOPL+2(R)	; STOPS THAT PORTION OF CODE
	.IIF	NB <G>	DIR$	R		; FROM BEING GENERATED
	.ENDM	QIOMAC
;
;		MACRO CALLS
;
	.MCALL	ALUN$S, ASTX$S, DSAR$S, GMCR$, CLEF$S, SETF$S, WTSE$S, EXIT$S
	.MCALL	HDRDF$, UCBDF$, STOP$S, GTSK$C
	.MCALL	QIO$, QIOW$, DIR$
	.MCALL	FDBDF$, FDAT$A, FDRC$A, FDOP$A, FSRSZ$, FDBF$A,NMBLK$
	.MCALL	CSI$, CSI$1, CSI$2
	.MCALL	FINIT$, OPEN$R, OPEN$W, GET$, PUT$, CLOSE$
	.MCALL	CINT$, MRKT$S
;
;
;	DEFINITIONS
;
	SPNCAR =  23		; SUSPEND PORT QUEUE PROCESSING - ^S
	ECOCAR =  17		; DISCARD/RESTART TERMINAL ECHO COMMAND - ^O
	RESCAR =  21		; RESUME PORT QUEUE PROCESSING - ^Q
	TBCHAR =   2		; TRANSMIT BREAK CHARACTER - ^B
	CMDCAR =  27		; ENTER COMMAND MODE CHARACTER - ^W
	RDICAR = 111		; REDIRECT INPUT CHARACTER - I
	CNICAR = 112		; CANCEL REDIRECTED INPUT CHARACTER - J
	RDOCAR = 117		; REDIRECT OUTPUT CHARACTER - O
	CNOCAR = 120		; CANCEL REDIRECTED OUTPUT CHARACTER - P
	CNXCAR = 130		; CANCEL BOTH REDIRECT INPUT AND OUTPUT - X
	PASCAR = 104		; DETACH FROM TALK - D
	CGECAR = 105		; CHANGE EOR CHARACTER - E
	EXICAR = 132		; EXIT PROGRAM CHARACTER - Z
	XCCCAR = 103		; TRANSMIT CONTROL CHARACTER CHARACTER - C
	XBCCAR = 113		; TRANSMIT BREAK CONTROL CHARACTER - K
	RIHCAR = 101		; REDIRECTED INPUT HELP CHARACTER - A
	ROHCAR = 102		; REDIRECTED OUTPUT HELP CHARACTER - B
	MNUCAR = 115		; DISPLAY MENU CHARACTER - M
	.IF DF	SIGMA9
	PROMPT = 33.		; SIGMA9 PROMPT (!)
	WTCHAR = 12		; PROMPT FOR NEXT FILE READ
	.ENDC
	.IF DF	RSX11
	WTCHAR = 12		; PROMPT FOR NEXT FILE READ
	PROMPT = 62.		; RSX-11M MCR PROMPT (>)
	.ENDC
	.IF DF	VAX
	PROMPT = 36.		; VAX/VMS PROMPT ($)
	WTCHAR = 12		; PROMPT FOR NEXT FILE READ
	.ENDC
	OFBSIZ = 133.		; OUTPUT BUFFER SIZE
	INBSIZ = 133.		; INPUT BUFFER SIZE
;