

;
; 浜様様様様様様様様様様様様様様様様様様様様様様様様様様様様様様様様様様様様
; 	This file is generated by The Interactive Disassembler (IDA)	    
; 	Copyright (c) 2005 by DataRescue sa/nv,	<ida@datarescue.com>	    
; 藩様様様様様様様様様様様様様様様様様様様様様様様様様様様様様様様様様様様様
;
; File Name   :	C:\Documents and Settings\Brandon\Desktop\rpn3\rpn3.txt
; Format      :	Intel Hex Object Format

; Processor	  : z80	[]
; Target assembler: Zilog Macro	Assembler

; 様様様様様様様様様様様様様様様様様様様様様様様様様様様様様様様様様様様様様

; Segment type:	Pure code
		segment	seg000
		org 4000h
; appHeader
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4540h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		bit	4, (iy+34h)
		jp	nz, loc_40D7+2
		ld	hl, 410Eh
		rst	20h
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 42F1h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		jr	c, loc_4096
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4351h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_4096:				; CODE XREF: seg000:4091j
		ld	hl, 410Eh
		rst	20h
		ld	hl, 38h	; '8'
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4E6Ah
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		ld	hl, 421Ah
		in	a, (6)
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4FABh
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		ld	hl, 4199h
		ld	de, 0
		call	sub_4845
		ld	hl, 7
		ld	(96EEh), hl
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4972h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		ld	hl, 4915h
		ld	de, 966Eh
		ld	bc, 70h	; 'p'
		ldir
		ld	hl, 96DEh
		ld	de, 96DFh
		ld	(hl), 20h ; ' '
		ld	bc, 0Fh
		ldir
		ld	a, 9
		call	50h

loc_40D7:				; CODE XREF: seg000:4087j
		ld	hl, (2140h)
		ld	c, 41h ; 'A'
		rst	20h
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 42F1h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		jp	c, loc_40E6
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4351h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_40E6:				; CODE XREF: seg000:40E0j
		res	4, (iy+34h)
		ld	hl, 4118h
		ld	de, 0
		call	sub_4845
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4972h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		xor	a
		ld	(97A5h), a
		ld	hl, 966Eh
		ld	de, 966Fh
		ld	bc, 7Fh	; ''
		ld	(hl), 20h ; ' '
		ldir
		ld	a, 9
		call	50h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 402Ah
aRpnstack:	.ascii '\x15RpnStack',0
aYourCalculator:.ascii 'Your  calculator   is back in    algebraic mode         '
		.ascii '                                        '
aByXavierLaruea:.ascii 'By  Xavier LaRueAny key to cont.',0
aRpnIii1_10RpnM:.ascii '  RPN III 1.10      RPN  MODE    '
aRpnMenuXYLastX:.ascii ',] = RPN Menu  (] =  X <> Y   )] =  Last X   }] =  R'
		.ascii ' Down  By  Xavier LaRueAny key to cont.',0
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		add	a, e
		set	5, (iy+0Ah)
		res	6, (iy+0Ah)
		res	7, (iy+0Ah)
		set	4, (iy+5)
		ld	(98DDh), a
		ld	hl, (844Bh)
		push	af
		push	bc
		push	hl
		ld	a, b
		ld	(98DCh), a
		ld	a, 7
		ld	(97A5h), a
		ld	hl, 8478h
		ld	de, 98ACh
		ld	bc, 0Bh
		ldir
		ld	hl, 410Eh
		rst	20h
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 42F1h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		jp	c, loc_4322
		ld	a, b
		or	a
		jr	z, loc_4259
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4FD8h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_4259:				; CODE XREF: seg000:4254j
		inc	de
		inc	de
		ld	(98AAh), de
		ex	de, hl
		ld	de, 9872h
		ld	bc, 38h	; '8'
		ldir
		ld	hl, 989Eh
		bit	2, (hl)
		jp	nz, loc_432E
		bit	4, (iy+0Ch)
		jp	z, loc_427E
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 454Fh
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		res	4, (iy+0Ch)

loc_427E:				; CODE XREF: seg000:4274j
		ld	a, (98DCh)
		cp	40h ; '@'
		jr	nz, loc_42A4
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 492Dh
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		jp	nz, loc_42A4
		ld	ix, (98AAh)
		bit	4, (ix+2Ch)
		res	4, (ix+2Ch)
		set	4, (iy+0Ch)
		ld	hl, 9872h
		ld	de, 7
		call	sub_4852

loc_42A4:				; CODE XREF: seg000:4283j seg000:4288j
		ld	hl, 98ACh
		ld	de, 8478h
		ld	bc, 0Bh
		ldir
		pop	hl
		ld	a, 7
		sub	l
		ld	(844Bh), hl
		pop	bc
		pop	af
		cp	1
		jp	z, loc_42BF
		cp	a
		ret
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_42BF:				; CODE XREF: seg000:42BAj
		ld	a, b
		ld	(98DCh), a
		cp	0FEh ; ''
		jr	z, loc_42E7
		ld	hl, 445Dh

loc_42CA:				; CODE XREF: seg000:42EDj
		ld	e, a
		ld	d, 0
		add	hl, de
		ld	a, (hl)
		inc	a
		jr	z, loc_42EF
		dec	a
		jp	nz, loc_437B
		push	bc
		call	sub_47D8
		ld	hl, 9872h
		ld	bc, 38h	; '8'
		ldir
		pop	bc
		ld	a, 1
		cp	a
		ret
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_42E7:				; CODE XREF: seg000:42C5j
		ld	hl, 455Dh
		ld	a, (8446h)
		jr	loc_42CA
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_42EF:				; CODE XREF: seg000:42D0j
		ld	a, 1
		cp	0
		ret
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_42F4:				; CODE XREF: seg000:43F4j seg000:49BCj ...
		call	sub_480C
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 454Fh
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		ld	hl, 9872h
		ld	de, 7
		call	sub_485A
		ld	hl, 7
		ld	(844Bh), hl
		ld	hl, 989Eh
		set	4, (hl)
		call	sub_47D8
		ld	hl, 9872h
		ld	bc, 38h	; '8'
		ldir
		set	4, (iy+0Ch)
		ld	a, 1
		cp	0
		ret
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_4322:				; CODE XREF: seg000:424Fj seg000:4C13j
		pop	hl
		pop	hl
		pop	hl
		res	4, (iy+34h)
		xor	a
		ld	(97A5h), a
		ret
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_432E:				; CODE XREF: seg000:426Dj
		ld	a, 0
		ld	(97A5h), a
		ld	hl, 98ACh
		ld	de, 8478h
		ld	bc, 0Bh
		ldir
		pop	hl
		pop	bc
		ld	a, b
		cp	9
		jr	z, loc_4373
		pop	af
		jr	loc_4371
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_4348:				; CODE XREF: seg000:4374j
		ld	hl, 989Eh
		res	2, (hl)
		push	bc
		push	af
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 454Fh
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		call	sub_47D8
		ld	hl, 9872h
		ld	bc, 38h	; '8'
		ldir
		call	sub_480C
		ld	hl, 7
		ld	(844Bh), hl
		rst	28h
		ld	l, h
		ld	c, c
		call	sub_4771
		pop	af
		pop	bc
		cp	0
		ret
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_4371:				; CODE XREF: seg000:4346j
		cp	a
		ret
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_4373:				; CODE XREF: seg000:4343j
		pop	af
		jr	loc_4348

; 栩栩栩栩栩栩栩 S U B	R O U T	I N E 栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩


sub_4376:				; CODE XREF: seg000:4398p seg000:439Dp ...
		ld	a, (hl)
		inc	hl
		ld	h, (hl)
		ld	l, a
		ret
; End of function sub_4376

; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_437B:				; CODE XREF: seg000:42D3j
		dec	a
		ld	e, a
		ld	hl, 465Dh
		ld	d, 0
		add	hl, de
		add	hl, de
		add	hl, de
		ld	a, (hl)
		inc	a
		jp	z, loc_4397
		dec	a
		jp	z, loc_439C
		dec	a
		jp	z, loc_43B4
		dec	a
		jp	z, loc_43D2
		ret
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_4397:				; CODE XREF: seg000:4387j
		inc	hl
		call	sub_4376
		jp	(hl)
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_439C:				; CODE XREF: seg000:438Bj
		inc	hl
		call	sub_4376
		push	hl
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4930h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		jp	z, loc_43AA
		call	sub_46F3

loc_43AA:				; CODE XREF: seg000:43A4j
		pop	de
		call	sub_43F7
		call	sub_478F
		jp	loc_43EF
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_43B4:				; CODE XREF: seg000:438Fj
		inc	hl
		call	sub_4376
		push	hl
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4930h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		jp	z, loc_43C2
		call	sub_46F3

loc_43C2:				; CODE XREF: seg000:43BCj
		call	sub_47FA
		call	sub_47B1
		pop	de
		call	sub_43F7
		call	sub_478F
		jp	loc_43EF
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_43D2:				; CODE XREF: seg000:4393j
		inc	hl
		call	sub_4376
		push	hl
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4930h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		jr	z, loc_43DF
		call	sub_46F3

loc_43DF:				; CODE XREF: seg000:43DAj
		call	sub_47FA
		call	sub_47B6
		call	sub_47B1
		pop	de
		call	sub_43F7

loc_43EC:
		call	sub_478F

loc_43EF:				; CODE XREF: seg000:43B1j seg000:43CFj
		ld	hl, 989Eh
		res	0, (hl)
		jp	loc_42F4

; 栩栩栩栩栩栩栩 S U B	R O U T	I N E 栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩


sub_43F7:				; CODE XREF: seg000:43ABp seg000:43C9p ...
		ld	hl, 98D8h
		ld	(hl), 0EFh ; ''
		inc	hl
		ld	a, e
		ld	(hl), a
		inc	hl
		ld	a, d
		ld	(hl), a
		inc	hl
		ld	(hl), 0C9h ; ''
		ld	hl, 4412h
		call	59h
		call	98D8h
		call	5Ch
		ret
; End of function sub_43F7

; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		ld	hl, 442Ch
		ld	de, 4
		call	sub_4845
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4570h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_441E:				; CODE XREF: seg000:4422j
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4018h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		or	a
		jr	z, loc_441E
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 456Dh
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		ld	a, 1
		cp	0
		ret
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
aErrParsingPres:.ascii 'Err:     Parsing Press a key to     continue    ',0
		db 0FFh
		db    0
		db    0
		db    0
		db    0
		db    1
		db 0FFh
		db 0FFh
		db 0FFh
		db  1Fh
		db  20h
		db    0
		db 0FFh
		db 0FFh
		db    0
		db    0
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db  17h
		db    2
		db    3
		db    4
		db    5
		db    6
		db  2Eh	; .
		db  32h	; 2
		db  17h
		db  17h
		db  17h
		db  15h
		db  18h
		db  30h	; 0
		db  1Eh
		db  1Eh
		db  1Eh
		db  1Eh
		db  1Eh
		db  1Eh
		db  1Eh
		db  1Eh
		db  1Eh
		db  1Eh
		db  1Eh
		db  1Eh
		db 0FFh
		db  14h
		db  14h
		db  14h
		db  14h
		db  14h
		db  14h
		db  14h
		db  14h
		db  14h
		db  14h
		db  14h
		db  14h
		db  14h
		db  14h
		db  14h
		db  14h
		db  14h
		db  14h
		db  14h
		db  14h
		db  14h
		db  14h
		db  14h
		db  14h
		db  14h
		db 0FFh
		db 0FFh
		db  14h
		db  0Dh
		db    7
		db  0Ah
		db    8
		db  0Bh
		db    9
		db  0Ch
		db  0Eh
		db  0Fh
		db  12h
		db  13h
		db  10h
		db  11h
		db  19h
		db 0FFh
		db 0FFh
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  14h
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db  17h
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db  28h	; (
		db  29h	; )
		db  2Ah	; *
		db  2Bh	; +
		db  2Ch	; ,
		db  2Dh	; -
		db 0FFh
		db  2Fh	; /
		db 0FFh
		db 0FFh
		db 0FFh
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db 0FFh
		db 0FFh
		db 0FFh
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  21h	; !
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  1Dh
		db  1Bh
		db  1Ch
		db  1Ah
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db  22h	; "
		db  23h	; #
		db  24h	; $
		db  16h
		db  17h
		db  17h
		db  27h	; '
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db  17h
		db  17h
		db  17h
		db  17h
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db  17h
		db  17h
		db  17h
		db  25h	; %
		db  26h	; &
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db 0FFh
		db 0FFh
		db  17h
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db 0FFh
		db 0FFh
		db  14h
		db  17h
		db  17h
		db  17h
		db  17h
		db 0FFh
		db 0FFh
		db 0FFh
		db 0FFh
		db  17h
		db  17h
		db  17h
		db 0FFh
		db 0FFh
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db  17h
		db 0FFh
		db 0FFh
		db 0FFh
		dw 4996h
		db    2
		dw 4072h
		db    2
		dw 406Fh
		db    2
		dw 4084h
		db    2
		dw 4099h
		db    2
		dw 47A1h
		db    1
		dw 40BDh
		db    1
		dw 40C0h
		db    1
		dw 40C3h
		db    1
		dw 40E4h
		db    1
		dw 40DEh
		db    1
		dw 40E1h
		db    1
		dw 4096h
		db    1
		dw 4081h
		db    1
		dw 409Ch
		db    1
		dw 40AEh
		db    1
		dw 40B7h
		db    1
		dw 40ABh
		db    1
		dw 40B4h
		db 0FFh
		dw 49BFh
		db 0FFh
		dw 49D3h
		db    0
		dw 4B79h
		db 0FFh
		dw 4A86h
		db 0FFh
		dw 4B29h
		db 0FFh
		dw 4C92h
		db 0FFh
		dw 4CB2h
		db    1
		dw 407Bh
		db 0FFh
		dw 4DC1h
		db    2
		dw 479Eh
		db 0FFh
		dw 4CBAh
		db 0FFh
		dw 4D37h
		db 0FFh
		dw 4D87h
		db    1
		dw 410Eh
		db    1
		dw 4060h
		db 1
		dw 4093h
		db    1
		dw 40A5h
		db    2
		dw 4054h
		db    2
		dw 4057h
		db    1
		dw 4B85h
		db    1
		dw 40CFh
		db    1
		dw 40CCh
		db    1
		dw 40C9h
		db    1
		dw 40EDh
		db    1
		dw 40F0h
		db    1
		dw 40EAh
		db 0FFh
		dw 4C74h
		db 0FFh
		dw 4C83h
		db 0FFh
		dw 4DDCh
		db 0FFh
		dw 4F04h
		db 0FFh
		dw 4B12h

; 栩栩栩栩栩栩栩 S U B	R O U T	I N E 栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩


sub_46F3:				; CODE XREF: seg000:43A7p seg000:43BFp ...
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 496Ch
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		ld	hl, 478Ch
		rst	20h
		ld	hl, 4725h
		call	59h
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4A9Bh
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4A50h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		call	5Ch
		ld	hl, 989Eh
		bit	0, (hl)
		jr	nz, loc_4716
		call	sub_478F

loc_4713:				; CODE XREF: sub_46F3+30j seg000:473Dj
		jp	sub_4771
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_4716:				; CODE XREF: sub_46F3+1Bj
		res	0, (hl)
		ld	hl, 8478h
		ld	de, 9872h
		ld	bc, 0Bh
		ldir
		jr	loc_4713
; End of function sub_46F3

; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4A50h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		ld	hl, 4740h
		ld	de, 4
		call	sub_4845
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4570h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_4734:				; CODE XREF: seg000:4738j
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4018h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		or	a
		jr	z, loc_4734
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 456Dh
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		jp	loc_4713
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
aErrInvalidNumP:.ascii 'Err:Invalid Num  Press any key    to Continue   ',0

; 栩栩栩栩栩栩栩 S U B	R O U T	I N E 栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩


sub_4771:				; CODE XREF: seg000:4369p
					; sub_46F3:loc_4713j
		ld	hl, 478Ch
		rst	20h
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 42F1h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4351h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		ld	hl, 0
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4339h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		ld	hl, 478Ch
		rst	20h
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 42F1h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4969h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		ret
; End of function sub_4771

; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		.ascii '\x05!',0

; 栩栩栩栩栩栩栩 S U B	R O U T	I N E 栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩


sub_478F:				; CODE XREF: seg000:43AEp seg000:43CCp ...
		ld	hl, 9872h
		ld	de, 98B7h
		ld	bc, 21h	; '!'
		ldir
		ld	hl, 98B7h
		ld	de, 987Dh
		ld	bc, 21h	; '!'
		ldir
		ld	hl, 8478h
		ld	de, 9872h
		ld	bc, 0Bh
		ldir
		ret
; End of function sub_478F


; 栩栩栩栩栩栩栩 S U B	R O U T	I N E 栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩


sub_47B1:				; CODE XREF: seg000:43C5p seg000:43E5p ...
		ld	de, 8478h
		jr	loc_47B9
; End of function sub_47B1


; 栩栩栩栩栩栩栩 S U B	R O U T	I N E 栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩


sub_47B6:				; CODE XREF: seg000:43E2p seg000:4B80p
		ld	de, 8483h

loc_47B9:				; CODE XREF: sub_47B1+3j
		ld	hl, 9872h
		ld	bc, 0Bh
		ldir
		ld	hl, 987Dh
		ld	de, 98B7h
		ld	bc, 21h	; '!'
		ldir
		ld	hl, 98B7h
		ld	de, 9872h
		ld	bc, 21h	; '!'
		ldir
		ret
