zxl.asm

好东西！！自家漫漫的研究

CODE SEGMENT              
ASSUME CS:CODE
START:MOV  DL,'?'
      MOV  AH, 02        
      INT  21H              
      MOV  AH, 01   
      INT  21H
      MOV  BL, AL
      SUB  BL, 30h           
      MOV  DL,'-' 
      MOV  AH, 02
      INT  21H
      MOV  AH, 01
      INT  21H               
      SUB  AL, 30H          
      MOV  DH, AL
      MOV  DL,'='
      MOV  AH, 02
      INT  21H               
      MOV  AL, DH
      SUB  BL,AL
      TEST BL,80H
      JNZ  S
      MOV  DL,'0'
      MOV  AH,02
      INT  21H
      MOV  DL,BL
      ADD  DL,30H
      MOV  AH,02
      INT  21H
      JMP  L
    S:MOV  DL,'-'
      MOV  AH,02
      INT  21H
      MOV  DL,BL
      XOR  DL,0FFH      
      ADD  DL,1H
      ADD  DL,30H
      MOV  AH,02
      INT  21H
      JMP  L
    L:MOV  DL,0DH
      INT  21H             
      MOV  DL,0AH
      INT  21H
      MOV  AH,4CH
      INT  21H
CODE   ENDS
END  START