EMS() detect NOEMS with EMM386.exe                      

                      For Summer'87 and Clipper 5.0X

sign in memory    Dos version   Code in EMS.CH           Explanation
     -                -           INT_ERROR         ft_int86 error code
     -                -            NO_EMM           Driver 'emm386.exe' off
 EMMXXXX0           >= 5.0         OK_EMM           Driver on
 $MMXXXX0           >= 5.0       NOEMS_NOVCPI       Memory not available,
                                                    detected by Clipper
 EMMQXXX0           >= 6.0          NOEMS           Memory not available,
                                                    not detected by Clipper
                                                    =>       BUG !!!

If you wish to use the EMS function, i advise you to test the driver state 
at the very beginning of your application before the bug appears...

Example :

#include "ems.ch"  
  IF EMS() == NOEMS
    ? "Problem with the driver EMM386.exe"
    ? "See the program's documentation"
    QUIT
ENDIF

Solutions to fix the bug :
  - Buy the version > 5.0 of Clipper !!!
  or 
  - Add the NOVCPI parameter to the driver line
  or
  - write the following flag : ClipPrg.exe //E=0
  or
  - write this flag directly during the links edition with Blinker
  or 
  - take the parameter NOEMS off the driver.


If you enjoy having and using this program, please let me now,
I'll be good to know so !!!

                        Philippe BONNARDEL
                        27, Bd de VERDUN
                        92400 COURBEVOIE
                        FRANCE