; End of function sub_47B6


; 栩栩栩栩栩栩栩 S U B	R O U T	I N E 栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩


sub_47D8:				; CODE XREF: seg000:42D7p seg000:430Ep ...
		ld	hl, 8478h
		ld	de, 98ACh
		ld	bc, 0Bh
		ldir
		ld	hl, 410Eh
		rst	20h
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 42F1h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		inc	de
		inc	de
		push	de
		ld	hl, 98ACh
		ld	de, 8478h
		ld	bc, 0Bh
		ldir
		pop	de
		ret
; End of function sub_47D8


; 栩栩栩栩栩栩栩 S U B	R O U T	I N E 栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩


sub_47FA:				; CODE XREF: seg000:loc_43C2p
					; seg000:loc_43DFp
		push	hl
		push	de
		push	bc
		ld	hl, 9872h
		ld	de, 989Fh
		ld	bc, 0Bh
		ldir
		pop	bc
		pop	de
		pop	hl
		ret
; End of function sub_47FA


; 栩栩栩栩栩栩栩 S U B	R O U T	I N E 栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩


sub_480C:				; CODE XREF: seg000:loc_42F4p
					; seg000:435Dp	...
		ld	hl, 989Eh
		bit	5, (hl)
		jp	nz, sub_488F
		ld	hl, 0
		ld	(844Bh), hl
		ld	hl, 4915h
		call	sub_4849
		ld	hl, 9893h
		ld	de, 200h
		call	sub_4852
		ld	hl, 9888h
		ld	de, 201h
		call	sub_4852
		ld	hl, 987Dh
		ld	de, 202h
		call	sub_4852
		ld	hl, 9872h
		ld	de, 203h
		call	sub_4852
		ret
; End of function sub_480C


; 栩栩栩栩栩栩栩 S U B	R O U T	I N E 栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩


sub_4845:				; CODE XREF: seg000:40AEp seg000:40F0p ...
		ld	(844Bh), de
; End of function sub_4845


; 栩栩栩栩栩栩栩 S U B	R O U T	I N E 栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩


sub_4849:				; CODE XREF: sub_480C+11p sub_4849+7j	...
		ld	a, (hl)
		inc	hl
		or	a
		ret	z
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4504h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		jr	sub_4849
; End of function sub_4849


; 栩栩栩栩栩栩栩 S U B	R O U T	I N E 栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩


sub_4852:				; CODE XREF: seg000:42A1p sub_480C+1Ap ...
		push	hl
		ld	hl, 989Eh
		bit	5, (hl)
		pop	hl
		ret	nz
; End of function sub_4852


; 栩栩栩栩栩栩栩 S U B	R O U T	I N E 栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩


sub_485A:				; CODE XREF: seg000:4300p
		push	de
		ld	de, 8478h
		ld	bc, 0Bh
		ldir
		pop	de
		ld	hl, 989Eh
		bit	3, (hl)
		jp	nz, loc_4884
		res	2, (iy+0Bh)
		res	3, (iy+0Bh)

loc_4874:				; CODE XREF: sub_485A+32j
		ld	(844Bh), de
		ld	a, 0Eh
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 50AAh
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		ld	hl, 848Eh
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 450Ah
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		ret
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_4884:				; CODE XREF: sub_485A+Fj
		set	2, (iy+0Bh)
		set	3, (iy+0Bh)
		jp	loc_4874
; End of function sub_485A


; 栩栩栩栩栩栩栩 S U B	R O U T	I N E 栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩


sub_488F:				; CODE XREF: sub_480C+5j
					; sub_4D87:loc_4DB9p
		ld	hl, (844Bh)
		push	hl
		ld	hl, 0
		ld	(844Bh), hl
		ld	hl, 48A4h
		call	sub_4849
		pop	hl
		ld	(844Bh), hl
		ret
; End of function sub_488F

; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		.ascii '                                                        '
		.ascii '                                         -- RpN  III -- '
		.ascii 0
aTZYX:		.ascii 'T=              Z=              Y=              X=      '
		.ascii '                                         -- Rpn Mode -- '
		.ascii 0
		.ascii '                '
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 492Dh
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		jr	z, loc_49A1
		ld	hl, 989Eh
		call	sub_46F3

loc_49A1:				; CODE XREF: seg000:4999j
		ld	hl, 9872h
		ld	de, 98B7h
		ld	bc, 21h	; '!'
		ldir
		ld	hl, 98B7h
		ld	de, 987Dh
		ld	bc, 21h	; '!'
		ldir
		ld	hl, 989Eh
		set	0, (hl)
		jp	loc_42F4
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 492Dh
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		jr	z, loc_49C7
		call	sub_46F3

loc_49C7:				; CODE XREF: seg000:49C2j
		ld	a, (98DCh)
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 494Eh
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		call	sub_46F3
		jp	loc_42F4
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 492Dh
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		jr	z, loc_49DB
		call	sub_46F3

loc_49DB:				; CODE XREF: seg000:49D6j
		set	4, (iy+12h)
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 496Ch
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		ld	hl, 4A7Eh
		ld	de, 5
		call	sub_4845
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4570h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 45C4h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4972h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		push	af
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 45BEh
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 456Dh
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		ld	hl, 9872h
		ld	de, 8478h
		ld	bc, 0Bh
		ldir
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 43BAh
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 41C5h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		pop	af
		cp	0B4h ; ''
		call	z, sub_4A4A
		sub	59h ; 'Y'
		cp	73h ; 's'
		call	z, sub_4A47
		cp	41h ; 'A'
		jp	m, loc_4A2F
		cp	5Bh ; '['
		jp	p, loc_4A2F
		ld	(8479h), a
		rst	28h

