home *** CD-ROM | disk | FTP | other *** search
/ Club Amiga de Montreal - CAM / CAM_CD_1.iso / files / 365.lha / Batchman_v1.1 / Code / DosStuff.def < prev    next >
Encoding:
Modula Definition  |  1990-04-11  |  758 b   |  26 lines
  1. (* Copyright 1988 Michal Todorovic *)
  2. (* For non-commercial use only.    *)
  3.  
  4. DEFINITION MODULE DosStuff;
  5.  
  6. CONST
  7.   MaxGadgets = 44; (* Number of Gadgets.  Reduce this 
  8.                       to the maximum number of gadgets you
  9.                       need.  If you use a screen of higher
  10.                       resolution than 640 by 200, then you 
  11.                       can raise this number by 4 for every 
  12.                       extra 15 pixels above 200 *)
  13.  
  14.  
  15.  
  16. TYPE
  17.   LongString  = ARRAY [0..100] OF CHAR;
  18.   ShortString = ARRAY [0..15] OF CHAR;
  19.  
  20. PROCEDURE GetInfo(VAR Paths : ARRAY OF LongString; 
  21.                   VAR Name  : ARRAY OF ShortString;
  22.                   VAR Memory: ARRAY OF CHAR; 
  23.                   VAR Num : CARDINAL) : BOOLEAN;
  24.  
  25. END DosStuff.
  26.