c语言怎么将bcd码转换为ascii码,将十进制数的ASCII码转换为BCD码（汇编）

STACK1 SEGMENT STACK

DW 256 DUP(?)

STACK1 ENDS

DATA SEGMENT

BUF DB 30H,30H,31H,32H

DATA ENDS

CODE SEGMENT

ASSUME CS:CODE,DS:DATA

START:MOV AX,DATA

MOV DS,AX

MOV SI,OFFSET BUF

MOV BX,000AH

MOV CX,0004H

MOV AH,00H

MOV AL,[SI]

SUB AL,30H

A1:  IMUL BX

ADD AL,[SI+01]

SUB AL,30H

INC SI

LOOP A1

MOV [SI],AX

CALL SHOW

MOV AX,4C00H

INT 21H

SHOW PROC NEAR

MOV AL,DS,:[SI]

AND AL,0F0H

MOV CL,4

SHR AL,CL

CMP AL,0AH

JB C2

ADD AL,07H

C2：  ADD AL,30H

MOV DL,AL

MOV,AH,02H

INT 21H

MOV AL,DS:[SI]

AND AL,0FH

CMP AL,0AH

JB C3

ADD AL,07H

C3：ADD AL,30H

MOV DL,AL

MOV AH,02H

INT 21H

RET

SHOW ENDP

CODE ENDS

END START