Click above to get retro games delivered to your door ever month!

 ISEGA()
 Determines if an EGA card is present or can be emulated
------------------------------------------------------------------------------
 Syntax

     ISEGA([<lMode>]) --> lEGA

     Important!  Contains <lMode>, an additional optional parameter over
     and above the original CA-Clipper Tools.

 Argument

     <lMode>  When designated as .T., determines if an EGA card is
     present.  The default value of .F. tests to see if an EGA adapter can be
     emulated.

 Returns

     In conjunction with the <lMode> parameter, ISEGA() returns .T. when an
     EGA card is present or an EGA adapter can be emulated.

 Description

     This function determines two things.  When <lMode>  is designated as .F.
     or the function is called without a parameter, ISEGA() determines if an
     EGA adapter can be emulated.  This could be the case with a VGA card.
     When <lMode> is .T.,  it determines if an EGA card present.

 Note

     .  Use GETMODE() to determine the active mode.

 Example

     Can EGA be emulated?

     If ISEGA()
        * ...
     ENDIF
     EGA card?
     IF ISEGA(.T.)
        * ...
     ENDIF