font_data_obs.asm

calculator code ,use toshibaor nec LSI

	$nolist
;*******************************************************************************
;*******************************************************************************
;*                                                                             *
;*              (C)Copyright, CLOVER China Electronics Co.,LTD.                *
;*                          All Rigits Reserved                                *
;*   add:No.58-F Yang Dong Road, LuoFeng Demonstrative Zone Suzhou, China      *
;*                    Tel: [phone] Fax:[phone]                     *
;*                        http://www.clover.co.jp                              *
;*                                                                             *
;*******************************************************************************
;*******************************************************************************
;

;@set(D14,0)		;in case of 12digit model
;@set(UP_COM,1)		;in case of upper commma VFD

MAX_DIGIT	equ	12
MAX_DIGIT_DT	equ	15

D_PRN_MAX_LTP	equ	16		;maximum capacity of numeric part(digit)
;DISP character code................
D_0		equ	0x00
D_1		equ	0x01
D_I		equ	0x01
D_2		equ	0x02
D_3		equ	0x03
D_4		equ	0x04
D_5		equ	0x05
D_S		equ	0x05
D_6		equ	0x06
D_G		equ	0x06
D_7		equ	0x07
D_8		equ	0x08
D_9		equ	0x09
D_A		equ	0x0a
D_B		equ	0x0b
D_C		equ	0x0c
D_D		equ	0x0d
D_E		equ	0x0e
D_F		equ	0x0f
D_P		equ	0x10
D_H		equ	0x11
D_HYPN		equ	0x12
D_MIN		equ	0x12
D_L		equ	0x13
D_M		equ	0x14
D_N		equ	0x15
D_EQU		equ	0x16
D_R		equ	0x17
D_U		equ	0x18
D_T		equ	0x19

D_Lo		equ	0x29
D_Uo		equ	0x2a

D_SPC		equ	0x3f
;Key code............................
K_ZERO		equ	0x00
K_NUM		equ	0x09		;0-9 key
K_ZERO2		equ	0x0a
K_ZERO3		equ	0x0b
K_TEN		equ	0x0b
K_DP		equ	0x0c
K_CE		equ	0x0d
K_CEC		equ	0x0e
K_GT		equ	0x0f
K_PLS		equ	0x10
K_MIN		equ	0x11
K_ST		equ	0x12
K_TL		equ	0x13
K_ROUND		equ	0x13
K_SHS		equ	0x14		;#/S
K_FIN		equ	0x14
K_PNP		equ	0x15

K_TX2P		equ	0x14
K_TX2M		equ	0x15

K_EQU		equ	0x16
K_PER		equ	0x17
K_MUL		equ	0x18
K_DIV		equ	0x19
K_MU		equ	0x1a
K_DLT		equ	0x1b
K_SGN		equ	0x1c
K_BS		equ	0x1d
K_SHD		equ	0x1e		;#/D
K_IC		equ	0x1f
K_MPL		equ	0x20
K_MMI		equ	0x21
K_MST		equ	0x22
K_MTL		equ	0x23

K_M2PL		equ	0x2c
K_M2MI		equ	0x2d
K_M2ST		equ	0x2e
K_M2TL		equ	0x2f

;K_MONTH	equ	0x2c
;K_PAYMENT	equ	0x2d
;K_INTEREST	equ	0x2e
;K_AMOUNT	equ	0x2f

K_MONTH		equ	0x40	;V1.25 exten key code
K_PAYMENT	equ	0x41	;V1.25 exten key code
K_INTEREST	equ	0x42	;V1.25 exten key code
K_AMOUNT	equ	0x43	;V1.25 exten key code
	
K_EURO		equ	0x44	;V1.25 exten key code
K_LOCAL		equ	0x45	;V1.25 exten key code

K_EURO_DUM	equ	0x46	;V2.08 exten key code
K_LOCAL_DUM	equ	0x47	;V2.08 exten key code
K_EURO_LOCAL_TAX_DUM	equ	0x48
K_CST		equ	0x24		;feed
K_SEL		equ	0x25
K_MGR		equ	0x26
K_ROOT		equ	0x27

K_RATE		equ	0x28

K_TXP		equ	0x29
K_TXM		equ	0x2a

