ASCII码到BCD码转换子程序
时间：2018-06-26 17:30:02
手机看文章
扫描二维码
随时随地手机看文章
[导读]
ASCII码到BCD码转换子程序ASCTOBCD:MOV R7,#06HMOV R1,#20H MOV R0,#20HACALLASCBCDLOOP:SJMPLOOPASCBCD:MOV A,@R0CLRCCJNEA,#30H,LOOP1LOOP1:JCC,LOOP3CJNEA,#3AH,LOOP2LOOP2:JNCC,LOOP4CLRCSU
ASCII码到BCD码转换子程序
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
下载文档
