...某个字存储单元格数据中1的个数,以十进制形式显示结果
发布网友
发布时间：2024-10-14 01:41
共2个回答
热心网友
时间：2024-10-26 15:35
Code Segment
Assume CS:Code,DS:Code
; －－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
; 功能：把AX中的二进制无符号数转换成显式的十进制ASCII码，并送显示屏显示
; 入口：AX=二进制数
; 出口：在当前光标位置显示转换后的ASCII码数字
Dec_ASCII Proc Near
push dx
push bx
push di
mov bx,10
lea di,@@Temp_Save[6]
mov byte ptr [di],'$'
dec di
cld
@@Divide: xor dx,dx
div bx
or dl,30h
mov [di],dl
dec di
test ax,0ffffh
jnz @@Divide
inc di
push di
pop dx
mov ah,9
int 21h
pop di
pop bx
pop dx
ret
@@Temp_Save db 7 dup(?)
Dec_ASCII EndP
; －－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
Start: push cs
pop ds
lea bx,Exit_Proc ;取标号Exit_Proc地址
shr bx,1 ;除以2
mov bx,[bx] ;取指定位置的字数据
mov cx,16 ;字数据，16位
xor ax,ax ;计数器置0，准备计数
clc ;进位标志位复位
@@Counting: shl bx,1 ;左移1位
jnc $+3 ;没有进位，下次循环
inc ax ;有进位，计数
loop @@Counting
call Dec_ASCII ;把AX中的二进制无符号数转换成显式的十进制ASCII码，并送显示屏显示
Exit_Proc: mov ah,4ch ;结束程序
int 21h
Code ENDS
END Start ;编译到此结束
热心网友
时间：2024-10-26 15:34