K_DEC		equ	0x2b
K_TIM		equ	0x2b
K_PERPLS	equ	0x2b
;K_EURO		equ	0x2c
;K_LOCAL		equ	0x2d
K_OFF		equ	0x2e
K_FED		equ	0x2f
K_MAX		equ	0x30		;for illegal key check
K_PRP		equ	0x31		;+% (dummy key code)
K_PRM		equ	0x32		;-% (dummy key code)
K_TAX		equ	0x33		;TAX (dummy key code)
K_M2CAL		equ	0x34		;M2 (dummy key code) V1.22
K_TX12M	equ	0x35	;V2.07 for [tax1][tax2][-]
K_TX12P	equ	0x36	;V2.07 for [tax1][tax2][+]
K_ICPLS	equ	0x37	;V2.12 
K_ICMIN	equ	0x38	;V2.12
;Printer character wheel code........
C_DP		equ	0x0c
C_TWODP		equ	0xcc
C_COM		equ	0x0b
C_SPC		equ	0x0f
C_DOT		equ	0x0c	;M71 printer head replace space with "dot"
C_SPCD		equ	0xff		;space for 2digit
C_SHPL		equ	0xd0		;for '#' on the left most digit
;V1.45C_AM		equ	0x78		;AM for symbol digit
;V1.45C_PM		equ	0x38		;PM for symbol digit
C_AM		equ	0xc0	;V1.45	;AM for symbol digit
C_PM		equ	0xa0	;V1.45	;PM for symbol digit
C_SHPR		equ	0xfd		;for '#' on the right
C_MIN		equ	0x0a	;V1.05	"-"

;V4.02============
;define symbol and character
ps_0		equ	0x00
ps_1		equ	0x01
ps_2		equ	0x02
ps_3		equ	0x03
ps_4		equ	0x04
ps_5		equ	0x05
ps_6		equ	0x06
ps_7		equ	0x07
ps_8		equ	0x08
ps_9		equ	0x09
ps_pls		equ	0x0a
ps_min		equ	0x0b
ps_dot		equ	0x0c
ps_str		equ	0x0d
ps_com		equ	0x0e
ps_spc		equ	0x0f
ps_mul		equ	0x10
ps_div		equ	0x11
ps_equ		equ	0x12
ps_der		equ	0x13
ps_per		equ	0x14
ps_dlt		equ	0x15
ps_dia		equ	0x16
ps_eur		equ	0x17
ps_a		equ	0x18
ps_b		equ	0x19
ps_c		equ	0x1a
ps_d		equ	0x1b
ps_e		equ	0x1c
ps_f		equ	0x1d
ps_g		equ	0x1e
ps_i		equ	0x1f
ps_l		equ	0x20
ps_m		equ	0x21
ps_n		equ	0x22
ps_o		equ	0x23
ps_p		equ	0x24
ps_r		equ	0x25
ps_s		equ	0x26
ps_t		equ	0x27
ps_u		equ	0x28
ps_z		equ	0x29
ps_mm		equ	0x2a
ps_mder		equ	0x2b
;Printing symbol(specified sumbol table offset)..............
;		equ	0x00		;'  '
S_PWR		equ	0x01		;'C*'
S_PLS		equ	0x02		;' +'
S_MIN		equ	0x03		;' -'
S_SPC		equ	0x04		;'  '
S_SHD		equ	0x04	
S_SHP		equ	0x05		;' #'
S_TL		equ	0x06		;' T'
S_TLGT		equ	0x07		;TL G+
S_STAPL		equ	0x07
S_ST		equ	0x08		;' S'
S_MUL		equ	0x09		;' X'
S_DIV		equ	0x0a		;' '+waru
S_EQU		equ	0x0b		;' ='
S_AST		equ	0x0c		;' *'
S_AVR		equ	0x0c		;' *'
S_CLR		equ	0x0d		;'c '
S_MTL		equ	0x0e		;'MT'
S_MST		equ	0x0f		;'MS'
S_MPL		equ	0x10		;'M+'
S_MMI		equ	0x11		;'M-'
S_M2TL		equ	0x12		;'MIIT'
S_M2ST		equ	0x13		;'MIIS'
S_M2PL		equ	0x14		;'MII+'
S_M2MI		equ	0x15		;'MII-'
S_PER_K		equ	0x16		;' %'  for function key(in box)
S_PRDS		equ	0x17		;'-%'
S_PRAD		equ	0x18		;'+%'
S_DLTA_K	equ	0x19		;delta+' ' for function key(in box)
S_PRDL		equ	0x1a		;delta+'%'
S_DLAS		equ	0x1b		;delta+'*'
S_PRMU		equ	0x1c		;' %'
S_MKUP		equ	0x1d		;'MU'
;S_RVS		equ	0x1e		;' '+up/down allow
S_EUAS		equ	0x1e		;'Euro *'	V3.14

