home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Pascal / MAXONPASCAL3.DMS / in.adf / DEMOS-OS1.3 / Memory.p < prev    next >
Encoding:
Text File  |  1994-07-23  |  299 b   |  11 lines
  1. { MaxonPascal3-Anpassung / Test:  Falk Zühlsdorff (PackMAN) 1994 }
  2.  
  3. PROGRAM MemoryDemo;
  4. USES Exec;
  5. BEGIN
  6.  writeln('Chipmem: ',AvailMem(MEMF_CHIP):10);
  7.  writeln('FastMem: ',AvailMem(MEMF_FAST):10);
  8.  writeln('Total:   ',AvailMem(MEMF_TOTAL):10);
  9.  writeln('Largest: ',AvailMem(MEMF_LARGEST):10); 
  10. END.
  11.