fangbo.asm

微机原理——接口应用编程源码

STACK SEGMENT STACK
DW 64 DUP(?)
STACK ENDS
CODE SEGMENT
ASSUME CS:CODE
START: MOV DX,63H
       MOV AL,90H
       OUT DX,AL
       MOV DX,43H
       MOV AL,0B6H
       OUT DX,AL
D:     MOV DX,60H
      IN AL,DX
  ;   AND AL,07H
   CMP AL,05H
   JE B
   CMP AL,06H
   JE A
   CMP AL,03H
   JE C
    
   JMP D
  A: MOV AX,0134H
   INT 10H 
  MOV DX,42H
  MOV AL,69H
  OUT DX,AL
  MOV AL,2DH
  OUT DX,AL
E:MOV DX,60H
  IN AL,DX
  CMP AL,06H
  JE E
  CMP AL,07H
JE D 
  B:  MOV AX,0135H
     INT 10H
   MOV DX,42H
   MOV AL,8AH
   OUT DX,AL
   MOV AL,04H
   OUT DX,AL
F:  MOV DX,60H
    IN AL,DX
    CMP AL,05H
    JE F
;    CMP AL,07H
    JE D

C: MOV AX,0136H
   INT 10H
   MOV DX,42H
   MOV AL,74H
   OUT DX,AL
   MOV AL,08H
   OUT DX,AL
G:  MOV DX,60H
    IN AL,DX
    CMP AL,03H
    JE G
; CMP AL,07H
 JE D
CODE ENDS
      END START