计科《汇编语言程序设计》 - 实验指导书(6)

data segment

X

db 12h,34h

data ends stack segment stack

Y

dw 100 dup(?)

stack ends code segment

assume cs:code,ds:data,ss:stack main proc far start: push ds sub ax,ax push ax

mov ax,data mov ds,ax

mov si,0

mov cx,2 next: mov al,X[si] mov ah,al push cx mov cl,4 shr ah,cl and al,0fh push ax mov bp,sp call disp call crlf

inc si pop cx pop cx

loop

next

ret main endp disp

proc near mov

dx,[bp]

;定义数据段

;定义堆栈段

; 程序结束，返回操作系统

;数据段初始化

; 将压缩的BCD码数分解到AX寄存器中

; 通过堆栈传送数据 ; 输出BCD码数据

; 输出回车换行

; 取参数