home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / PASCAL / CONCUR.ZIP / BIOSDEC.PAS next >
Encoding:
Pascal/Delphi Source File  |  1986-05-23  |  879 b   |  30 lines
  1.  
  2. (**************************************************************
  3.  
  4.   BIOSDEC.PAS   : INCLUDE FILE FOR BIOSCALLS
  5.  
  6.   AUTHOR        : J.F.J. PASSANT
  7.   VERSION       : 1.0
  8.   DATE          : 25-APR-86
  9.  
  10.   UPDATE        :
  11.   MODIFICATION  :
  12.  
  13.   FUNCTION      : DECLARES THE REGISTER TYPES USED
  14.                   IN BIOS-CALLS OR DOS-CALLS
  15.  
  16. ***************************************************************)
  17.  
  18. type  cpuflags  = (carry, dum1, parity, dum2, auxcarry, dum3, zero, sign,
  19.                    trap, interrupt, direction, overflow);
  20.  
  21.       flagregister = set of cpuflags;
  22.  
  23.       registers = record
  24.                     case boolean of
  25.                     false : (AX, BX, CX, DX, BP, SI, DI, DS, ES : integer;
  26.                              FLAGS : flagregister);
  27.                     true  : (AL, AH, BL, BH, CL, CH, DL, DH : byte);
  28.                   end;
  29.  
  30.