extrn	.begin,.chl,.swt
	extrn	csave,cret,.move
	global	pDPHMAP_,2
	global	pDPHVEC_,16
	DSEG
	public	pSYSCFG_
pSYSCFG_:
	DW -16384
	CSEG
	PUBLIC dispdpb_
dispdpb_:	lxi d,.2
	call csave
	LXI H,10-.2
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,10-.2
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	CALL crtlc_
	POP D
	POP D
	LXI H,12-.2
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	XCHG
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,14-.2
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,.1+0
	PUSH H
	CALL printf_
	POP D
	POP D
	POP D
	LXI H,10-.2
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,10-.2
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	XCHG
	INX H
	PUSH H
	CALL crtlc_
	POP D
	POP D
	LXI H,12-.2
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	XCHG
	INX H
	INX H
	MOV E,M
	MVI	D,0
	PUSH D
	LXI H,14-.2
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	XCHG
	INX H
	INX H
	PUSH H
	LXI H,.1+17
	PUSH H
	CALL printf_
	POP D
	POP D
	POP D
	LXI H,10-.2
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,10-.2
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	XCHG
	INX H
	INX H
	PUSH H
	CALL crtlc_
	POP D
	POP D
	LXI H,12-.2
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	XCHG
	INX H
	INX H
	INX H
	MOV E,M
	MVI	D,0
	PUSH D
	LXI H,14-.2
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	XCHG
	INX H
	INX H
	INX H
	PUSH H
	LXI H,.1+34
	PUSH H
	CALL printf_
	POP D
	POP D
	POP D
	LXI H,10-.2
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,10-.2
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	XCHG
	INX H
	INX H
	INX H
	PUSH H
	CALL crtlc_
	POP D
	POP D
	LXI H,12-.2
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,4
	DAD D
	MOV E,M
	MVI	D,0
	PUSH D
	LXI H,14-.2
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,4
	DAD D
	PUSH H
	LXI H,.1+51
	PUSH H
	CALL printf_
	POP D
	POP D
	POP D
	LXI H,10-.2
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,10-.2
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,4
	DAD D
	PUSH H
	CALL crtlc_
	POP D
	POP D
	LXI H,12-.2
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,5
	DAD D
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,14-.2
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,5
	DAD D
	PUSH H
	LXI H,.1+68
	PUSH H
	CALL printf_
	POP D
	POP D
	POP D
	LXI H,10-.2
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,10-.2
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,5
	DAD D
	PUSH H
	CALL crtlc_
	POP D
	POP D
	LXI H,12-.2
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,7
	DAD D
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,14-.2
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,7
	DAD D
	PUSH H
	LXI H,.1+85
	PUSH H
	CALL printf_
	POP D
	POP D
	POP D
	LXI H,10-.2
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,10-.2
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,6
	DAD D
	PUSH H
	CALL crtlc_
	POP D
	POP D
	LXI H,12-.2
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,9
	DAD D
	MOV E,M
	MVI	D,0
	PUSH D
	LXI H,14-.2
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,9
	DAD D
	PUSH H
	LXI H,.1+102
	PUSH H
	CALL printf_
	POP D
	POP D
	POP D
	LXI H,10-.2
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,10-.2
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,7
	DAD D
	PUSH H
	CALL crtlc_
	POP D
	POP D
	LXI H,12-.2
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,10
	DAD D
	MOV E,M
	MVI	D,0
	PUSH D
	LXI H,14-.2
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,10
	DAD D
	PUSH H
	LXI H,.1+119
	PUSH H
	CALL printf_
	POP D
	POP D
	POP D
	LXI H,10-.2
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,10-.2
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,8
	DAD D
	PUSH H
	CALL crtlc_
	POP D
	POP D
	LXI H,12-.2
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,11
	DAD D
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,14-.2
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,11
	DAD D
	PUSH H
	LXI H,.1+136
	PUSH H
	CALL printf_
	POP D
	POP D
	POP D
	LXI H,10-.2
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,10-.2
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,9
	DAD D
	PUSH H
	CALL crtlc_
	POP D
	POP D
	LXI H,12-.2
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,13
	DAD D
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,14-.2
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,13
	DAD D
	PUSH H
	LXI H,.1+153
	PUSH H
	CALL printf_
	POP D
	POP D
	POP D
	RET
