?? self_test.asm
字號:
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
S_LCL equ 0x2c ;home+waru 1450TE V1.01
S_LCAS equ 0x2d ;home+* 1450TE V1.01
S_FC equ 0x2e ;euro+ x 1450TE V1.01
S_FCAS equ 0x2f ;euro+* 1450TE V1.01
S_DLTA equ 0x30 ;delta+' '
S_PER equ 0x31 ;delta+' '
;S_EQU_A equ 0x32 ;
S_CPAY equ 0x32 ;P* V3.13
S_TXPL equ 0x33 ;TX+
S_TXMI equ 0x34 ;TX-
S_TLMGT equ 0x35 ;TL M+
S_TX1PL equ 0x36 ;TX1+
S_TX1MI equ 0x37 ;TX1-
S_TX2PL equ 0x38 ;TX2+
S_TX2MI equ 0x39 ;TX2-
S_TAX1 equ 0x3a ;T1%
S_TAX2 equ 0x3b ;T2%
S_GPM equ 0x3c ;GPM(MU)
S_GS equ 0x3d
S_GT equ 0x3d ;GT
S_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"
; DBR_LCD1235_RATE equ (0x0f33<<4)+3 ;LCD DBR matrix point for "RATE"
; DBR_LCD1297_RATE equ (0x0f33<<4)+4 ;LCD DBR matrix point for "RATE"
; DBR_LCD120_RATE equ (0x0f33<<4)+4 ;LCD DBR matrix point for "RATE"
; DBR_LCD1297_GT equ (0x0f32<<4)+2 ;LCD DBR matrix point for "GT"
; ;LCD_PRN equ (0x0f31<<4)+3 ;LCD DBR matrix point for "PRINT"
; ;LCD_FIN equ (0x0f30<<4)+3 ;LCD DEB matrix point for "FIN"
AUTOOFFTIME equ 31250;1500
$list
public check_slftst,wait_35us
extern key_get,start,wait_100ms,wait_50ms,init_keybuf;,fix_mdflg
; extern write_1w,read_1w,wen_command,wds_command,start_blink,stop_blink
; extern hex_to_dec
extern test_prn,HD_TEMP,VPRN,update_md
ROM section code
V_N equ '123'
;==============================================================================
; check enter self test
;==============================================================================
; select RND off, FDP
; press 2, 6, 7 key and turn on AC
;
wait_35us:
cmp wa,(pc+a) ;7 machine cycle(1.75us under 16MHz clock)
cmp wa,(pc+a)
cmp wa,(pc+a)
cmp wa,(pc+a)
cmp wa,(pc+a)
cmp wa,(pc+a)
cmp wa,(pc+a)
cmp wa,(pc+a)
cmp wa,(pc+a)
cmp wa,(pc+a)
cmp wa,(pc+a)
cmp wa,(pc+a)
cmp wa,(pc+a)
cmp wa,(pc+a)
cmp wa,(pc+a)
cmp wa,(pc+a)
cmp wa,(pc+a)
cmp wa,(pc+a)
cmp wa,(pc+a)
cmp wa,(pc+a)
ret
check_slftst:
ei
call wait_100ms
call wait_100ms
call update_md
cmp (MDFLG_0),0y01000000
j ne,check_stst9
cmp (MDFLG_1),0y01000010
j ne,check_stst9
cmp (MDFLG_2),0y00100100
j ne,check_stst9
cmp (MDFLG_3),0y00000000
j ne,check_stst9
di
ld (P9DR),0y00100000 ;
call wait_35us
ld a,(P1PRD) ;
and a,0y00111111 ;
cmp a,0y00000100 ;press '7'?
j ne,check_stst9
ld (P9DR),0y00010000 ;
call wait_35us
ld a,(P1PRD) ;
and a,0y00111111 ;
cmp a,0y00000001 ;press '2'
j ne,check_stst9 ;yes -> exit
ld (P9DR),0y00001000 ;
call wait_35us
ld a,(P1PRD) ;load key matrix return0~3 (P17~P14)
and a,0y0011111 ;press any key?
cmp a,0y0000010 ;press '6'
j ne,check_stst9
ei
call self_test
check_stst9:
ei
ret
self_test:
call temp_vprn
call vfd_test
call mode_prn
call key_test
call ee_test
call chara_prn
call spc_prnbuf
call print
call spc_prnbuf
call print
j start
M_TEMP db "TEMPERATURE C"
M_VPRN db "VOLTAGE V"
DISP_FINISH db "DISPLAY FINISH "
MD_OK db "MOD SWITCH OK"
MD_NG db "MOD SWITCH NG"
M_EEOK db "EEPROM OK"
M_EENG db "EEPROM NG"
KEY_OK db "KEY NET OK"
KEY_NG db "KEY NET NG"
;input: HL <- string address
set_1line:
ld c,0
ld ix,PRN_BUF_MSD
set_1ln0:
ld a,(hl)
ld (ix),a
inc hl
inc ix
inc c
cmp c,18
j lt,set_1ln0
ret
;--------------------------------------------------------------------------
;--------------------------------------------------------------------------
slid_position_tbl:
db 2,0y10100100 ;
db 0,0y10000000 ;
db 0,0y00000000 ;
db 0,0y00000001 ;
db 0,0y00000100 ;
db 0,0y00001000 ;
db 0,0y00010000 ;
db 0,0y01000000 ;
slid_position_tbl_mid:
db 1,0y00000010 ;
db 1,0y10000010 ;
db 1,0y01000010 ;
db 2,0y00101000 ;
db 2,0y00100000 ;
db 2,0y00100100 ;
db 3,0y00000100 ;
db 3,0y000000000 ;
slid_position_tbl_end:
mode_prn:
call spc_prnbuf
ld a,0x29
ld c,7
call set_disp_test_1
call disp_to_dbr
ld ix,slid_position_tbl
ld (BLK_CT),0
mode_prn_1:
call wait_100ms
call wait_100ms
push ix
call update_md
pop ix
ld c,(ix)
inc ix
ld b,(ix)
ld hl,MDFLG_0
ld a,(hl+c)
cmp a,b
j ne,mode_prn_2
ld hl,DISP+2
ld c,(BLK_CT)
ld a,0x2a
ld (hl+c),a
inc (BLK_CT)
push ix
call disp_to_dbr
call wait_100ms
call wait_100ms
pop ix
inc ix
cmp ix,slid_position_tbl_mid
j ne,mode_prn_10
ld a,0x29
ld c,7
call set_disp_test_1
call disp_to_dbr
ld ix,slid_position_tbl_mid
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -