writeiic.asm

6502写24c

	lda	#<(2)
	ldy	#2
	sta	(sp),y
	lda	#>(2)
	ldy	#2+1
	sta	(sp),y
	;CALLV_CC(_gotoxy,4)
	lda	#0
	ldy	#4
	jsr	_gotoxy
#codeline 248	"C:\WinIDE\writeiic\writeiic.C"
	;ARGW_CI(L37,(sp),0)
	lda	#<(L37)
	ldy	#0
	sta	(sp),y
	lda	#>(L37)
	ldy	#0+1
	sta	(sp),y
	;CALLV_CC(_printf,2)
	lda	#0
	ldy	#2
	jsr	_printf
#codeline 249	"C:\WinIDE\writeiic\writeiic.C"
	;ARGW_CI(2,(sp),0)
	lda	#<(2)
	ldy	#0
	sta	(sp),y
	lda	#>(2)
	ldy	#0+1
	sta	(sp),y
	;ARGW_CI(3,(sp),2)
	lda	#<(3)
	ldy	#2
	sta	(sp),y
	lda	#>(3)
	ldy	#2+1
	sta	(sp),y
	;CALLV_CC(_gotoxy,4)
	lda	#0
	ldy	#4
	jsr	_gotoxy
#codeline 250	"C:\WinIDE\writeiic\writeiic.C"
	;ARGW_CI(L38,(sp),0)
	lda	#<(L38)
	ldy	#0
	sta	(sp),y
	lda	#>(L38)
	ldy	#0+1
	sta	(sp),y
	;CALLV_CC(_printf,2)
	lda	#0
	ldy	#2
	jsr	_printf
#codeline 251	"C:\WinIDE\writeiic\writeiic.C"
	;ARGW_CI(2,(sp),0)
	lda	#<(2)
	ldy	#0
	sta	(sp),y
	lda	#>(2)
	ldy	#0+1
	sta	(sp),y
	;ARGW_CI(4,(sp),2)
	lda	#<(4)
	ldy	#2
	sta	(sp),y
	lda	#>(4)
	ldy	#2+1
	sta	(sp),y
	;CALLV_CC(_gotoxy,4)
	lda	#0
	ldy	#4
	jsr	_gotoxy
#codeline 252	"C:\WinIDE\writeiic\writeiic.C"
	;ARGW_CI(L39,(sp),0)
	lda	#<(L39)
	ldy	#0
	sta	(sp),y
	lda	#>(L39)
	ldy	#0+1
	sta	(sp),y
	;CALLV_CC(_printf,2)
	lda	#0
	ldy	#2
	jsr	_printf
#codeline 253	"C:\WinIDE\writeiic\writeiic.C"
	;ARGW_CI(17,(sp),0)
	lda	#<(17)
	ldy	#0
	sta	(sp),y
	lda	#>(17)
	ldy	#0+1
	sta	(sp),y
	;ARGW_CI(17,(sp),2)
	lda	#<(17)
	ldy	#2
	sta	(sp),y
	lda	#>(17)
	ldy	#2+1
	sta	(sp),y
	;CALLV_CC(_gotoxy,4)
	lda	#0
	ldy	#4
	jsr	_gotoxy
#codeline 254	"C:\WinIDE\writeiic\writeiic.C"
	;ARGW_CI(0,(sp),0)
	lda	#<(0)
	ldy	#0
	sta	(sp),y
	lda	#>(0)
	ldy	#0+1
	sta	(sp),y
	;CALLV_CC(_UpdateLCD,2)
	lda	#0
	ldy	#2
	jsr	_UpdateLCD
#codeline 255	"C:\WinIDE\writeiic\writeiic.C"
L41:
	;INDIRB_AD((fp),7,tmp2)
	clc	
	ldy	#(7)
	lda	(fp),y
	sta	tmp2
	ldy	#(7+1)
	lda	(fp),y
	sta	tmp2+1
	;1e5_DC(tmp2,0,L42)
	lda	tmp2
	ora	tmp2+1
	bne	$+5
	jmp	L42
