LB:[12,10]SAVE.MAC;2/-AU/-BF=LB:[12,10]SAVE.MAC;1
-186,193
RSXTXT:	.BYTE	15,12		; CR, LF			;[RJDK002]
	.ASCII	/  RSX11M V3.1 BL/				;[RJDK002]
RSXVER:	.ASCII	/          /					;[RJDK002]
	.ASCII	/OES V3.1 [RJDK] /				;[RJDK002]
	.IF DF M$$MGE						;[RJDK002]
	.ASCIZ	/ MAPPED/					;[RJDK002]
	.IFF							;[RJDK002]
	.ASCIZ	/ /						;[RJDK002]
	.ENDC							;[RJDK002]
-200,203
MOUCMD:	.ASCII	<12>/MOU XXX:/	; MOUNT SYSTEM DEVICE		[RJDK002]
$VOLLB:: .BLKB	12.		; VOLUME LABEL
	.BYTE	15,0		; CR, EOL
STRTUP:	.ASCIZ	<12>/@[1,2]STARTUP/<15> ; STARTUP FILE		[RJDK002]
-734,734
25$:	MOV	#RSXVER,R0	; POINT TO SYSTEM ID POSITION	[RJDK002]
-792,799
	MOVB	$SYSIZ+6,MOUCMD+5 ; FOR REDIRECT AND MOUNT
	MOVB	$SYSIZ+7,REDCMD+5 ;
	MOVB	$SYSIZ+7,MOUCMD+6 ;
	MOVB	R4,REDCMD+6	; SET UNIT NUMBER
	MOVB	R4,MOUCMD+7	; SET UNIT NUMBER
	MOV	#REDCMD,R0	; GET REDIRECT COMMAND ADDRESS
	CALL	$SMCR		; SEND TO MCR
	BCS	30$		; ERROR
	CLR	$MODPB+20	; REISSUE PROMPT		[RJDK002]
	MOV	#PROMPT,R0
	CALL	$PRTMS		; ISSUE <CRLF> >		[RJDK002]
/