.2 EQU 0
.1:
	DB 91,37,48,52,120,93,32,115,112,116,32,61,37,48,52
	DB 120,0,91,37,48,52,120,93,32,98,115,104,32,61,37
	DB 48,50,120,0,91,37,48,52,120,93,32,98,108,109,32
	DB 61,37,48,50,120,0,91,37,48,52,120,93,32,101,120
	DB 109,32,61,37,48,50,120,0,91,37,48,52,120,93,32
	DB 100,115,109,32,61,37,48,52,120,0,91,37,48,52,120
	DB 93,32,100,114,109,32,61,37,48,52,120,0,91,37,48
	DB 52,120,93,32,97,108,48,32,61,37,48,50,120,0,91
	DB 37,48,52,120,93,32,97,108,49,32,61,37,48,50,120
	DB 0,91,37,48,52,120,93,32,99,107,115,32,61,37,48
	DB 52,120,0,91,37,48,52,120,93,32,111,102,102,32,61
	DB 37,48,52,120,0
	PUBLIC dispdph_
dispdph_:	lxi d,.4
	call csave
	LXI H,-6629
	SHLD ireghl_
	LXI H,8-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	XCHG
	SHLD iregbc_
	LXI H,0
	SHLD iregde_
	CALL bioscall_
	LHLD ireghl_
	MOV A,H
	ORA L
	JNZ .5
	LXI H,0
	RET
.5:
	LHLD ireghl_
	XCHG
	LXI H,2-.4
	DAD SP
	MOV M,E
	INX H
	MOV M,D
	LXI H,2-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,10
	DAD D
	MOV E,M
	INX H
	MOV D,M
	LXI H,0-.4
	DAD SP
	MOV M,E
	INX H
	MOV M,D
	LHLD ireghl_
	DCX H
	XCHG
	LXI H,-2-.4
	DAD SP
	MOV M,E
	INX H
	MOV M,D
	LXI H,-2-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	XCHG
	MOV E,M
	MVI	D,0
	LXI H,-4-.4
	DAD SP
	MOV M,E
	INX H
	MOV M,D
	LXI H,12-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	XCHG
	INX H
	PUSH H
	LXI H,12-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	XCHG
	DCX H
	PUSH H
	CALL crtlc_
	POP D
	POP D
	LXI H,8-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,65
	DAD D
	PUSH H
	LXI H,.3+0
	PUSH H
	CALL printf_
	POP D
	POP D
	LXI H,-4-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	XCHG
	JMP .6
.8:
	LXI H,.3+11
	PUSH H
	CALL printf_
	POP D
	JMP .7
.9:
	LXI H,.3+18
	PUSH H
	CALL printf_
	POP D
	JMP .7
.10:
	LXI H,.3+25
	PUSH H
	CALL printf_
	POP D
	JMP .7
.11:
	LXI H,.3+32
	PUSH H
	CALL printf_
	POP D
	JMP .7
.12:
	LXI H,.3+39
	PUSH H
	CALL printf_
	POP D
	JMP .7
.13:
	LXI H,.3+46
	PUSH H
	CALL printf_
	POP D
	JMP .7
.14:
	LXI H,.3+53
	PUSH H
	CALL printf_
	POP D
	JMP .7
.15:
	LXI H,.3+60
	PUSH H
	CALL printf_
	POP D
	JMP .7
.16:
	LXI H,.3+67
	PUSH H
	CALL printf_
	POP D
	JMP .7
.17:
	LXI H,.3+74
	PUSH H
	CALL printf_
	POP D
	JMP .7