#codeline 256	"C:\WinIDE\writeiic\writeiic.C"
L40:
	;CALLW_CCD(_getchar,0,tmp2)
	lda	#0
	ldy	#0
	jsr	_getchar
	stx	tmp2
	sta	tmp2+1
	;ASGNC_DA(tmp2,(fp),6)
	lda	tmp2
	ldy	#6
	sta	(fp),y
#codeline 258	"C:\WinIDE\writeiic\writeiic.C"
	;INDIRB_AD((fp),6,tmp2)
	ldy	#(6)
	lda	(fp),y
	sta	tmp2
	;56_DD(tmp2,tmp2)
	ldx	#0
	lda	tmp2
	sta	tmp2
	stx	tmp2+1
	;ASGNW_DA(tmp2,(fp),9)
	lda	tmp2
	ldy	#9
	sta	(fp),y
	lda	tmp2+1
	ldy	#9+1
	sta	(fp),y
	;INDIRB_AD((fp),9,tmp2)
	clc	
	ldy	#(9)
	lda	(fp),y
	sta	tmp2
	ldy	#(9+1)
	lda	(fp),y
	sta	tmp2+1
	;1e5_DC(tmp2,98,L46)
	lda	tmp2
	eor	#<(98)
	sta	op2
	lda	tmp2+1
	eor	#>(98)
	ora	op2
	bne	$+5
	jmp	L46
	;225_DC(tmp2,98,L41)
	lda	tmp2
	cmp	#<(98)
	lda	tmp2+1
	sbc	#>(98)
	bvc	$+4
	eor	#$80
	bpl	$+5
	jmp	L41
L49:
	;INDIRB_AD((fp),9,tmp2)
	clc	
	ldy	#(9)
	lda	(fp),y
	sta	tmp2
	ldy	#(9+1)
	lda	(fp),y
	sta	tmp2+1
	;1e5_DC(tmp2,109,L48)
	lda	tmp2
	eor	#<(109)
	sta	op2
	lda	tmp2+1
	eor	#>(109)
	ora	op2
	bne	$+5
	jmp	L48
	;1e5_DC(tmp2,110,L47)
	lda	tmp2
	eor	#<(110)
	sta	op2
	lda	tmp2+1
	eor	#>(110)
	ora	op2
	bne	$+5
	jmp	L47
	;JUMP_C(L41)
	jmp	L41
#codeline 259	"C:\WinIDE\writeiic\writeiic.C"
L46:
	;INDIRB_CD(_dlength,tmp2)
	lda	_dlength
	sta	tmp2
	lda	_dlength+1
	sta	tmp2+1
	;ASGNC_CZ(58,tmp2)
	lda	#<(58)
	ldy	#0
	sta	(tmp2),y
	;ASGNW_CA(0,(fp),7)
	lda	#<(0)
	ldy	#7
	sta	(fp),y
	lda	#>(0)
	ldy	#7+1
	sta	(fp),y
#codeline 260	"C:\WinIDE\writeiic\writeiic.C"
	;JUMP_C(L41)
	jmp	L41
#codeline 261	"C:\WinIDE\writeiic\writeiic.C"
L47:
	;INDIRB_CD(_dlength,tmp2)
	lda	_dlength
	sta	tmp2
	lda	_dlength+1
	sta	tmp2+1
	;ASGNC_CZ(60,tmp2)
	lda	#<(60)
	ldy	#0
	sta	(tmp2),y
	;ASGNW_CA(0,(fp),7)
	lda	#<(0)
	ldy	#7
	sta	(fp),y
	lda	#>(0)
	ldy	#7+1
	sta	(fp),y
#codeline 262	"C:\WinIDE\writeiic\writeiic.C"
	;JUMP_C(L41)
	jmp	L41