loc_4A27:				; CODE XREF: seg000:4A44j
		call	nc, 0CD4Ah
		ld	(hl), c
		ld	b, a
		jp	loc_42F4
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_4A2F:				; CODE XREF: seg000:4A1Bj seg000:4A20j
		ld	hl, 4A4Dh
		ld	de, 4
		call	sub_4845
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4570h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_4A3B:				; CODE XREF: seg000:4A3Fj
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4018h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		or	a
		jr	z, loc_4A3B
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 456Dh
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		jp	loc_4A27+2

; 栩栩栩栩栩栩栩 S U B	R O U T	I N E 栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩


sub_4A47:				; CODE XREF: seg000:4A16p
		ld	a, 5Bh ; '['
		ret
; End of function sub_4A47


; 栩栩栩栩栩栩栩 S U B	R O U T	I N E 栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩


sub_4A4A:				; CODE XREF: seg000:4A0Fp
		ld	a, 0B1h	; ''
		ret
; End of function sub_4A4A

; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
aErrNotVariable:.ascii 'Err:Not Variable Press a key to    continue     ',0
aStoTo:		.ascii 'Sto to:',0
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		push	bc
		ld	hl, 4AD1h
		ld	de, 0
		call	sub_4845
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4555h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 492Dh
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		jp	z, loc_4ABC
		ld	hl, 96F4h
		call	sub_4376
		ex	de, hl
		ld	hl, 96F8h
		call	sub_4376
		push	hl
		ld	hl, 96F6h
		call	sub_4376
		push	hl
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 49D5h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 495Dh
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		pop	hl
		ld	(96F6h), hl
		pop	hl
		ld	(96F8h), hl

loc_4ABC:				; CODE XREF: seg000:4A96j
		ld	hl, 989Eh
		set	2, (hl)
		call	sub_47D8
		ld	hl, 9872h
		ld	bc, 38h	; '8'
		ldir
		pop	bc
		ld	a, 1
		cp	a
		ret
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
aTempAlg_ModeCl:.ascii '-Temp Alg. Mode-Clear] => Back   in RPN  Mode  --------'
		.ascii '--------',0
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 492Dh
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		call	nz, sub_46F3
		ld	hl, 989Fh
		ld	de, 8478h
		ld	bc, 0Bh
		ldir
		call	sub_478F
		jp	loc_42F4
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4570h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 492Dh
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		call	nz, sub_46F3
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4570h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		res	1, (iy+0Dh)
		ld	hl, (844Bh)
		push	hl
		ld	hl, 4C16h
		call	sub_4F0C
		pop	hl
		ld	(844Bh), hl
		set	1, (iy+0Dh)
		or	a
		jp	z, loc_42F4
		dec	a
		jp	z, loc_4B58
		dec	a
		jp	z, loc_4C00
		ret
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_4B58:				; CODE XREF: seg000:4B50j
		ld	a, d
		dec	a
		jr	z, loc_4B6D
		dec	a
		jr	z, loc_4B8F
		dec	a
		jr	z, loc_4BB3
		dec	a
		jr	z, loc_4B7D
		dec	a
		jr	z, loc_4BD7
		dec	a
		jp	z, loc_4BEC
		ret
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_4B6D:				; CODE XREF: seg000:4B5Aj
		ld	hl, 9872h
		ld	de, 9873h
		ld	bc, 2Bh	; '+'
		ld	(hl), 0
		ldir
		jp	loc_42F4
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_4B7D:				; CODE XREF: seg000:4B63j seg000:4C80j
		call	sub_47B1
		call	sub_47B6
		call	sub_478F
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 421Fh
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		call	sub_478F
		jp	loc_42F4
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_4B8F:				; CODE XREF: seg000:4B5Dj
		ld	hl, 9872h
		ld	de, 98B7h
		ld	bc, 21h	; '!'
		ldir
		ld	hl, 9893h
		ld	de, 9872h
		ld	bc, 0Bh
		ldir
		ld	hl, 98B7h
		ld	de, 987Dh
		ld	bc, 21h	; '!'
		ldir
		jp	loc_42F4
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_4BB3:				; CODE XREF: seg000:4B60j seg000:4C8Fj
		ld	hl, 987Dh
		ld	de, 98B7h
		ld	bc, 21h	; '!'
		ldir
		ld	hl, 9872h
		ld	de, 9893h
		ld	bc, 0Bh
		ldir
		ld	hl, 98B7h
		ld	de, 9872h
		ld	bc, 21h	; '!'
		ldir
		jp	loc_42F4
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_4BD7:				; CODE XREF: seg000:4B66j
		ld	hl, 9872h
		ld	de, 9873h
		ld	bc, 0Ah
		ld	(hl), 0
		ldir
		ld	hl, 989Eh
		set	0, (hl)
		jp	loc_42F4
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_4BEC:				; CODE XREF: seg000:4B69j seg000:4C02j
		ld	hl, 989Eh
		bit	5, (hl)
		jr	nz, loc_4BF8
		set	5, (hl)
		jp	loc_42F4
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_4BF8:				; CODE XREF: seg000:4BF1j
		res	5, (hl)
		call	sub_480C
		jp	loc_42F4
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_4C00:				; CODE XREF: seg000:4B54j
		ld	a, d
		dec	a
		jp	z, loc_4BEC
		dec	a
		ret	nz
		push	hl
		push	hl
		push	hl
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4546h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		ld	hl, 0
		ld	(844Bh), hl
		jp	loc_4322
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
aLxlstack:	.ascii '\x02(LXLStack',0
aOption:	.ascii 'Option',0
		db    5
aClearStack:	.ascii 'Clear Stack',0
aRotateUp:	.ascii 'Rotate Up',0
aRotateDown:	.ascii 'Rotate Down',0
aXY:		.ascii 'X<>Y',0
aClearX:	.ascii 'Clear X',0
aToggleStack:	.ascii '\x02Toggle Stack',0
aExitRpnMode:	.ascii 'Exit Rpn Mode',0
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4570h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 492Dh
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		call	nz, sub_46F3
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4570h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		jp	loc_4B7D
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4570h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 492Dh
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		call	nz, sub_46F3
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4570h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		jp	loc_4BB3
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		ld	hl, 989Eh
		set	3, (hl)