.18:
	LXI H,.3+81
	PUSH H
	CALL printf_
	POP D
	JMP .7
.19:
	LXI H,.3+88
	PUSH H
	CALL printf_
	POP D
	JMP .7
.20:
	LXI H,.3+95
	PUSH H
	CALL printf_
	POP D
	JMP .7
.21:
	LXI H,.3+102
	PUSH H
	CALL printf_
	POP D
	JMP .7
.22:
	LXI H,.3+109
	PUSH H
	CALL printf_
	POP D
	JMP .7
.23:
	LXI H,.3+116
	PUSH H
	CALL printf_
	POP D
	JMP .7
.6:
	CALL .swt
	DW 16
	DW 0,.9
	DW 1,.8
	DW 16,.10
	DW 17,.11
	DW 32,.12
	DW 33,.13
	DW 48,.14
	DW 49,.15
	DW 64,.16
	DW 65,.17
	DW 80,.18
	DW 81,.19
	DW 96,.20
	DW 97,.21
	DW 112,.22
	DW 113,.23
	DW .7
.7:
	LXI H,12-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,12-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	CALL crtlc_
	POP D
	POP D
	LXI H,2-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	XCHG
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,4-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,.3+123
	PUSH H
	CALL printf_
	POP D
	POP D
	POP D
	LXI H,12-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,12-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	XCHG
	INX H
	PUSH H
	CALL crtlc_
	POP D
	POP D
	LXI H,2-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	XCHG
	INX H
	INX H
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,4-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	XCHG
	INX H
	INX H
	PUSH H
	LXI H,.3+140
	PUSH H
	CALL printf_
	POP D
	POP D
	POP D
	LXI H,12-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,12-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	XCHG
	INX H
	INX H
	PUSH H
	CALL crtlc_
	POP D
	POP D
	LXI H,2-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,4
	DAD D
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,4-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,4
	DAD D
	PUSH H
	LXI H,.3+157
	PUSH H
	CALL printf_
	POP D
	POP D
	POP D
	LXI H,12-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,12-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	XCHG
	INX H
	INX H
	INX H
	PUSH H
	CALL crtlc_
	POP D
	POP D
	LXI H,2-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,6
	DAD D
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,4-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,6
	DAD D
	PUSH H
	LXI H,.3+174
	PUSH H
	CALL printf_
	POP D
	POP D
	POP D
	LXI H,12-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,12-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,4
	DAD D
	PUSH H
	CALL crtlc_
	POP D
	POP D
	LXI H,2-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,8
	DAD D
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,4-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,8
	DAD D
	PUSH H
	LXI H,.3+191
	PUSH H
	CALL printf_
	POP D
	POP D
	POP D
	LXI H,12-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,12-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,5
	DAD D
	PUSH H
	CALL crtlc_
	POP D
	POP D
	LXI H,2-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,10
	DAD D
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,4-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,10
	DAD D
	PUSH H
	LXI H,.3+208
	PUSH H
	CALL printf_
	POP D
	POP D
	POP D
	LXI H,12-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,12-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,6
	DAD D
	PUSH H
	CALL crtlc_
	POP D
	POP D
	LXI H,2-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,12
	DAD D
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,4-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,12
	DAD D
	PUSH H
	LXI H,.3+225
	PUSH H
	CALL printf_
	POP D
	POP D
	POP D
	LXI H,12-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,12-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,7
	DAD D
	PUSH H
	CALL crtlc_
	POP D
	POP D
	LXI H,2-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,14
	DAD D
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,4-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,14
	DAD D
	PUSH H
	LXI H,.3+242
	PUSH H
	CALL printf_
	POP D
	POP D
	POP D
	LXI H,2-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,16
	DAD D
	MOV E,M
	MVI	D,0
	PUSH D
	LXI H,76
	POP D
	CALL .eq
	JZ .24
	LXI H,2-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,17
	DAD D
	MOV E,M
	MVI	D,0
	PUSH D
	LXI H,85
	POP D
	CALL .eq
	JZ .24
	LXI H,12-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,12-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,8
	DAD D
	PUSH H
	CALL crtlc_
	POP D
	POP D
	LXI H,2-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,16
	DAD D
	MOV E,M
	MVI	D,0
	PUSH D
	LXI H,4-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,16
	DAD D
	PUSH H
	LXI H,.3+259
	PUSH H
	CALL printf_
	POP D
	POP D
	POP D
	LXI H,12-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,12-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,9
	DAD D
	PUSH H
	CALL crtlc_
	POP D
	POP D
	LXI H,2-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,17
	DAD D
	MOV E,M
	MVI	D,0
	PUSH D
	LXI H,4-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,17
	DAD D
	PUSH H
	LXI H,.3+276
	PUSH H
	CALL printf_
	POP D
	POP D
	POP D
	LXI H,12-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,12-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,10
	DAD D
	PUSH H
	CALL crtlc_
	POP D
	POP D
	LXI H,2-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,18
	DAD D
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,4-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,18
	DAD D
	PUSH H
	LXI H,.3+293
	PUSH H
	CALL printf_
	POP D
	POP D
	POP D
	LXI H,12-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,12-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,11
	DAD D
	PUSH H
	CALL crtlc_
	POP D
	POP D
	LXI H,2-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,20
	DAD D
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,4-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,20
	DAD D
	PUSH H
	LXI H,.3+310
	PUSH H
	CALL printf_
	POP D
	POP D
	POP D
