home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 5 / 05.iso / a / a013 / 1.ddi / SOURCE.EXE / FULLKEY.ASM < prev    next >
Encoding:
Assembly Source File  |  1991-01-25  |  862 b   |  26 lines
  1. ; ---------------------------------------------------------------
  2. ; FULLKEY --- Returns numeric scan code and ASCII value for a key
  3. ; ---------------------------------------------------------------
  4. ; Copyright(c)  1988-1990 - James Occhiogrosso
  5. ;
  6.  
  7. INCLUDE DEVELOP.MAC      ; Include Developer's Library Macro file
  8.  
  9. PUBLIC   FULLKEY                ; Declare public function
  10. EXTRN    __RETNI:FAR            ; Return numeric integer
  11.  
  12. CODESEG  SEGMENT 'CODE'
  13.          ASSUME CS:CODESEG
  14.  
  15. FULLKEY  PROC FAR
  16.  
  17.          MOV AX, 0              ; Read Character DOS function
  18.          INT 16h                ; Keyboard I/O ROM call
  19.          RET_INT                ; Return integer key value
  20.  
  21. FULLKEY  ENDP                   ; End of procedure
  22. CODESEG  ENDS                   ; End of code segment
  23.  
  24.          END                    ; End of assembly
  25.  
  26.