#codeline 263	"C:\WinIDE\writeiic\writeiic.C"
L48:
	;INDIRB_CD(_dlength,tmp2)
	lda	_dlength
	sta	tmp2
	lda	_dlength+1
	sta	tmp2+1
	;ASGNC_CZ(64,tmp2)
	lda	#<(64)
	ldy	#0
	sta	(tmp2),y
	;ASGNW_CA(0,(fp),7)
	lda	#<(0)
	ldy	#7
	sta	(fp),y
	lda	#>(0)
	ldy	#7+1
	sta	(fp),y
#codeline 264	"C:\WinIDE\writeiic\writeiic.C"
#codeline 265	"C:\WinIDE\writeiic\writeiic.C"
#codeline 266	"C:\WinIDE\writeiic\writeiic.C"
#codeline 267	"C:\WinIDE\writeiic\writeiic.C"
	;JUMP_C(L41)
	jmp	L41
#codeline 267	"C:\WinIDE\writeiic\writeiic.C"
L42:
L36:
	;LEAVE
	jmp	leave
#codeline	269	"C:\WinIDE\writeiic\writeiic.C"
_menu1	endp
	public _menu2
_menu2	proc
	;ENTER_CC(0,11)
	ldx	#<11
	stx	tmp0
	ldx	#>11
	stx	tmp0+1
	jsr	enter
#codeline	271	"C:\WinIDE\writeiic\writeiic.C"
	;ASGNW_CA(1,(fp),7)
	lda	#<(1)
	ldy	#7
	sta	(fp),y
	lda	#>(1)
	ldy	#7+1
	sta	(fp),y
#codeline 274	"C:\WinIDE\writeiic\writeiic.C"
	;INDIRB_CD(_address,tmp2)
	lda	_address
	sta	tmp2
	lda	_address+1
	sta	tmp2+1
	;ASGNW_CZ(14336,tmp2)
	lda	#<(14336)
	ldy	#0
	sta	(tmp2),y
	lda	#>(14336)
	ldy	#1
	sta	(tmp2),y
#codeline 275	"C:\WinIDE\writeiic\writeiic.C"
	;CALLV_CC(_ClearScreen,0)
	lda	#0
	ldy	#0
	jsr	_ClearScreen
#codeline 276	"C:\WinIDE\writeiic\writeiic.C"
	;ARGW_CI(2,(sp),0)
	lda	#<(2)
	ldy	#0
	sta	(sp),y
	lda	#>(2)
	ldy	#0+1
	sta	(sp),y
	;ARGW_CI(2,(sp),2)
	lda	#<(2)
	ldy	#2
	sta	(sp),y
	lda	#>(2)
	ldy	#2+1
	sta	(sp),y
	;CALLV_CC(_gotoxy,4)
	lda	#0
	ldy	#4
	jsr	_gotoxy
#codeline 277	"C:\WinIDE\writeiic\writeiic.C"
	;ARGW_CI(L51,(sp),0)
	lda	#<(L51)
	ldy	#0
	sta	(sp),y
	lda	#>(L51)
	ldy	#0+1
	sta	(sp),y
	;CALLV_CC(_printf,2)
	lda	#0
	ldy	#2
	jsr	_printf
#codeline 278	"C:\WinIDE\writeiic\writeiic.C"
	;ARGW_CI(2,(sp),0)
	lda	#<(2)
	ldy	#0
	sta	(sp),y
	lda	#>(2)
	ldy	#0+1
	sta	(sp),y
	;ARGW_CI(3,(sp),2)
	lda	#<(3)
	ldy	#2
	sta	(sp),y
	lda	#>(3)
	ldy	#2+1
	sta	(sp),y
	;CALLV_CC(_gotoxy,4)
	lda	#0
	ldy	#4
	jsr	_gotoxy