.24:
	LXI H,0-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,5
	DAD D
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,350
	POP D
	CALL .eq
	JZ .25
	LXI H,12-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	XCHG
	INX H
	PUSH H
	LXI H,12-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,9
	DAD D
	PUSH H
	CALL crtlc_
	POP D
	POP D
	LXI H,.3+327
	PUSH H
	CALL printf_
	POP D
	LXI H,34
	PUSH H
	LXI H,.3+333
	PUSH H
	CALL printf_
	POP D
	POP D
	LXI H,12-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	XCHG
	INX H
	PUSH H
	LXI H,12-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,10
	DAD D
	PUSH H
	CALL crtlc_
	POP D
	POP D
	LXI H,.3+343
	PUSH H
	CALL printf_
	POP D
.25:
	LXI H,0-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,5
	DAD D
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,710
	POP D
	CALL .eq
	JZ .26
	LXI H,12-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	XCHG
	INX H
	PUSH H
	LXI H,12-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,9
	DAD D
	PUSH H
	CALL crtlc_
	POP D
	POP D
	LXI H,.3+358
	PUSH H
	CALL printf_
	POP D
	LXI H,34
	PUSH H
	LXI H,.3+364
	PUSH H
	CALL printf_
	POP D
	POP D
	LXI H,12-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	XCHG
	INX H
	PUSH H
	LXI H,12-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,10
	DAD D
	PUSH H
	CALL crtlc_
	POP D
	POP D
	LXI H,.3+374
	PUSH H
	CALL printf_
	POP D
.26:
	LXI H,0-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,5
	DAD D
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,170
	POP D
	CALL .eq
	JZ .27
	LXI H,12-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	XCHG
	INX H
	PUSH H
	LXI H,12-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,9
	DAD D
	PUSH H
	CALL crtlc_
	POP D
	POP D
	LXI H,.3+390
	PUSH H
	CALL printf_
	POP D
	LXI H,34
	PUSH H
	LXI H,.3+396
	PUSH H
	CALL printf_
	POP D
	POP D
	LXI H,12-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	XCHG
	INX H
	PUSH H
	LXI H,12-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,10
	DAD D
	PUSH H
	CALL crtlc_
	POP D
	POP D
	LXI H,.3+406
	PUSH H
	CALL printf_
	POP D
