qdq.asm

来自「微机原理——接口应用编程源码」· 汇编 代码 · 共 57 行

stack segment stack
 dw 64 dup(?)
stack ends
data segment
data ends
code segment
  assume cs:code,ds:data
start: mov ax,data
  mov ds,ax
  mov dx,63h
  mov ax,89h
  out dx,al
  
lp:mov dx,62h
  in  al,dx
  mov ah,al
  cmp al,07H
  jz x1
  cmp al,0BH
  jz x2
  cmp al,0DH
  jz x3
  cmp al,0EH
  jz x4
  cmp al,0FH
  jz lp
  jmp exit
x1:mov dx,61h
   mov al,06H
   out dx,al
   mov al,ah
   mov dx,60h
   out dx,al
x2:mov dx,61h
   mov al,5BH
   out dx,al
   mov al,ah
   mov dx,60h
   out dx,al
x3:mov dx,61h
   mov al,4FH
   out dx,al
   mov al,ah
   mov dx,60h
   out dx,al
x4:mov dx,61h
   mov al,66H
   out dx,al
   mov al,ah
   mov dx,60h
   out dx,al
exit:mov ax,4C00H
   int 21h
code ends
  end start