$PAGE 10

	BR	P10024
	.WORD	0

  $LABEL DEBMNU
  $LABEL AI0014

P10024:
	MOV	#P10222, R0

P10030:
	TSTB	@#TPS

	BPL	P10030
	MOVB	(R0)+, @#TPB

	TSTB	@#TKS

	BPL	P10072
	CMPB	@#TKB, #23

	BNE	P10072
P10060:
	TSTB	@#TKS

	BPL	P10060
	TSTB	@#TKB

P10072:
	CMPB	#377, (R0)

	BNE	P10030

  $LABEL P10100

	MOV	#KDSAR0, SP

; !!!!!!!
P10114 =: .+10
P10120 =: .+14
	$GOTO2	#5, #AFF798	; ! $CALL

	MOV	#P10666, R3

P10132:
	CMPB	R2, #CR

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

	BEQ	P10210
	MOV	(R3)+, R5
	CMP	R2, (R3)+
	BEQ	P10160
	BR	P10132
P10160:
	MOV	#P10100, -(SP)

	BIT	#177400, R5

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

	$GOTO	#12, #AKF814

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

	MOV	#P10100, -(SP)

	BR	P10114

  $LABEL P10222

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

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

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

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

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

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

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

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

	.ASCII	|7  =           |<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 P10666

	$PGO2	10, AI0014
	.ASCIZ	|1|

	$PGO2	10, AI0014
	.ASCIZ	|2|

	$PGO2	10, AI0014
	.ASCIZ	|3|

	$PGO2	10, AI0014
	.ASCIZ	|4|

	$PGO2	10, AI0014
	.ASCIZ	|5|

	$PGO2	10, AI0014
	.ASCIZ	|6|

	$PGO2	10, AI0014
	.ASCIZ	|7|

	$PGO2	10, AI0014
	.ASCIZ	|8|

	$PGO2	10, AI0014
	.ASCIZ	|9|

	$PGO2	10, AI0014
	.ASCIZ	|0|

	$PGO2	11, AJ0014
	.ASCIZ	|=|

	$PGO2	0, AA0018
	.ASCIZ	|-|

  $FILL