home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / CLIPPER / MISC / TASKING.ZIP / BIOSKEYB.DEF next >
Encoding:
Modula Definition  |  1986-07-22  |  387 b   |  10 lines
  1. DEFINITION MODULE BIOSKeyboard;
  2.   EXPORT QUALIFIED Status, Read, Check, GetStatus;
  3.   TYPE
  4.     Status = SET OF (RightShift, LeftShift, CtlShift, AltShift, ScrollState,
  5.                      NumState, CapsState, InsState);
  6.   PROCEDURE Read(VAR ch, scan: CHAR);
  7.   PROCEDURE Check(VAR ch, scan: CHAR; VAR avail: BOOLEAN);
  8.   PROCEDURE GetStatus(VAR stat: Status);
  9.   END BIOSKeyboard.
  10.