home *** CD-ROM | disk | FTP | other *** search
/ RISC DISC 1 / RISC_DISC_1.iso / pd_share / code / desklib / Libraries / Kbd / s / GET next >
Encoding:
Text File  |  1993-07-23  |  450 b   |  22 lines

  1. ; Author:  Copyright 1993 Jason Williams
  2. ; Version: 1.00 (24 Jul 1993)
  3.  
  4. ; int Kbd_GET(void)
  5. ; (OS_ReadC veneer)
  6. ; returns the ASCII code of the next pressed (buffered) key (as in BASIC's GET)
  7.  
  8.  
  9.         GET     h.regdefs
  10.         GET     h.swinos
  11.         GET     h.macros
  12.         
  13.         
  14.         PREAMBLE
  15.         STARTCODE Kbd_GET
  16.         
  17.         STMFD  sp!, {lr}
  18.         SWI    SWI_OS_ReadC + XOS_Bit
  19.         LDMFD  sp!, {pc}^
  20.         
  21.         END
  22.