.27:
	LXI H,0-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,5
	DAD D
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,591
	POP D
	CALL .eq
	JZ .28
	LXI H,12-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	XCHG
	INX H
	PUSH H
	LXI H,12-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,9
	DAD D
	PUSH H
	CALL crtlc_
	POP D
	POP D
	LXI H,.3+421
	PUSH H
	CALL printf_
	POP D
	LXI H,34
	PUSH H
	LXI H,.3+427
	PUSH H
	CALL printf_
	POP D
	POP D
	LXI H,12-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	XCHG
	INX H
	PUSH H
	LXI H,12-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,10
	DAD D
	PUSH H
	CALL crtlc_
	POP D
	POP D
	LXI H,.3+437
	PUSH H
	CALL printf_
	POP D
.28:
	LXI H,0-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,5
	DAD D
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,546
	POP D
	CALL .eq
	JZ .29
	LXI H,12-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	XCHG
	INX H
	PUSH H
	LXI H,12-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,9
	DAD D
	PUSH H
	CALL crtlc_
	POP D
	POP D
	LXI H,.3+452
	PUSH H
	CALL printf_
	POP D
	LXI H,34
	PUSH H
	LXI H,.3+458
	PUSH H
	CALL printf_
	POP D
	POP D
	LXI H,12-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	XCHG
	INX H
	PUSH H
	LXI H,12-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,10
	DAD D
	PUSH H
	CALL crtlc_
	POP D
	POP D
	LXI H,.3+468
	PUSH H
	CALL printf_
	POP D
.29:
	LXI H,2-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,10
	DAD D
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,14-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,14-.4
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	LXI H,12
	DAD D
	PUSH H
	CALL dispdpb_
	POP D
	POP D
	POP D
	RET
.4 EQU -8
.3:
	DB 68,114,105,118,101,32,37,99,58,32,0,32,32,32,82
	DB 65,77,0,32,32,32,82,79,77,0,32,32,32,70,68
	DB 48,0,32,32,32,70,68,49,0,32,32,73,68,69,48
	DB 0,32,32,73,68,69,49,0,65,84,65,80,73,48,0
	DB 65,84,65,80,73,49,0,80,80,73,68,69,48,0,80
	DB 80,73,68,69,49,0,32,32,32,83,68,48,0,32,32
	DB 32,83,68,49,0,80,82,80,83,68,48,0,80,82,80
	DB 83,68,49,0,80,80,80,83,68,48,0,80,80,80,83
	DB 68,49,0,91,37,48,52,120,93,32,120,108,116,32,61
	DB 37,48,52,120,0,91,37,48,52,120,93,32,114,118,49
	DB 32,61,37,48,52,120,0,91,37,48,52,120,93,32,114
	DB 118,50,32,61,37,48,52,120,0,91,37,48,52,120,93
	DB 32,114,118,51,32,61,37,48,52,120,0,91,37,48,52
	DB 120,93,32,100,98,102,32,61,37,48,52,120,0,91,37
	DB 48,52,120,93,32,100,112,98,32,61,37,48,52,120,0
	DB 91,37,48,52,120,93,32,99,115,118,32,61,37,48,52
	DB 120,0,91,37,48,52,120,93,32,97,108,118,32,61,37
	DB 48,52,120,0,91,37,48,52,120,93,32,115,105,103,108
	DB 61,37,48,50,120,0,91,37,48,52,120,93,32,115,105
	DB 103,117,61,37,48,50,120,0,91,37,48,52,120,93,32
	DB 99,117,114,114,61,37,48,52,120,0,91,37,48,52,120
	DB 93,32,110,117,109,98,61,37,48,52,120,0,51,45,49
	DB 47,50,0,37,99,32,32,57,32,83,80,84,0,55,50
	DB 48,75,66,32,68,83,68,68,32,70,77,84,0,51,45
	DB 49,47,50,0,37,99,32,49,56,32,83,80,84,0,49
	DB 46,52,52,77,66,32,68,83,72,68,32,70,77,84,0
	DB 53,45,49,47,52,0,37,99,32,32,57,32,83,80,84
	DB 0,51,54,48,75,66,32,68,83,68,68,32,70,77,84
	DB 0,53,45,49,47,52,0,37,99,32,49,53,32,83,80
	DB 84,0,49,46,50,77,66,32,68,83,72,68,32,70,77
	DB 84,0,32,32,32,32,56,0,37,99,32,49,53,32,83
	DB 80,84,0,49,46,49,49,77,66,32,68,83,68,68,32
	DB 70,77,84,0
	PUBLIC main_
