;;
;;   EMS calls from ASSEMBLY.
;;
;;  Original pascal version:  
;;         DRIVERS.PAS - Version 1.00 - By R.A.J. van Eeghem, (C) 1995
;;
;;  Assembly version by: rpd Gereffy - GyikSoft   (C) 1996/01/14.
;;


  EMSAvail DB 0             ;0, if no EMS driver installed
  EMSErrorCode DB 0,0       ;error code, use by EMSWriteError (EMSERROR.INC)
  EMSPageFrameAdress DD 0   ;pointer to EMS window
  EMSTotalPages DW 0        ;number of total pages (1 page=16kB)
  EMSFreePages DW 0         ;number of free pages

  EMSSG DW 0                ;segment of EMS window

;==============================================================================;
;  procedure	: InitEMS
;  parameters	: none
;  result	: CF=errors
;==============================================================================;
;  procedure	: GetVersion
;  parameters	: -
;  result	: AL=DECIMAL, AH=INTEGER  PART  (AX=0 -> ERROR!), CF=error 
;==============================================================================;
;  function	: AllocEMS
;  parameters	: BX=numpages   (1 page = 16 KB)
;  result	: DX=handle, CF=errors
;==============================================================================;
;  function	: FreeEMS
;  parameters	: DX=handle
;  result	: CF=error
;==============================================================================;
;  function	: MapEMS
;  parameters	: AL=destPage, BX=srcPage, DX=handle
;  result	: CF=error
;==============================================================================;
;  function	: EMSGetFreePages
;  parameters	: none
;  result	: BX=freePages,  CF=error
;==============================================================================;
;  function	: EMSGetHandlePages
;  parameters	: DX=handle
;  result	: BX=number of pages,  CF=error
;==============================================================================;


