home *** CD-ROM | disk | FTP | other *** search
/ Oakland CPM Archive / oakcpm.iso / sigm / vol131 / charin.src < prev    next >
Encoding:
Text File  |  1984-04-29  |  717 b   |  30 lines
  1. ;**********************************************************************
  2.  
  3. *                     CHARIN
  4.  
  5. ;**********************************************************************
  6.  
  7.                      NAME CHARIN
  8.                      ENTRY CHARIN
  9.  
  10.  
  11. ;FUNCTION: Reads the console,returns with an ASCII code in A.
  12.  
  13. RCONS equ 1    ;BIOS function code for 'read console'
  14. BIOS  equ 5    ;address of BIOS
  15.  
  16. CHARIN:           push h
  17.                   push d
  18.                   push b
  19.                   mvi c,RCONS 
  20.                   call BIOS
  21.                   pop b
  22.                   pop d
  23.                   pop h
  24.                   ret
  25.  
  26.                   END CHARIN
  27.  
  28.  
  29. ;************************************************************
  30.