;仰面刺破云霞，留下一道久巴。。
;流星吻月。。
stck segment stack
db 19 dup(0)
stck ends

data segment
anedr = this word
Aa db 'a',0eh
boryebe = this word
bB db 0e2h,90h
data ends

code segment
assume cs:code,ds:data,ss:stck
start:
mov ax,data
mov ds,ax

mov ax,word ptr Aa
push ax

pop word ptr bB
mov dx,word ptr bB

mov ah,2
int 21h

mov ah,4ch
int 21h
code ends
end start