S_MTH		equ	0x1f		;M	V3.13
S_ROOT		equ	0x20		;'R '
S_TAX		equ	0x21		;'TX%'
;S_PRN		equ	0x22		;' S'
S_PAY		equ	0x22		;P	V3.13
S_EUR		equ	0x23		;'K '(fcR)
;S_EUM		equ	0x24		;'K-'
S_EUROS		equ	0x24		;'Euro'
S_EUEQ		equ	0x25		;'Euro ='
S_COST		equ	0x26		;'C '
S_SELL		equ	0x27		;' S'
S_MARG		equ	0x28		;'M%'
S_TAXA		equ	0x29		;' T'
S_ICG		equ	0x2a		;'G '
S_G		equ	0x2a
S_ICM		equ	0x2b		;' M '
S_M		equ	0x2b
;V4.02S_LCL		equ	0x2c		;home+waru	1450TE V1.01
;V4.02S_LCAS		equ	0x2d		;home+*		1450TE V1.01
;V4.02S_FC		equ	0x2e		;euro+ x	1450TE V1.01
;V4.02S_FCAS		equ	0x2f		;euro+*		1450TE V1.01
S_DLTA		equ	0x2c;V4.020x30		;delta+' '
S_PER		equ	0x2d;V4.020x31		;delta+' '
;S_EQU_A	equ	;0x32		;
S_CPAY		equ	0x2e;V4.020x32		;P*	V3.13
S_TXPL		equ	0x2f;V4.020x33		;TX+
S_TXMI		equ	0x30;V4.020x34		;TX-
S_TLMGT		equ	0x31;V4.020x35		;TL M+
S_TX1PL		equ	0x32;V4.020x36		;TX1+
S_TX1MI		equ	0x33;V4.020x37		;TX1-
S_TX2PL		equ	0x34;V4.020x38		;TX2+
S_TX2MI		equ	0x35;V4.020x39		;TX2-
S_TAX1		equ	0x36;V4.020x3a		;T1%
S_TAX2		equ	0x37;V4.020x3b		;T2%
;V4.02S_GPM		equ	0x3c		;GPM(MU)
;V4.02S_GS		equ	0x3d
;V4.02S_GT		equ	0x3d		;GT
;V4.02S_GPL		equ	0x3e		;G+  for sigama=% when TA mode	V2.11


S_STAMN		equ	0x55
S_STAS		equ	0x56
S_STASTA	equ	0x57