#codeline 279	"C:\WinIDE\writeiic\writeiic.C"
	;ARGW_CI(L52,(sp),0)
	lda	#<(L52)
	ldy	#0
	sta	(sp),y
	lda	#>(L52)
	ldy	#0+1
	sta	(sp),y
	;CALLV_CC(_printf,2)
	lda	#0
	ldy	#2
	jsr	_printf
#codeline 280	"C:\WinIDE\writeiic\writeiic.C"
	;ARGW_CI(2,(sp),0)
	lda	#<(2)
	ldy	#0
	sta	(sp),y
	lda	#>(2)
	ldy	#0+1
	sta	(sp),y
	;ARGW_CI(4,(sp),2)
	lda	#<(4)
	ldy	#2
	sta	(sp),y
	lda	#>(4)
	ldy	#2+1
	sta	(sp),y
	;CALLV_CC(_gotoxy,4)
	lda	#0
	ldy	#4
	jsr	_gotoxy
#codeline 281	"C:\WinIDE\writeiic\writeiic.C"
	;ARGW_CI(L53,(sp),0)
	lda	#<(L53)
	ldy	#0
	sta	(sp),y
	lda	#>(L53)
	ldy	#0+1
	sta	(sp),y
	;CALLV_CC(_printf,2)
	lda	#0
	ldy	#2
	jsr	_printf
#codeline 282	"C:\WinIDE\writeiic\writeiic.C"
	;ARGW_CI(2,(sp),0)
	lda	#<(2)
	ldy	#0
	sta	(sp),y
	lda	#>(2)
	ldy	#0+1
	sta	(sp),y
	;ARGW_CI(5,(sp),2)
	lda	#<(5)
	ldy	#2
	sta	(sp),y
	lda	#>(5)
	ldy	#2+1
	sta	(sp),y
	;CALLV_CC(_gotoxy,4)
	lda	#0
	ldy	#4
	jsr	_gotoxy
#codeline 283	"C:\WinIDE\writeiic\writeiic.C"
	;ARGW_CI(L54,(sp),0)
	lda	#<(L54)
	ldy	#0
	sta	(sp),y
	lda	#>(L54)
	ldy	#0+1
	sta	(sp),y
	;CALLV_CC(_printf,2)
	lda	#0
	ldy	#2
	jsr	_printf
#codeline 284	"C:\WinIDE\writeiic\writeiic.C"
	;ARGW_CI(2,(sp),0)
	lda	#<(2)
	ldy	#0
	sta	(sp),y
	lda	#>(2)
	ldy	#0+1
	sta	(sp),y
	;ARGW_CI(6,(sp),2)
	lda	#<(6)
	ldy	#2
	sta	(sp),y
	lda	#>(6)
	ldy	#2+1
	sta	(sp),y
	;CALLV_CC(_gotoxy,4)
	lda	#0
	ldy	#4
	jsr	_gotoxy
#codeline 285	"C:\WinIDE\writeiic\writeiic.C"
	;ARGW_CI(L55,(sp),0)
	lda	#<(L55)
	ldy	#0
	sta	(sp),y
	lda	#>(L55)
	ldy	#0+1
	sta	(sp),y
	;CALLV_CC(_printf,2)
	lda	#0
	ldy	#2
	jsr	_printf
#codeline 286	"C:\WinIDE\writeiic\writeiic.C"
	;ARGW_CI(2,(sp),0)
	lda	#<(2)
	ldy	#0
	sta	(sp),y
	lda	#>(2)
	ldy	#0+1
	sta	(sp),y
	;ARGW_CI(7,(sp),2)
	lda	#<(7)
	ldy	#2
	sta	(sp),y
	lda	#>(7)
	ldy	#2+1
	sta	(sp),y
	;CALLV_CC(_gotoxy,4)
	lda	#0
	ldy	#4
	jsr	_gotoxy
