stack segment stack \'stack\'
dw 32 dup(0)
stack ends
data segment
N1 db 56h
N2 db 34h
N3 dw 2 dup(0)
data ends
code segment
start proc far
assume ss:stack,cs:code,ds:data
push ds
sub ax,ax
push ax
mov ax,data
mov ds,ax
mov ah,N1
and ah,0f0h
mov al,N2
and al,0fh
or ah,al
mov al,ah
mov cl,4
shr ah,cl
add ah,30h
and al,0fh
add al,30h
xor bx,bx
xchg ah,al
mov N3[bx],ax
mov N3[bx 2],\'$h\'
mov dx,offset N3
mov ah,9
int 21h
ret
start endp
code ends
end start
|
