汇编语言怎样实现ASCII码转换为二进制数？
答案:1 悬赏:50
解决时间 2021-10-18 05:18
- 提问者网友：鐵馬踏冰河
- 2021-10-18 02:06
汇编语言怎样实现ASCII码转换为二进制数？
最佳答案
- 二级知识专家网友：空山清雨
- 2021-10-18 03:34
DATA SEGMENT
BIN1 DB 35H
BIN2 DW 0AB48H
NUM DB 8，16
ASCBUF DB 20H DUP(0)
TABLE DW 3 DUP(0)
DATA ENDS
.....
COSEG SEGMENT
...
MOV TABLE,OFFSET BIN1
MOV TABLE+2,OFFSET NUM
MOV TABLE+4,OFFSET ASCBUF
MOV BX,OFFSET TABLE
CALL BINASC8
...
MOV TABLE,OFFSET BIN2
MOV TABLE+2,OFFSET NUM+1
MOV TABLE+4,OFFSET ASCBUF+10H
MOV BX,OFFSET TABLE
CALL BINASC16
--------------------------------------------------------------
--------------------------------------------------------------
子程序如下:
BINASC PROC
BINASC8: MOV DI,[BX]
MOV DH,[DI]
JMP TRAN
BINASC16: MOV DI,[BX]
MOV DX,[DI]
TRAN: MOV DI,[BX+2]
MOV CL,[DI]
XOR CH,CH
MOV DI,[BX+4]
LOP: ROL DX,1
MOV AL,DL
AND AL,01H
ADD AL,30H
MOV [DI],AL
INC DI
LOOP LOP
RET
BINASC ENDP
BIN1 DB 35H
BIN2 DW 0AB48H
NUM DB 8，16
ASCBUF DB 20H DUP(0)
TABLE DW 3 DUP(0)
DATA ENDS
.....
COSEG SEGMENT
...
MOV TABLE,OFFSET BIN1
MOV TABLE+2,OFFSET NUM
MOV TABLE+4,OFFSET ASCBUF
MOV BX,OFFSET TABLE
CALL BINASC8
...
MOV TABLE,OFFSET BIN2
MOV TABLE+2,OFFSET NUM+1
MOV TABLE+4,OFFSET ASCBUF+10H
MOV BX,OFFSET TABLE
CALL BINASC16
--------------------------------------------------------------
--------------------------------------------------------------
子程序如下:
BINASC PROC
BINASC8: MOV DI,[BX]
MOV DH,[DI]
JMP TRAN
BINASC16: MOV DI,[BX]
MOV DX,[DI]
TRAN: MOV DI,[BX+2]
MOV CL,[DI]
XOR CH,CH
MOV DI,[BX+4]
LOP: ROL DX,1
MOV AL,DL
AND AL,01H
ADD AL,30H
MOV [DI],AL
INC DI
LOOP LOP
RET
BINASC ENDP
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息！
大家都在看
推荐信息