$PAGE 07

	BR	P07024
	.WORD	0

  $LABEL DEBMNU

P07024:
	MOV	#P07222, R0

P07030:
	TSTB	@#TPS

	BPL	P07030
	MOVB	(R0)+, @#TPB

	TSTB	@#TKS

	BPL	P07072
	CMPB	@#TKB, #23

	BNE	P07072
P07060:
	TSTB	@#TKS

	BPL	P07060
	TSTB	@#TKB

P07072:
	CMPB	#377, (R0)

	BNE	P07030

  $LABEL P07100

	MOV	#KDSAR0, SP

; !!!!!!!
P07114 =: .+10
P07120 =: .+14
	$GOTO2	#5, #AFF798	; ! $CALL

	MOV	#P07666, R3

P07132:
	CMPB	R2, #15

	BEQ	P07210
	MOV	(R3)+, R4
	CMP	#177777, (R3)

	BEQ	P07210
	MOV	(R3)+, R5
	CMP	R2, (R3)+
	BEQ	P07160
	BR	P07132
P07160:
	MOV	#P07100, -(SP)

	BIT	#177400, R5

	BEQ	P07120
	MOV	R5, -(SP)
	MOV	R4, -(SP)

	$GOTO	#12, #AKF814

P07210:
	MOV	#AFFA12, R4	; on Page 5 - BRTBL+2

	MOV	#P07100, -(SP)

	BR	P07114

  $LABEL P07222

	.ASCII	<CR><LF><LF><LF><LF><LF><LF><LF>

	.ASCII	|DEBUG MENU PAGE  2|<CR><LF><LF><LF><LF>

	.ASCII	|1  =  DU TESTS  |<CR><LF>

	.ASCII	|2  =  MS TESTS |<CR><LF>

	.ASCII	|3  =  RK TESTS |<CR><LF>

	.ASCII	|4  =  DL TESTS |<CR><LF>

	.ASCII	|5  =  DM TESTS |<CR><LF>

	.ASCII	|6  =  DR TESTS |<CR><LF>

	.ASCII	|7  =  DY TESTS |<CR><LF>

	.ASCII	|8  =           |<CR><LF>

	.ASCII	|9  =           |<CR><LF>

	.ASCII	|0  =           |<CR><LF>

	.ASCII	|=  =  NEXT MENU|<CR><LF>

	.ASCII	|-  =  BOOT SELECTION|<CR><LF><LF><LF><LF>

	.ASCII	|INPUT SELECTION?   |

	.BYTE	377

  .REPT ^D<14>
	.WORD	177777
  .ENDR

  $LABEL P07666

	$PGO3	46, BM01DA	; DU TESTS
	.ASCIZ	|1|

	$PGO3	53, BR014E	; MS TESTS
	.ASCIZ	|2|

	$PGO3	55, BT0104	; RK TESTS
	.ASCIZ	|3|

	$PGO3	62, BY0064	; DL TESTS
	.ASCIZ	|4|

	$PGO3	74, CI0076	; DM TESTS
	.ASCIZ	|5|

	$PGO3	66, CC0190	; DR TESTS
	.ASCIZ	|6|

	$PGO3	100, CM01DA	; DY TESTS
	.ASCIZ	|7|

	$PGO2	7, P07024
	.ASCIZ	|8|

	$PGO2	7, P07024
	.ASCIZ	|9|

	$PGO2	7, P07024
	.WORD	60

	$PGO2	10, AI0014
	.ASCIZ	|=|

	$PGO2	0, AA0018
	.ASCIZ	|-|

  $FILL