{ Include filename: REGISTER.SEC } { These are the different data registers used for MSDOS interrupts } Type __Regs = Record case Integer of 1: (AX,BX,CX,DX,BP,SI,DI,DS,ES,Flags : INTEGER); 2: (AL,AH,BL,BH,CL,CH,DL,DH : Byte); end; Var __Registers : __Regs;