#codeline 287	"C:\WinIDE\writeiic\writeiic.C"
	;ARGW_CI(L56,(sp),0)
	lda	#<(L56)
	ldy	#0
	sta	(sp),y
	lda	#>(L56)
	ldy	#0+1
	sta	(sp),y
	;CALLV_CC(_printf,2)
	lda	#0
	ldy	#2
	jsr	_printf
#codeline 288	"C:\WinIDE\writeiic\writeiic.C"
	;ARGW_CI(17,(sp),0)
	lda	#<(17)
	ldy	#0
	sta	(sp),y
	lda	#>(17)
	ldy	#0+1
	sta	(sp),y
	;ARGW_CI(17,(sp),2)
	lda	#<(17)
	ldy	#2
	sta	(sp),y
	lda	#>(17)
	ldy	#2+1
	sta	(sp),y
	;CALLV_CC(_gotoxy,4)
	lda	#0
	ldy	#4
	jsr	_gotoxy
#codeline 289	"C:\WinIDE\writeiic\writeiic.C"
	;ARGW_CI(255,(sp),0)
	lda	#<(255)
	ldy	#0
	sta	(sp),y
	lda	#>(255)
	ldy	#0+1
	sta	(sp),y
	;CALLV_CC(_UpdateLCD,2)
	lda	#0
	ldy	#2
	jsr	_UpdateLCD
#codeline 290	"C:\WinIDE\writeiic\writeiic.C"
L58:
	;INDIRB_AD((fp),7,tmp2)
	clc	
	ldy	#(7)
	lda	(fp),y
	sta	tmp2
	ldy	#(7+1)
	lda	(fp),y
	sta	tmp2+1
	;1e5_DC(tmp2,0,L59)
	lda	tmp2
	ora	tmp2+1
	bne	$+5
	jmp	L59
#codeline 291	"C:\WinIDE\writeiic\writeiic.C"
L57:
	;CALLW_CCD(_getchar,0,tmp2)
	lda	#0
	ldy	#0
	jsr	_getchar
	stx	tmp2
	sta	tmp2+1
	;ASGNC_DA(tmp2,(fp),6)
	lda	tmp2
	ldy	#6
	sta	(fp),y
#codeline 292	"C:\WinIDE\writeiic\writeiic.C"
	;INDIRB_AD((fp),6,tmp2)
	ldy	#(6)
	lda	(fp),y
	sta	tmp2
	;56_DD(tmp2,tmp2)
	ldx	#0
	lda	tmp2
	sta	tmp2
	stx	tmp2+1
	;ASGNW_DA(tmp2,(fp),9)
	lda	tmp2
	ldy	#9
	sta	(fp),y
	lda	tmp2+1
	ldy	#9+1
	sta	(fp),y
	;INDIRB_AD((fp),9,tmp2)
	clc	
	ldy	#(9)
	lda	(fp),y
	sta	tmp2
	ldy	#(9+1)
	lda	(fp),y
	sta	tmp2+1
	;1e5_DC(tmp2,98,L63)
	lda	tmp2
	eor	#<(98)
	sta	op2
	lda	tmp2+1
	eor	#>(98)
	ora	op2
	bne	$+5
	jmp	L63
	;225_DC(tmp2,98,L58)
	lda	tmp2
	cmp	#<(98)
	lda	tmp2+1
	sbc	#>(98)
	bvc	$+4
	eor	#$80
	bpl	$+5
	jmp	L58