main_:	lxi d,.31
	call csave
	LXI H,25
	SHLD dregbc_
	CALL bdoscall_
	LDA drega_
	MOV L,A
	MVI	H,0
	XCHG
	LXI H,2-.31
	DAD SP
	MOV M,E
	INX H
	MOV M,D
	LXI H,2-.31
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	XCHG
	JMP .32
.34:
	LXI H,4
	XCHG
	LXI H,0-.31
	DAD SP
	MOV M,E
	INX H
	MOV M,D
	JMP .33
.35:
	LXI H,4
	XCHG
	LXI H,0-.31
	DAD SP
	MOV M,E
	INX H
	MOV M,D
	JMP .33
.36:
	LXI H,4
	XCHG
	LXI H,0-.31
	DAD SP
	MOV M,E
	INX H
	MOV M,D
	JMP .33
.37:
	LXI H,4
	XCHG
	LXI H,0-.31
	DAD SP
	MOV M,E
	INX H
	MOV M,D
	JMP .33
.38:
	LXI H,4
	XCHG
	LXI H,0-.31
	DAD SP
	MOV M,E
	INX H
	MOV M,D
	JMP .33
.39:
	LXI H,3
	XCHG
	LXI H,0-.31
	DAD SP
	MOV M,E
	INX H
	MOV M,D
	JMP .33
.40:
	LXI H,2
	XCHG
	LXI H,0-.31
	DAD SP
	MOV M,E
	INX H
	MOV M,D
	JMP .33
.41:
	LXI H,1
	XCHG
	LXI H,0-.31
	DAD SP
	MOV M,E
	INX H
	MOV M,D
	JMP .33
.42:
	LXI H,0
	XCHG
	LXI H,0-.31
	DAD SP
	MOV M,E
	INX H
	MOV M,D
	JMP .33
.32:
	CALL .swt
	DW 8
	DW 0,.34
	DW 1,.35
	DW 2,.36
	DW 3,.37
	DW 4,.38
	DW 5,.39
	DW 6,.40
	DW 7,.41
	DW .42
.33:
	LXI H,2
	XCHG
	LXI H,8-.31
	DAD SP
	MOV A,M
	INX H
	MOV H,M
	MOV L,A
	CALL .eq
	JZ .43
	LXI H,10-.31
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	XCHG
	INX H
	INX H
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	LXI H,-126-.31
	DAD SP
	PUSH H
	CALL strcpy_
	POP D
	POP D
	LXI H,-128-.31
	DAD SP
	PUSH H
	CALL strlen_
	POP D
	PUSH H
	LXI H,2
	POP D
	CALL .eq
	JZ .44
	LXI H,-127-.31
	DAD SP
	MOV E,M
	MVI	D,0
	PUSH D
	LXI H,58
	POP D
	CALL .eq
	JZ .45
	LXI H,-128-.31
	DAD SP
	MOV E,M
	MVI	D,0
	XCHG
	JMP .46
.48:
.49:
	LXI H,0
	XCHG
	LXI H,2-.31
	DAD SP
	MOV M,E
	INX H
	MOV M,D
	LXI H,4
	XCHG
	LXI H,0-.31
	DAD SP
	MOV M,E
	INX H
	MOV M,D
	JMP .47
.50:
.51:
	LXI H,1
	XCHG
	LXI H,2-.31
	DAD SP
	MOV M,E
	INX H
	MOV M,D
	LXI H,4
	XCHG
	LXI H,0-.31
	DAD SP
	MOV M,E
	INX H
	MOV M,D
	JMP .47
