stseg segment para stack
db 64 dup('0');
sttop label word
stseg ends
dtseg segment
mess1 db 'AX > BX',0dh,0ah,'$'
mess2 db 'AX <= BX',0dh,0ah,'$'
dtseg ends
cdseg segment
main proc far
assume cs:cdseg,es:dtseg,ds:dtseg,ss:stseg
mov ax,dtseg
mov ds,ax
mov ax,stseg
mov ss,ax
lea sp,sttop
;----------------------------------
mov ax,80
mov bx,80
cmp ax,bx
jle ELSE_IF
lea dx,mess1 ;AX > BX
mov ah,9
int 21h
JMP END_IF
ELSE_IF:
lea dx,mess2 ;AX < BX
mov ah,9
int 21h
END_IF:
;----------------------------------
mov ah,4ch
int 21h
main endp
cdseg ends
end main
ไม่มีความคิดเห็น:
แสดงความคิดเห็น