L69:
	;INDIRB_AD((fp),9,tmp2)
	clc	
	ldy	#(9)
	lda	(fp),y
	sta	tmp2
	ldy	#(9+1)
	lda	(fp),y
	sta	tmp2+1
	;225_DC(tmp2,103,L58)
	lda	tmp2
	cmp	#<(103)
	lda	tmp2+1
	sbc	#>(103)
	bvc	$+4
	eor	#$80
	bpl	$+5
	jmp	L58
	;205_DC(tmp2,110,L58)
	lda	#<(110)
	cmp	tmp2
	lda	#>(110)
	sbc	tmp2+1
	bvc	$+4
	eor	#$80
	bpl	$+5
	jmp	L58
	;155_DCD(tmp2,1,tmp2)
	ldx	#<(1)
	lda	tmp2
	sta	tmp
	lda	tmp2+1
	jsr	lshwtmp
	stx	tmp2
	sta	tmp2+1
	;135_DCD(tmp2,L70-206,tmp2)
	lda	tmp2
	clc	
	adc	#<(L70-206)
	sta	tmp2
	lda	tmp2+1
	adc	#>(L70-206)
	sta	tmp2+1
	;INDIRB_ZD(tmp2,tmp2)
	ldy	#0
	lda	(tmp2),y
	tax	
	ldy	#1
	lda	(tmp2),y
	sta	tmp2+1
	stx	tmp2
	;JUMP_D(tmp2)
	lda	#$4c
	sta	jsrvect
	ldx	tmp2
	lda	tmp2+1
	stx	jsrvect+1
	sta	jsrvect+2
	jmp	jsrvect
L70:
	;DW_C(L66)
	dw L66
	;DW_C(L67)
	dw L67
	;DW_C(L58)
	dw L58
	;DW_C(L68)
	dw L68
	;DW_C(L58)
	dw L58
	;DW_C(L58)
	dw L58
	;DW_C(L65)
	dw L65
	;DW_C(L64)
	dw L64
#codeline 293	"C:\WinIDE\writeiic\writeiic.C"
L63:
	;CALLV_CC(_bintoeep,0)
	lda	#0
	ldy	#0
	jsr	_bintoeep
	;ASGNW_CA(0,(fp),7)
	lda	#<(0)
	ldy	#7
	sta	(fp),y
	lda	#>(0)
	ldy	#7+1
	sta	(fp),y
	;JUMP_C(L58)
	jmp	L58
#codeline 295	"C:\WinIDE\writeiic\writeiic.C"
L64:
	;CALLV_CC(_dattoeep,0)
	lda	#0
	ldy	#0
	jsr	_dattoeep
	;ASGNW_CA(0,(fp),7)
	lda	#<(0)
	ldy	#7
	sta	(fp),y
	lda	#>(0)
	ldy	#7+1
	sta	(fp),y
	;JUMP_C(L58)
	jmp	L58
#codeline 296	"C:\WinIDE\writeiic\writeiic.C"
L65:
	;CALLV_CC(_eeptoram,0)
	lda	#0
	ldy	#0
	jsr	_eeptoram
	;ASGNW_CA(0,(fp),7)
	lda	#<(0)
	ldy	#7
	sta	(fp),y
	lda	#>(0)
	ldy	#7+1
	sta	(fp),y
	;JUMP_C(L58)
	jmp	L58
#codeline 297	"C:\WinIDE\writeiic\writeiic.C"
L66:
	;CALLV_CC(_eeptodat,0)
	lda	#0
	ldy	#0
	jsr	_eeptodat
	;ASGNW_CA(0,(fp),7)
	lda	#<(0)
	ldy	#7
	sta	(fp),y
	lda	#>(0)
	ldy	#7+1
	sta	(fp),y
	;JUMP_C(L58)
	jmp	L58
#codeline 298	"C:\WinIDE\writeiic\writeiic.C"
L67:
	;CALLV_CC(_ramtoeep,0)
	lda	#0
	ldy	#0
	jsr	_ramtoeep
	;ASGNW_CA(0,(fp),7)
	lda	#<(0)
	ldy	#7
	sta	(fp),y
	lda	#>(0)
	ldy	#7+1
	sta	(fp),y
	;JUMP_C(L58)
	jmp	L58
#codeline 299	"C:\WinIDE\writeiic\writeiic.C"
L68:
	;CALLV_CC(_menu1,0)
	lda	#0
	ldy	#0
	jsr	_menu1
	;ASGNW_CA(0,(fp),7)
	lda	#<(0)
	ldy	#7
	sta	(fp),y
	lda	#>(0)
	ldy	#7+1
	sta	(fp),y