.52:
.53:
	LXI H,2
	XCHG
	LXI H,2-.31
	DAD SP
	MOV M,E
	INX H
	MOV M,D
	LXI H,4
	XCHG
	LXI H,0-.31
	DAD SP
	MOV M,E
	INX H
	MOV M,D
	JMP .47
.54:
.55:
	LXI H,3
	XCHG
	LXI H,2-.31
	DAD SP
	MOV M,E
	INX H
	MOV M,D
	LXI H,4
	XCHG
	LXI H,0-.31
	DAD SP
	MOV M,E
	INX H
	MOV M,D
	JMP .47
.56:
.57:
	LXI H,4
	XCHG
	LXI H,2-.31
	DAD SP
	MOV M,E
	INX H
	MOV M,D
	LXI H,4
	XCHG
	LXI H,0-.31
	DAD SP
	MOV M,E
	INX H
	MOV M,D
	JMP .47
.58:
.59:
	LXI H,5
	XCHG
	LXI H,2-.31
	DAD SP
	MOV M,E
	INX H
	MOV M,D
	LXI H,3
	XCHG
	LXI H,0-.31
	DAD SP
	MOV M,E
	INX H
	MOV M,D
	JMP .47
.60:
.61:
	LXI H,2
	XCHG
	LXI H,0-.31
	DAD SP
	MOV M,E
	INX H
	MOV M,D
	LXI H,6
	XCHG
	LXI H,2-.31
	DAD SP
	MOV M,E
	INX H
	MOV M,D
	JMP .47
.62:
.63:
	LXI H,7
	XCHG
	LXI H,2-.31
	DAD SP
	MOV M,E
	INX H
	MOV M,D
	LXI H,1
	XCHG
	LXI H,0-.31
	DAD SP
	MOV M,E
	INX H
	MOV M,D
	JMP .47
.64:
.65:
	LXI H,8
	XCHG
	LXI H,2-.31
	DAD SP
	MOV M,E
	INX H
	MOV M,D
	LXI H,1
	XCHG
	LXI H,0-.31
	DAD SP
	MOV M,E
	INX H
	MOV M,D
	JMP .47
.66:
.67:
	LXI H,9
	XCHG
	LXI H,2-.31
	DAD SP
	MOV M,E
	INX H
	MOV M,D
	LXI H,1
	XCHG
	LXI H,0-.31
	DAD SP
	MOV M,E
	INX H
	MOV M,D
	JMP .47
.68:
.69:
	LXI H,10
	XCHG
	LXI H,2-.31
	DAD SP
	MOV M,E
	INX H
	MOV M,D
	LXI H,1
	XCHG
	LXI H,0-.31
	DAD SP
	MOV M,E
	INX H
	MOV M,D
	JMP .47
.70:
.71:
	LXI H,11
	XCHG
	LXI H,2-.31
	DAD SP
	MOV M,E
	INX H
	MOV M,D
	LXI H,1
	XCHG
	LXI H,0-.31
	DAD SP
	MOV M,E
	INX H
	MOV M,D
	JMP .47
.46:
	LXI D,-65
	DAD D
	XCHG
	LXI H,-44
	DAD D
	JC .47
	LXI H,.72
	DAD D
	DAD D
	MOV E,M
	INX H
	MOV D,M
	XCHG
	PCHL
.72:	DW .48
	DW .50
	DW .52
	DW .54
	DW .56
	DW .58
	DW .60
	DW .62
	DW .64
	DW .66
	DW .68
	DW .70
	DW .47
	DW .47
	DW .47
	DW .47
	DW .47
	DW .47
	DW .47
	DW .47
	DW .47
	DW .47
	DW .47
	DW .47
	DW .47
	DW .47
	DW .47
	DW .47
	DW .47
	DW .47
	DW .47
	DW .47
	DW .49
	DW .51
	DW .53
	DW .55
	DW .57
	DW .59
	DW .61
	DW .63
	DW .65
	DW .67
	DW .69
	DW .71
