home *** CD-ROM | disk | FTP | other *** search
/ Piper's Pit BBS/FTP: ibm 0020 - 0029 / ibm0020-0029 / ibm0028.tar / ibm0028 / GRLF-C-2.ZIP / GFUNC / GETEXMEM.ASM < prev    next >
Encoding:
Assembly Source File  |  1990-05-30  |  804 b   |  48 lines
  1. ;/*
  2. ;** getexmem.asm
  3. ;** contains: getexmem()
  4. ;*/
  5.  
  6. SYSSERVICE    equ    015h            ;System Service Software Interrupt
  7. GETEXTMEM    equ    088h            ;Extended Memory Size Determine
  8.  
  9.  
  10.         include model.h
  11.         include prologue.h
  12.  
  13.         pseg pgetexmem
  14.  
  15.  
  16. ;/*
  17. ;**  unsigned 
  18. ;** getexmem(void)
  19. ;**
  20. ;** ARGUMENT(s)
  21. ;**  none
  22. ;**
  23. ;** DESCRIPTION
  24. ;**  Determine memory above 100000h
  25. ;**
  26. ;**
  27. ;** RETURNS
  28. ;**  Number of 1K (1024) blocks of memory available beginning at
  29. ;**  address 100000h.
  30. ;**
  31. ;** AUTHOR
  32. ;**  ""   Tue 15-Nov-1988    14:05:40
  33. ;**   Copyright (C)1988-1990 Greenleaf Software Inc. All Rights Reserved.
  34. ;**
  35. ;** MODIFICATIONS
  36. ;**
  37. ;*/
  38.         cproc    getexmem
  39.         mov    ah,GETEXTMEM
  40.         int    SYSSERVICE
  41.         jnc    funcsupported
  42.         xor    ax,ax            ;say 0 if not supported
  43. funcsupported:
  44.         cproce
  45.  
  46.         endps
  47.         end
  48.