偶数以十六进制显示.asm

大学时学汇编做的一些小实验

dseg segment 
sum dw ? 
tab db '0123456789ABCDEF' 
dseg ends 

cseg segment 
assume cs:cseg,ds:dseg 
begin: mov ax,dseg 
mov ds,ax 
xor ax,ax 
mov cx,100 
again: add ax,cx 
sub cx,2 
jnz again 
mov sum,ax 
;以上是求和，并存到sum单元 

mov bx,offset tab 
mov dh,4 
mov cl,4 
next: rol ax,cl 
push ax 
and ax,0fh 
xlat 
mov dl,al 
mov ah,2 
int 21h 
pop ax 
dec dh 
jnz next 
mov dl,'H' 
mov ah,2 
int 21h 
;以上是以十六进制显示，思想是分离出四位，查表转换成ASCII码，并用2号功能显示，循环4次。最后输出后缀H 
mov ah,4ch 
int 21h 
cseg ends 
end begin