ASCII碼到BCD碼轉(zhuǎn)換子程序
[導(dǎo)讀]
ASCII碼到BCD碼轉(zhuǎn)換子程序ASCTOBCD:MOV R7,#06HMOV R1,#20H MOV R0,#20HACALLASCBCDLOOP:SJMPLOOPASCBCD:MOV A,@R0CLRCCJNEA,#30H,LOOP1LOOP1:JCC,LOOP3CJNEA,#3AH,LOOP2LOOP2:JNCC,LOOP4CLRCSU
ASCII碼到BCD碼轉(zhuǎn)換子程序
ASCTOBCD:
MOV R7,#06H
MOV R1,#20H
MOV R0,#20H
ACALLASCBCD
LOOP:
SJMPLOOP
ASCBCD:
MOV A,@R0
CLRC
CJNEA,#30H,LOOP1
LOOP1:
JCC,LOOP3
CJNEA,#3AH,LOOP2
LOOP2:
JNCC,LOOP4
CLRC
SUBBA,#30H
LOOP3:
MOV X@R1,A.
INCR0
INCR1
DJNZR7,ASCBCD
RET
LOOP4:
MOV A,#0FFH
MOV X@R1,A
LJMPLOOP3
RET
下載文檔
