编写30h单元开始的4字节二进制数转换成bcd码的汇编语言

MOV AL, 30H ; 将30H加载到AL中
MOV BL, AL ; 将AL中的值存入BL
AND BL, 0FH ; 将BL中的低4位清零
SHR AL, 4 ; 将AL中的低4位右移4位
OR AL, 30H ; 将AL中的低4位置为3
OR BL, AL ; 将AL中的值与BL相或
MOV AL, BL ; 将BL中的值存入AL

相关问题

用汇编语言实现将R3中给定的一个单字节二进制数，转换成非压缩的二—十进制(BCD)码，放在30H开始的3个单元中。

好的，以下是一个将单字节二进制数转换为BCD码的汇编程序：

ORG 0H
MOV A, R3 ; 将二进制数存入累加器A
ANL A, #0FH ; 只保留低四位
MOV R0, #10 ; R0用于计数，初始化为10
MOV R1, #0 ; R1用于存储BCD码的高位，初始化为0
MOV R2, #0 ; R2用于存储BCD码的低位，初始化为0

LOOP:
    MOV B, A ; 将累加器A的值存入B
    DIV AB, R0 ; 将B除以10，商在A中，余数在B中
    ADD A, #30H ; 将商转换为ASCII码
    MOV @30H, A ; 将转换后的ASCII码存入30H
    INC 30H ; 指向下一个存储单元
    MOV A, B ; 将余数存回累加器A
    CJNE R0, #1, NEXT ; 如果不是最后一个数字，跳转到NEXT
    MOV R1, A ; 否则将余数存入R1中
    SJMP END ; 结束程序

NEXT:
    DJNZ R0, LOOP ; 计数器减1，继续循环

END:
    ADD R1, #30H ; 将R1转换为ASCII码
    ADD R2, #30H ; 将R2转换为ASCII码
    MOV @31H, R1 ; 将BCD码存入31H和32H
    MOV @32H, R2
    RET

这个程序中，我们使用循环和除法操作将二进制数转换为BCD码，并将BCD码存入30H、31H和32H三个存储单元中。具体地，我们首先将二进制数存入累加器A中，然后使用ANL指令只保留低四位。接着，我们使用循环计算每一位BCD码，并将BCD码存入30H开始的连续三个存储单元中。最后，我们将BCD码存入31H和32H两个存储单元中，并使用RET指令结束程序。

需要注意的是，这个程序需要在8051单片机上运行，并且需要根据具体的硬件连接和使用的汇编器进行相应的调整。

DOSbox通过masm和link编写汇编语言程序实现输入一个十进制数得到它对应的二进制数，十六进制数与BCD码，其中该程序包括四个子程序，分别为“readchar读取输入的字符；convert_2 将十进制数转化为二进制数；convert_16 将十进制数转化为十六进制数；convert_BCD 将十进制数转化为BCD码”，其中三个转化结果都需要输出

这是一个很有趣的问题！下面是用MASM和LINK编写的汇编语言程序，实现输入一个十进制数并输出对应的二进制数、十六进制数和BCD码的过程：

.model small
.stack 100h

.data
    decimal db ?
    binary db 9 dup('$')
    hexa db 3 dup('$')
    bcd db 6 dup('$')
    newline db 0Dh, 0Ah, '$'
    
.code
main proc
    mov ax, @data
    mov ds, ax
    
    ; 读取输入的字符
    call readchar
    
    ; 将十进制数转化为二进制数
    mov al, decimal
    call convert_2
    mov binary, al
    
    ; 将十进制数转化为十六进制数
    mov al, decimal
    call convert_16
    mov hexa, al
    
    ; 将十进制数转化为BCD码
    mov al, decimal
    call convert_BCD
    mov bcd, al
    
    ; 输出结果
    mov ah, 09h
    mov dx, offset binary
    int 21h
    
    mov dx, offset newline
    int 21h
    
    mov dx, offset hexa
    int 21h
    
    mov dx, offset newline
    int 21h
    
    mov dx, offset bcd
    int 21h
    
    mov ah, 4Ch
    int 21h
    
main endp

; 子程序：读取输入的字符
readchar proc
    mov ah, 01h
    int 21h
    
    sub al, 30h ; 将ASCII码转化为十进制数
    
    mov decimal, al
    
    ret
readchar endp

; 子程序：将十进制数转化为二进制数
convert_2 proc
    mov bl, 2 ; 除数为2
    
    xor bh, bh
    
    mov cl, 7 ; 循环7次，处理8位二进制数
    
    mov si, 0 ; 存储结果的偏移地址
    
convert_2_loop:
    mov ah, 0 ; 清空高位字节
    
    div bl ; 除法运算
    
    add ah, 30h ; 结果转化为ASCII码
    
    mov [binary+si], ah ; 存储结果
    
    inc si
    
    loop convert_2_loop
    
    ret
convert_2 endp

; 子程序：将十进制数转化为十六进制数
convert_16 proc
    mov bl, 16 ; 除数为16
    
    xor bh, bh
    
    mov cl, 2 ; 循环2次，处理两位十六进制数
    
    mov si, 0 ; 存储结果的偏移地址
    
convert_16_loop:
    mov ah, 0 ; 清空高位字节
    
    div bl ; 除法运算
    
    cmp ah, 9 ; 判断余数是否大于9
    
    jbe convert_16_digit ; 如果余数小于等于9，直接转化为ASCII码
    add ah, 07h ; 如果余数大于9，转化为字母的ASCII码
    
convert_16_digit:
    add ah, 30h ; 结果转化为ASCII码
    
    mov [hexa+si], ah ; 存储结果
    
    inc si
    
    loop convert_16_loop
    
    ret
convert_16 endp

; 子程序：将十进制数转化为BCD码
convert_BCD proc
    xor ah, ah ; 清空高位字节
    xor si, si ; 初始化偏移地址
    
convert_BCD_loop:
    mov al, decimal ; 将十进制数复制到al
    
    aam ; 将al中的十位和个位分别存放在ah和al中
    
    add ah, 30h ; 十位转化为ASCII码
    
    mov [bcd+si], ah ; 存储十位
    
    add al, 30h ; 个位转化为ASCII码
    
    mov [bcd+si+1], al ; 存储个位
    
    add si, 2 ; 偏移地址增加2个字节
    
    cmp ah, 0 ; 判断十位是否为0
    
    jne convert_BCD_loop
    
    ret
convert_BCD endp

end main

这个程序使用DOSbox来运行，可以输入一个十进制数，然后输出对应的二进制数、十六进制数和BCD码。希望对你有帮助！