;V3.00S_GS		equ	0x0f		;G dia	GT subtotal
;V3.00S_GT		equ	0x10		;G *	GT total
;V3.00S_PRM		equ	0x11		;- %	percent minus
;V3.00S_PRP		equ	0x12		;+ %	percent plus
;V3.00S_DLP		equ	0x13		;d +	delta plus(for tax+)
;V3.00S_DLM		equ	0x14		;d -	delta plus(for tax-)
;V3.00S_AM		equ	0x15		;A M	time print
;V3.00S_PM		equ	0x16		;P M	time print
;V3.00S_CST		equ	0xb7;0x17		;C *	cost price
;V3.00S_SEL		equ	0x26;0x18		;S *	selling price
;V3.00S_MAR		equ	0xa1;0x19		;M %	margine %
;V3.00S_MU		equ	0xa2;0x1a		;M _	mark up
;V3.00S_MUD		equ	0x57;0x1b		;d *	delta of mark up
;V3.00S_SET		equ	0x27;0x1d		;_ *	for rate,time set(* only)
;V3.00S_SHD		equ	0x22;0x1c		;_ _	for #/D print(space)
;V3.00S_TLG		equ	0x93;0x0a		;G +	total key with GT position
;==============================================================================
;V3.00S_FED		equ	0x00		;fh+' '
;V3.00S_PWR		equ	0x17		;'C*'
;V3.00S_PLS		equ	0x01		;' +'
;V3.00S_MIN		equ	0x02		;' -'
;V3.00S_SPC		equ	0x00		;'  '
;V3.00S_SHP		equ	0x26		;' <>'
;V3.00S_TL		equ	0x22		;' *'
;V3.00S_TLGT		equ	0x3c		;'*+'
;V3.00S_TLMGT		equ	0x3d		;'*+'
;V3.00S_ST		equ	0x08		;' <>'
;V3.00S_MUL		equ	0x03		;' X'
;V3.00S_DIV		equ	0x04		;' /'
;V3.00S_EQU		equ	0x05		;' ='
;V3.00S_AST		equ	0x22		;' *'
;V3.00S_CLR		equ	0x07		;'c '
;V3.00S_MTL		equ	0x0e		;'M*'
;V3.00S_MST		equ	0x0d		;'M<>'
;V3.00S_MPL		equ	0x0b		;'M+'
;V3.00S_MMI		equ	0x0c		;'M-'
;V3.00S_M2TL		equ	0x10		;'G*'
;V3.00S_STASTA	equ	0x77	;'**' 
;V3.00S_M2ST		equ	0x0f		;'G<>'
;V3.00S_STAS		equ	0x76	;'*S'
;V3.00S_M2PL		equ	0x3e		;'G+'
;V3.00S_STAPL		equ	0x73	;'*+' 
;V3.00S_PLSTA		equ	0x37	;'+*'
;V3.00S_M2MI		equ	0x3f		;'G-'
;V3.00S_STAMN		equ	0x70	;'*-' 
;V3.00S_M2TLV		equ	0x97		;'G*'
;V3.00S_M2STV		equ	0x96		;'G<>'
;V3.00S_M2PLV		equ	0x3e		;'G+'
;V3.00S_M2MIV		equ	0x3f		;'G-'
;V3.00S_PER		equ	0x06		;' %'
;V3.00S_STAPER	equ	0x71		;'*%'
;V3.00S_PRDS		equ	0x01		;'-%'
;V3.00S_PRAD		equ	0x31		;'+%'
;V3.00S_DLTAL		equ	0x82		;delta+' '
;V3.00S_DLTA		equ	0x28		;' "+delta V1.26
;V3.00S_PRDL		equ	0x81		;delta+'%'
;V3.00S_DLAS		equ	0x87		;delta+'*'
;V3.00S_PRMU		equ	0x21		;' %'
;V3.00S_MKUP		equ	0xa2		;'M '
;V3.00S_RVS		equ	0x22		;'  '
;V3.00S_AVR		equ	0x27		;' *'
;V3.00S_ROOT		equ	0x22		;'  '
;V3.00S_TAX		equ	0x12		;'% '
;V3.00S_PRN		equ	0x62		;'<> '
;V3.00S_EUR		equ	0x22		;'  '
;V3.00S_EUEQ		equ	0xc2		;'= '
;V3.00S_COST		equ	0x2b		;' C'
;V3.00S_SELL		equ	0x26		;' <>'
;V3.00S_M		equ	0x2a		;' M'
;V3.00S_MARG		equ	0xa1		;'M%'
;V3.00S_PERMARG	equ	0x1a		;'%M'
;V3.00S_TAXA		equ	0x27		;' *'
;V3.00S_ICG		equ	0x29		;' G'
;V3.00S_ICGV		equ	0x29		;' G'
;V3.00S_ICM		equ	0x2a		;' M'
;V3.00S_ASM		equ	0x7a		;'*M'
;V3.00S_ASC		equ	0x7b		;'*C'
;V3.00S_ASDL		equ	0x78		;'*'+delta
;V3.00S_MIPL		equ	0x03		;'-+'	
;V3.00S_MIMI		equ	0x00		;'--'
;V3.00S_MIST		equ	0x06		;'-S'
;V3.00S_MITL		equ	0x07		;'-T'
;V3.00S_EUROS		equ	0x29		;' euro'
;V3.00S_G		equ	0x9f		;'G '
;V3.00S_GPL		equ	0x93		;'G+'
;V3.00S_GAST		equ	0x97		;'G*'
;==============================================================================
P_SPC	equ	0x20	;for print " "
;-----------------------------------------------------------
;interrupt enable flag set:

EF4		equ	4;(EIRL).4 /INT0
EF5		equ	5;(EIRL).5 INTTC1
EF6		equ	6;(EIRL).6 INT1
EF7		equ	7;(EIRL).7 INTTBT
EF8		equ	0;(EIRH).0 INTTC3
EF9		equ	1;(EIRH).1 INTSIO(High speed SIO interrupt)
EF10		equ	2;(EIRH).2 INTTC4
EF11		equ	3;(EIRH).3 INT3
EF12		equ	4;(EIRH).4 INT4
EF13		equ	5;(EIRH).5 INTTC2
EF14		equ	6;(EIRH).6 /INT5
EF15		equ	7;(EIRH).7 INTADC or INT2
;interrupt request flag set:
IL2		equ	2;(ILL).2 INTSWI 
IL3		equ	3;(ILL).3 INTATRAP
IL4		equ	4;(ILL).4 /INT0
IL5		equ	5;(ILL).5 INTTC1
IL6		equ	6;(ILL).6 INT1
IL7		equ	7;(ILL).7 INTTB
IL8		equ	0;(ILH).0 INTTC3
IL9		equ	1;(ILH).1 INTSIO
IL10		equ	2;(ILH).2 INTTC4
IL11		equ	3;(ILH).3 INT3
IL12		equ	4;(ILH).4 INT4
IL13		equ	5;(ILH).5 INTTC2
IL14		equ	6;(ILH).6 /INT5
IL15		equ	7;(ILH).7 INTADC or /INT2
;	DBR_LCD_RATE		equ	(0x0f33<<4)+5	;LCD DBR matrix point for "RATE"