loc_4C97:				; CODE XREF: seg000:4CB7j
		ld	hl, (844Bh)
		push	hl
		call	sub_480C
		pop	hl
		ld	(844Bh), hl
		call	sub_47D8
		ld	hl, 9872h
		ld	bc, 38h	; '8'
		ldir
		ld	a, 1
		cp	0
		ret
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		ld	hl, 989Eh
		res	3, (hl)
		jp	loc_4C97
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_4CBA:				; CODE XREF: seg000:4F09j
		ld	a, (98DCh)
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 494Eh
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		ld	hl, 989Eh
		bit	5, (hl)
		jr	z, loc_4CCC
		ld	a, 1
		cp	0
		ret
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
; START	OF FUNCTION CHUNK FOR sub_4D87

loc_4CCC:				; CODE XREF: seg000:4CC5j sub_4D87+2Fj
		ld	hl, (844Bh)
		push	hl
		ld	hl, 989Eh
		bit	0, (hl)
		jp	nz, loc_4D31
		ld	hl, 0
		ld	(844Bh), hl
		ld	hl, 4915h
		call	sub_4849
		ld	hl, 9888h
		ld	de, 200h
		call	sub_4852
		ld	hl, 987Dh
		ld	de, 201h
		call	sub_4852
		ld	hl, 9872h
		ld	de, 202h
		call	sub_4852

loc_4CFF:				; CODE XREF: sub_4D87-53j
		ld	hl, 203h
		ld	(844Bh), hl
		ld	hl, 96F4h
		call	sub_4376
		ex	de, hl
		ld	hl, 96F8h
		call	sub_4376
		push	hl
		ld	hl, 96F6h
		call	sub_4376
		push	hl
		rst	28h
; END OF FUNCTION CHUNK	FOR sub_4D87
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 49D5h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 495Dh
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		pop	hl
		ld	(96F6h), hl
		pop	hl
		ld	(96F8h), hl
		pop	hl
		ld	(844Bh), hl
		ld	a, 1
		cp	0
		ret
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
; START	OF FUNCTION CHUNK FOR sub_4D87

loc_4D31:				; CODE XREF: sub_4D87-B2j
		call	sub_480C
		jp	loc_4CFF
; END OF FUNCTION CHUNK	FOR sub_4D87
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4903h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		jp	z, loc_4D7D
		ld	a, (844Ch)
		or	a
		jr	z, loc_4D82
		dec	a

loc_4D44:				; CODE XREF: seg000:4D84j
		ld	(844Ch), a
		call	sub_4D87
		ld	hl, (844Bh)
		push	hl
		ld	hl, 7
		ld	(844Bh), hl
		ld	hl, (96F4h)
		ld	de, (96F6h)

loc_4D5B:				; CODE XREF: seg000:4D6Aj
		push	hl
		ld	bc, 10h
		add	hl, bc
		push	hl
		or	a
		sbc	hl, de
		ld	a, l
		ld	(98DEh), a
		pop	hl
		pop	bc
		jr	c, loc_4D5B
		jr	z, loc_4D76
		ld	d, b
		ld	e, c
		ld	hl, (96F6h)
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 49D5h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_4D76:				; CODE XREF: seg000:4D6Cj
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4957h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		pop	hl
		ld	(844Bh), hl

loc_4D7D:				; CODE XREF: seg000:4D3Aj
		ld	a, 1
		cp	0
		ret
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_4D82:				; CODE XREF: seg000:4D41j
		ld	a, 0Fh
		jp	loc_4D44

; 栩栩栩栩栩栩栩 S U B	R O U T	I N E 栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩


sub_4D87:				; CODE XREF: seg000:4D47p

; FUNCTION CHUNK AT 4CCC SIZE 0000004F BYTES
; FUNCTION CHUNK AT 4D31 SIZE 00000006 BYTES

		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4912h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		ld	hl, 96F8h
		call	sub_4376
		push	hl
		ld	hl, 96F6h
		call	sub_4376
		push	hl
		ld	hl, (844Bh)
		push	hl
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 495Dh
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4552h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		pop	hl
		ld	(844Bh), hl
		pop	hl
		ld	(96F6h), hl
		pop	hl
		ld	(96F8h), hl
		ld	hl, 989Eh
		bit	5, (hl)
		jp	nz, loc_4DB9
		jp	loc_4CCC
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_4DB9:				; CODE XREF: sub_4D87+2Cj
		call	sub_488F
		ld	a, 0
		cp	0FFh
		ret
; End of function sub_4D87

; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 492Dh
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		call	nz, sub_46F3
		ld	hl, 3
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4792h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		call	sub_47B1
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 421Fh
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 479Eh
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		call	sub_478F
		jp	loc_42F4
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 492Dh
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		jp	nz, loc_4DF3
		call	sub_47B1
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 408Dh
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		call	sub_478F
		ld	hl, 989Eh
		res	0, (hl)
		jp	loc_42F4
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_4DF3:				; CODE XREF: seg000:4DDFj
		ld	a, 0
		ld	(98DEh), a

loc_4DF8:				; CODE XREF: seg000:4E6Aj
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4930h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		jr	z, loc_4E09
		ld	a, (hl)
		cp	3Bh ; ';'
		jr	nz, loc_4E63
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4906h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		ld	hl, 98DEh
		dec	(hl)

loc_4E09:				; CODE XREF: seg000:4DFBj
		ld	hl, (96F6h)
		ld	a, (hl)
		cp	0B0h ; ''
		jr	nz, loc_4E4C
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4912h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		ld	hl, 98DEh
		dec	(hl)
		ld	a, (844Ch)
		dec	a
		cp	0FFh
		jr	nz, loc_4E2D
		ld	a, (98DEh)
		cp	0FFh
		jr	nz, loc_4E2B
		ld	a, 0
		jr	loc_4E2D
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_4E2B:				; CODE XREF: seg000:4E25j
		ld	a, 0Fh