#codeline 300	"C:\WinIDE\writeiic\writeiic.C"
#codeline 301	"C:\WinIDE\writeiic\writeiic.C"
#codeline 302	"C:\WinIDE\writeiic\writeiic.C"
	;JUMP_C(L58)
	jmp	L58
#codeline 302	"C:\WinIDE\writeiic\writeiic.C"
L59:
L50:
	;LEAVE
	jmp	leave
#codeline	304	"C:\WinIDE\writeiic\writeiic.C"
_menu2	endp
	public _main
_main	proc
	;ENTER_CC(0,6)
	ldx	#<6
	stx	tmp0
	ldx	#>6
	stx	tmp0+1
	jsr	enter
#codeline	307	"C:\WinIDE\writeiic\writeiic.C"
	;CALLV_CC(_menu1,0)
	lda	#0
	ldy	#0
	jsr	_menu1
#codeline 309	"C:\WinIDE\writeiic\writeiic.C"
L76:
#codeline 310	"C:\WinIDE\writeiic\writeiic.C"
L75:
	;CALLV_CC(_menu2,0)
	lda	#0
	ldy	#0
	jsr	_menu2
#codeline 311	"C:\WinIDE\writeiic\writeiic.C"
	;JUMP_C(L76)
	jmp	L76
#codeline 311	"C:\WinIDE\writeiic\writeiic.C"
L77:
L74:
	;LEAVE
	jmp	leave
#codeline	313	"C:\WinIDE\writeiic\writeiic.C"
_main	endp
program	endsg
banked	endsc
global section banknumber:0,baseaddress:$0,length:$8000
uninit_data	segment
	public _addst
_addst:
	;ZERO_C(2)
	 db 2 dup(0)
	extern __DailyRemind
	extern __WeekRemind
	extern __Schedule
	extern __Person
	extern __Memo
	extern __NameCard
	extern __GuessGame
	extern __Eng900
	extern __Deposit
	extern __Calculator
	extern _pyfc
	extern _UpdateLCD
	extern _UpdateLCD12
	extern _textmode
	extern _cursor
	extern _write_eng_font
	extern _write_chi_font
	extern _delay
	extern _sleep
	extern _rectangle
	extern _putpixel
	extern _line
	extern _gotoxy
	extern _outtextxy
	extern _getpixel
	extern _getkey
	extern _get_eng_font
	extern _get_chi_font
	extern _block
	extern _bell
	extern _SetScrollBar
	extern _DispBCD
	extern _ClearScreen
	extern _time
	extern _noidle
	extern _fwrite
	extern _ftell
	extern _fsetpos
	extern _fseek
	extern _fscanf
	extern _fread
	extern _fputs
	extern _fputc
	extern _fprintf
	extern _fgets
	extern _fgetpos
	extern _fgetc
	extern _fflush
	extern _fclose
	extern _feof
	extern _fopen
	extern _printf
	extern _putchar
	extern _getchar
	extern _kbhit
uninit_data	endsg
global	endsc
global section banknumber:0,baseaddress:$0,length:$8000
init_data	segment
L56:
	db "6->return"
	db $0
L55:
	db "5->ram to eeprom"
	db $0
L54:
	db "4->eeprom to dat"
	db $0
L53:
	db "3->eeprom to ram"
	db $0
L52:
	db "2->dat to eeprom"
	db $0
L51:
	db "1->bin to eeprom"
	db $0
L39:
	db "3->24c16"
	db $0
L38:
	db "2->24c08"
	db $0
L37:
	db "1->24c04"
	db $0
L29:
	db "succeed!"
	db $0
L28:
	db "working...."
	db $0
L9:
	db "your select:"
	db $0
L8:
	db "y->sure n->return"
	db $0
L7:
	db "u->up or d->down"
	db $0
init_data	endsg
global	endsc
	end