home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD1.mdf / assemblr / library / sampler0 / kbtest.asm < prev    next >
Assembly Source File  |  1987-05-26  |  810b  |  46 lines
  1. CSEG    SEGMENT PARA PUBLIC 'CODE'        ;Start CODE segment
  2.     ASSUME    CS:CSEG,DS:CSEG,ES:CSEG,SS:CSEG    ;Set by DOS Loader
  3.         ORG    100H            ;COM file format
  4.  
  5. ENTPT:        JMP    MAIN
  6.  
  7. SUPPORT_MSG    DB    "This BIOS supports extended keys$"
  8. NO_SUP_MSG    DB    "This BIOS does not support extended keys$"
  9.  
  10. MAIN    PROC    NEAR
  11.  
  12.         XOR    AX,AX
  13.         MOV    ES,AX
  14.     ASSUME    ES:NOTHING
  15.  
  16.         MOV    DX,OFFSET NO_SUP_MSG
  17.         MOV    AH,12H
  18.         INT    16H
  19.         CMP    AL,BYTE PTR ES:[417H]
  20.         JNE    NO_SUPPORT
  21.  
  22.         XOR    BYTE PTR ES:[417H],80H
  23.         MOV    AH,12H
  24.         INT    16H
  25.         CMP    AL,BYTE PTR ES:[417H]
  26.         JNE    NO_SUPPORT
  27.  
  28.         MOV    DX,OFFSET SUPPORT_MSG
  29. NO_SUPPORT:
  30.         XOR    BYTE PTR ES:[417H],80H
  31.         MOV    AH,9
  32.         INT    21H
  33.  
  34.         MOV    AH,4CH            ;Terminate program
  35.         INT    21H            ;Thru DOS
  36. MAIN    ENDP
  37. CSEG    ENDS
  38.  
  39.     IF1
  40. %OUT    Pass 1 Complete
  41.     ELSE
  42. %OUT    Pass 2 Complete
  43.     ENDIF
  44.  
  45.     END    ENTPT
  46.