.47:
.45:
.44:
.43:
	LXI H,-4096
	SHLD hregbc_
	LXI H,-16384
	SHLD hregde_
	CALL diagnose_
	LXI H,-16384
	SHLD pSYSCFG_
	LHLD pSYSCFG_
	LXI D,68
	DAD D
	MOV E,M
	MVI	D,0
	PUSH D
	CALL crtinit_
	POP D
	CALL crtclr_
	LXI H,0
	PUSH H
	LXI H,0
	PUSH H
	CALL crtlc_
	POP D
	POP D
	LXI H,1
	PUSH H
	LXI H,0
	PUSH H
	LXI H,5
	PUSH H
	LXI H,2
	PUSH H
	LXI H,2013
	PUSH H
	LXI H,31
	PUSH H
	LXI H,3
	PUSH H
	LXI H,.30+0
	PUSH H
	CALL printf_
	XCHG
	LXI H,16
	DAD SP
	SPHL
	LXI H,.30+33
	PUSH H
	CALL printf_
	POP D
	LXI H,0
	XCHG
	LXI H,0-.31
	DAD SP
	MOV A,M
	INX H
	MOV H,M
	MOV L,A
	CALL .lt
	JZ .73
	LXI H,2
	PUSH H
	LXI H,3
	PUSH H
	LXI H,6-.31
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	PUSH D
	CALL dispdph_
	POP D
	POP D
	POP D
.73:
	LXI H,1
	XCHG
	LXI H,0-.31
	DAD SP
	MOV A,M
	INX H
	MOV H,M
	MOV L,A
	CALL .lt
	JZ .74
	LXI H,22
	PUSH H
	LXI H,3
	PUSH H
	LXI H,6-.31
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	XCHG
	INX H
	PUSH H
	CALL dispdph_
	POP D
	POP D
	POP D
.74:
	LXI H,2
	XCHG
	LXI H,0-.31
	DAD SP
	MOV A,M
	INX H
	MOV H,M
	MOV L,A
	CALL .lt
	JZ .75
	LXI H,42
	PUSH H
	LXI H,3
	PUSH H
	LXI H,6-.31
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	XCHG
	INX H
	INX H
	PUSH H
	CALL dispdph_
	POP D
	POP D
	POP D
.75:
	LXI H,3
	XCHG
	LXI H,0-.31
	DAD SP
	MOV A,M
	INX H
	MOV H,M
	MOV L,A
	CALL .lt
	JZ .76
	LXI H,62
	PUSH H
	LXI H,3
	PUSH H
	LXI H,6-.31
	DAD SP
	MOV E,M
	INX H
	MOV D,M
	XCHG
	INX H
	INX H
	INX H
	PUSH H
	CALL dispdph_
	POP D
	POP D
	POP D
.76:
	LXI H,0
	SHLD dregbc_
	CALL bdoscall_
	RET
.31 EQU -132
.30:
	DB 86,73,69,87,46,67,79,77,32,37,100,47,37,100,47
	DB 37,100,32,118,37,100,46,37,100,46,37,100,32,40,37
	DB 100,41,0,32,100,119,103,32,45,32,83,121,115,116,101
	DB 109,32,83,116,111,114,97,103,101,32,68,114,105,118,101
	DB 115,32,97,110,100,32,76,111,103,105,99,97,108,32,85
	DB 110,105,116,115,0
	extrn	strlen_
	extrn	strcpy_
	extrn	printf_
	extrn	crtlc_
	extrn	crtclr_
	extrn	crtinit_
	extrn	diagnose_
	extrn	hregde_
	extrn	hregbc_
	extrn	bdoscall_
	extrn	dregbc_
	extrn	drega_
	extrn	bioscall_
	extrn	ireghl_
	extrn	iregde_
	extrn	iregbc_
	extrn	.eq
	extrn	.lt
	END