loc_4E2D:				; CODE XREF: seg000:4E1Ej seg000:4E29j
		ld	(844Ch), a

loc_4E30:				; CODE XREF: seg000:4E60j
		ld	a, (98DEh)
		cp	0FFh
		jr	z, loc_4E46
		or	a
		jp	z, loc_4E6D
		ld	b, a

loc_4E3C:				; CODE XREF: seg000:4E41j
		push	bc
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4906h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		pop	bc
		djnz	loc_4E3C

loc_4E43:
		jp	loc_4E6D
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_4E46:				; CODE XREF: seg000:4E35j
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4903h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		jp	loc_4E6D
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_4E4C:				; CODE XREF: seg000:4E0Fj
		ld	a, (844Ch)
		inc	a
		cp	10h
		jp	c, loc_4E57
		ld	a, 0

loc_4E57:				; CODE XREF: seg000:4E52j
		ld	(844Ch), a
		ld	de, 0B0h ; ''
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4909h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		jp	loc_4E30
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_4E63:				; CODE XREF: seg000:4E00j
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4903h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		ld	hl, 98DEh
		inc	(hl)
		jp	loc_4DF8
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_4E6D:				; CODE XREF: seg000:4E38j
					; seg000:loc_4E43j ...
		ld	hl, 989Eh
		bit	5, (hl)
		jp	nz, loc_4EA9
		ld	hl, (844Bh)
		push	hl
		ld	hl, 203h
		ld	(844Bh), hl
		ld	hl, 96F4h
		call	sub_4376
		ex	de, hl
		ld	hl, 96F8h
		call	sub_4376
		push	hl
		ld	hl, 96F6h
		call	sub_4376
		push	hl
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 49D5h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 495Dh
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		pop	hl
		ld	(96F6h), hl
		pop	hl
		ld	(96F8h), hl
		pop	hl
		ld	(844Bh), hl
		jp	loc_4ECC
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_4EA9:				; CODE XREF: seg000:4E72j
		ld	hl, 96F4h
		call	sub_4376
		ex	de, hl
		ld	hl, 96F8h
		call	sub_4376
		push	hl
		ld	hl, 96F6h
		call	sub_4376
		push	hl

loc_4EBE:				; CODE XREF: seg000:4EC1j
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4906h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		jp	nz, loc_4EBE
		pop	hl
		ld	(96F6h), hl
		pop	hl
		ld	(96F8h), hl

loc_4ECC:				; CODE XREF: seg000:4EA6j
		ld	hl, (844Bh)
		push	hl
		ld	hl, 7
		ld	(844Bh), hl
		ld	hl, (96F4h)
		ld	de, (96F6h)

loc_4EDD:				; CODE XREF: seg000:4EECj
		push	hl
		ld	bc, 10h
		add	hl, bc
		push	hl
		or	a
		sbc	hl, de
		ld	a, l
		ld	(98DEh), a
		pop	hl
		pop	bc
		jr	c, loc_4EDD
		jr	z, loc_4EF8
		ld	d, b
		ld	e, c
		ld	hl, (96F6h)
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 49D5h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_4EF8:				; CODE XREF: seg000:4EEEj
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4957h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		pop	hl
		ld	(844Bh), hl
		ld	a, 1
		cp	0
		ret
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		ld	a, 98h ; ''
		ld	(98DCh), a
		jp	loc_4CBA

; 栩栩栩栩栩栩栩 S U B	R O U T	I N E 栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩


sub_4F0C:				; CODE XREF: seg000:4B40p
		ld	b, (hl)

loc_4F0D:				; CODE XREF: sub_4F0C+BCj
		ld	c, 1
		ld	d, c
		ld	e, 0

loc_4F12:				; CODE XREF: sub_4F0C+66j sub_4F0C+6Aj ...
		dec	e
		inc	e
		jr	nz, loc_4F1F
		push	hl
		push	bc
		push	de
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4540h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		pop	de
		pop	bc
		pop	hl

loc_4F1F:				; CODE XREF: sub_4F0C+8j
		call	sub_505F
		call	sub_4FE1

loc_4F25:				; CODE XREF: sub_4F0C+57j sub_4F0C+8Dj ...
		push	hl
		push	bc
		push	de
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4972h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		pop	de
		pop	bc
		pop	hl
		cp	1
		jr	z, loc_4F78
		cp	2
		jr	z, loc_4F6A
		cp	3
		jr	z, loc_4F85
		cp	4
		jr	z, loc_4FAA
		cp	5
		jr	z, loc_4F66
		cp	8Eh ; ''
		jr	z, loc_4F5B
		sub	8Fh ; ''
		cp	0Ah
		jr	c, loc_4F5D
		sub	0Bh
		cp	1Bh
		jr	c, loc_4F57
		ld	a, 0
		ld	d, 0
		ret
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_4F57:				; CODE XREF: sub_4F0C+44j
		add	a, 0Ah
		jr	loc_4F5D
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_4F5B:				; CODE XREF: sub_4F0C+38j
		ld	a, 9

loc_4F5D:				; CODE XREF: sub_4F0C+3Ej sub_4F0C+4Dj
		inc	a
		ld	e, a
		call	sub_4FDA
		cp	e
		jr	c, loc_4F25
		ld	d, e

