home *** CD-ROM | disk | FTP | other *** search
/ Turbo Toolbox / Turbo_Toolbox.iso / 1989 / 09 / praxis / diagnose.def < prev    next >
Encoding:
Modula Definition  |  1989-07-13  |  729 b   |  24 lines
  1. (******************************************************)
  2. (*                    DIAGNOSE.DEF                    *)
  3. (*      Hardware-Diagnose-Tools für Fitted Modula     *)
  4. (*           (C) 1989 M.Rother & TOOLBOX              *)
  5.  
  6. DEFINITION MODULE Diagnose;
  7.  
  8.   FROM SYSTEM IMPORT ASSEMBLER;
  9.  
  10.   TYPE Modus = (Farbe, Mono, Unbekannt);
  11.  
  12.   VAR AT : BOOLEAN;
  13.  
  14.   PROCEDURE DiskSize(Laufwerk : INTEGER) : LONGCARD;
  15.   PROCEDURE DiskFree(Laufwerk : INTEGER) : LONGCARD;
  16.   PROCEDURE DosVersion(VAR Hoch, Tief : CARDINAL);
  17.   PROCEDURE DosMemory() : CARDINAL;
  18.   PROCEDURE ExtendedMemory() : CARDINAL;
  19.   PROCEDURE Ist_AT() : BOOLEAN;
  20.   PROCEDURE CoProzessor() : BOOLEAN;
  21.   PROCEDURE VideoModus() : Modus;
  22.  
  23. END Diagnose.
  24.