;*********************************************************************
;     函数功能：转化指令长度的内存区块为ASCII，转储到目标内存块，目标
;                          内存块长度应该是源内存块的2倍,如果内存块的内容均为压
;                          缩BCD码，则函数恰好将其转化为ASCII码。
;     入口参数：参数3：目标内存块地址，参数2：源内存块地址，参数1：源
;                         内存块大小
;   参数大小：均为2个字节，参数顺序，自右向左
;  注意：         要在16位代码段中使用本函数,子过程已经通过了作者的初步
;                        测试，欢迎大家测试并使用。
;*********************************************************************
MEM_TO_HEX  PROC FAR
PUSH BP
MOV  BP,SP
MOV  DI,[BP+06H] ;提取目标内存块地址
MOV  SI,[BP+08H] ;提取源内存块地址
MOV  CX,[BP+0AH] ;提取源内存块长度(单位：字节)
LCX:
MOV  AL, BYTE PTR [SI]
MOV  BH, AL ;保存AL的高半字节
MOV  BL, 2H
LBL:
AND  AL, 0FH ;将AL低半字节转化成十六进制
CMP  AL, 09H
JA  A
OR  AL,30H ;转化数字(0~9)成ASCII
JMP  B
A: OR  AL,31H ;转化字母(A~F)成ASCII
B: MOV  BYTE PTR [DI],AL;存入目标内存区
INC  DI  ;目标内存指针加1
MOV  AL,BH ;恢复AL的高半字节
SHR  AL,4H
DEC  BL  ;循环计数器减1
JNZ  LBL
INC  SI  ;源内存指针加1
LOOP LCX
POP  BP
RET  6H
MEM_TO_HEX  ENDP

;*********************************************************************;     函数功能：转化指令长度的内存区块为ASCII，转储到目标内存块，目标;                          内存块长度应该是源内存块的2倍,如果内存块的内容均为压;                          缩BCD码，则函数 // BCD 码 转 十 进 制 #define BCD _TO_DECIMAL(x) ((((x) & 0xf0) >> 4) * 10 + ((x) & 0x0f)) // 十 进 制 转 BCD 码 #define DECIMAL_TO_ BCD (x) ((((x) / 10) << 4) + ((x) % 10)) * \brief 十六 进 制 转 bcd 用于把时 // BCD 转换成16 进 制 数（例如：0x16转换成16）---读时钟使用（例如：读的秒=26代表:0x26，为 BCD 码，需要转换成十 进 制 ：38） uint8_t BCD toHEX(uint8_t BCD ) uint8_t tempData; tempData = ... MOV AL, 63 ; 将十 进 制 数63 存入 AL寄存器 DAA ; 将AL 中 的数值转换为 压缩 BCD 码，并存回AL AAM ; 将AL 中 的数值 存入 AH和AL 中 ，AH为高位 BCD 码，AL为低位 BCD 码 2. 使用AAA指令： MOV AL, 63 ; 将十 进 制 数63 存入 AL寄存器 AAA ; 将AL 中 的数值转换为 压缩 BCD 码，并存回AL AAM ; 将AL 中 的数值 存入 AH和AL 中 ，AH为高位 BCD 码，AL为低位 BCD 码 这两种方式都可以将十 进 制 数63以 压缩 BCD 码的 形式 送到AX 中 。