loc_4F66:				; CODE XREF: sub_4F0C+34j
		ld	a, (hl)
		inc	a
		sub	b
		ret
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_4F6A:				; CODE XREF: sub_4F0C+28j
		ld	c, 1
		ld	d, c
		ld	e, 0
		ld	a, b
		inc	b
		cp	(hl)
		jr	nz, loc_4F12
		ld	b, 1
		jr	loc_4F12
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_4F78:				; CODE XREF: sub_4F0C+24j
		ld	c, 1
		ld	d, c
		ld	e, 0
		dec	b
		ld	a, b
		or	a
		jr	nz, loc_4F12
		ld	b, (hl)
		jr	loc_4F12
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_4F85:				; CODE XREF: sub_4F0C+2Cj
		ld	a, d
		dec	d
		jr	z, loc_4F91
		cp	c
		jr	nz, loc_4F12
		ld	e, 0
		dec	c
		jr	loc_4F12
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_4F91:				; CODE XREF: sub_4F0C+7Bj
		ld	e, 0
		inc	d
		ld	a, (8442h)
		cp	31h ; '1'
		jr	c, loc_4F25
		call	sub_4FDA
		ld	d, a
		sub	6
		ld	c, a
		jp	nc, loc_4F12
		ld	c, 1
		jp	loc_4F12
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_4FAA:				; CODE XREF: sub_4F0C+30j
		call	sub_4FDA
		cp	d
		jr	z, loc_4FBE
		ld	a, d
		inc	d
		sub	c
		cp	6
		jp	nz, loc_4F12
		ld	e, 0
		inc	c
		jp	loc_4F12
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_4FBE:				; CODE XREF: sub_4F0C+A2j
		ld	e, 0
		ld	a, (8442h)
		cp	31h ; '1'
		jp	c, loc_4F25
		jp	loc_4F0D
; End of function sub_4F0C


; 栩栩栩栩栩栩栩 S U B	R O U T	I N E 栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩


sub_4FCB:				; CODE XREF: sub_4FDA+1p sub_4FE1+4p
		push	de
		ld	a, (hl)
		sub	b
		ld	e, a
		sla	e
		ld	d, 0
		inc	hl
		add	hl, de
		call	sub_4376
		pop	de
		ret
; End of function sub_4FCB


; 栩栩栩栩栩栩栩 S U B	R O U T	I N E 栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩


sub_4FDA:				; CODE XREF: sub_4F0C+53p sub_4F0C+8Fp ...
		push	hl
		call	sub_4FCB
		ld	a, (hl)
		pop	hl
		ret
; End of function sub_4FDA


; 栩栩栩栩栩栩栩 S U B	R O U T	I N E 栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩


sub_4FE1:				; CODE XREF: sub_4F0C+16p
		push	hl
		push	bc
		push	de
		push	de
		call	sub_4FCB
		ld	e, (hl)
		inc	hl
		call	sub_5043
		ld	b, 1

loc_4FEF:				; CODE XREF: sub_4FE1+59j
		ld	a, b
		ld	(844Bh), a
		xor	a
		ld	(844Ch), a
		ld	a, c
		cp	d
		jr	nz, loc_4FFF
		set	3, (iy+5)

loc_4FFF:				; CODE XREF: sub_4FE1+18j
		call	sub_504F
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4504h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		ld	a, b
		cp	1
		jr	nz, loc_5014
		cp	c
		jr	z, loc_5014
		ld	a, 1Eh
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4504h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		jr	loc_5028
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_5014:				; CODE XREF: sub_4FE1+27j sub_4FE1+2Aj
		cp	7
		jr	nz, loc_5023
		ld	a, c
		cp	e
		jr	z, loc_5023
		ld	a, 1Fh
		rst	28h
		inc	b
		ld	b, l
		jr	loc_5028
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_5023:				; CODE XREF: sub_4FE1+35j sub_4FE1+39j
		ld	a, 3Ah ; ':'
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4504h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_5028:				; CODE XREF: sub_4FE1+31j sub_4FE1+40j
		pop	af
		push	af
		res	3, (iy+5)
		call	nc, sub_4849
		ld	a, c
		cp	e
		jr	z, loc_503C
		inc	b
		inc	c
		ld	a, b
		cp	8
		jr	nz, loc_4FEF

loc_503C:				; CODE XREF: sub_4FE1+52j
		pop	de
		pop	de
		ld	e, 1
		pop	bc
		pop	hl
		ret
; End of function sub_4FE1


; 栩栩栩栩栩栩栩 S U B	R O U T	I N E 栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩


sub_5043:				; CODE XREF: sub_4FE1+9p
		ld	b, c
		dec	b
		ret	z
		xor	a

loc_5047:				; CODE XREF: sub_5043+9j
		push	bc
		ld	b, h
		cpir
		pop	bc
		djnz	loc_5047
		ret
; End of function sub_5043


; 栩栩栩栩栩栩栩 S U B	R O U T	I N E 栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩


sub_504F:				; CODE XREF: sub_4FE1:loc_4FFFp
		ld	a, c
		cp	0Ah
		jr	z, loc_5059
		jr	nc, loc_505C
		add	a, 30h ; '0'
		ret
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_5059:				; CODE XREF: sub_504F+3j
		ld	a, 30h ; '0'
		ret
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳

loc_505C:				; CODE XREF: sub_504F+5j
		add	a, 36h ; '6'
		ret
; End of function sub_504F


; 栩栩栩栩栩栩栩 S U B	R O U T	I N E 栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩


sub_505F:				; CODE XREF: sub_4F0C:loc_4F1Fp
		push	hl
		push	bc
		push	de
		ld	a, b
		ld	b, (hl)
		ld	e, b
		sla	e
		ld	d, 0
		add	hl, de
		inc	hl
		ld	de, 0
		ld	(844Bh), de

loc_5072:				; CODE XREF: sub_505F+1Dj
		cp	b
		jr	nz, loc_5079
		set	3, (iy+5)

loc_5079:				; CODE XREF: sub_505F+14j
		call	sub_5082
		djnz	loc_5072
		pop	de
		pop	bc
		pop	hl
		ret
; End of function sub_505F


; 栩栩栩栩栩栩栩 S U B	R O U T	I N E 栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩栩


sub_5082:				; CODE XREF: sub_505F:loc_5079p
		push	af
		call	sub_4849
		res	3, (iy+5)
		ld	a, 20h ; ' '
		rst	28h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		dw 4504h
; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
		pop	af
		ret
; End of function sub_5082

; 陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳陳
; validationData
; unusedflashBytes

