t19.asm

来自「关于8086汇编程序的编写」· 汇编 代码 · 共 35 行

stack segment stack'stack'
      dw 32 dup(?)
stack ends
data segment
data ends
code segment
begin proc far
assume ss:stack,cs:code,ds:data
push ds
sub ax,ax
push ax
mov ax,data
mov ds,ax
MOV DX,0B863H
MOV AL,89H
OUT DX,AL

AG:MOV DX,0B862H
IN AL,DX
TEST AL,80H
JZ SAME
NEG AL
OR AL,80H
SAME:NOT AL
MOV DX,0B801H
OUT DX,AL
MOV AH,11
INT 21H
CMP AL,0
JE AG
ret
begin endp
code ends
end begin