home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 7 / 07.iso / c / c011 / 1.ddi / CLIPPER / FXVE_C.C < prev   
Encoding:
C/C++ Source or Header  |  1989-06-01  |  1.2 KB  |  52 lines
  1. /* fxVE_c.C                                                                 */
  2. /* Copyright (c) Genus Microprogramming, Inc. 1988-89  All Rights Reserved. */
  3.  
  4. /****************************************************************************
  5.  
  6.   This file provides the Clipper interface to PCX Effects.             
  7.   It makes calls to the PCX LARGE model C library.
  8.  
  9.  
  10.   NOTE: Compile as "CL /c /W3 /AL /Zl /Oalt /FPa /Gs fxVE_c.C"
  11.         as per the Clipper documentation for the EXTEND system
  12.  
  13.   Microsoft C version 5.1                 Programmer: Chris Howard  5/08/89
  14.  
  15. *****************************************************************************/
  16.  
  17. #include <stdio.h>
  18.  
  19. #include "..\h\nandef.h"
  20. #include "..\h\extend.h"
  21. #include "..\h\pcxlib.h"
  22. #include "..\h\fxlib.h"
  23. #include "..\h\fxclip.h"
  24.  
  25. /**********/
  26.  
  27. CLIPPER fxVE()
  28.  
  29. /*
  30.  * retcode = fxVirtualEffect(long vptr, int x,y,dir)
  31.  *
  32.  */
  33.  
  34. {
  35.   int  retcode;
  36.  
  37.   /* Verify parameters */
  38.   if (PCOUNT == 4) {
  39.     /* Pass call on to toolkit */
  40.     retcode = fxVirtualEffect(*((long *)_parc(1)),_parni(2),_parni(3),_parni(4));
  41.   }
  42.   else {
  43.     /* Error in parameter list */
  44.     retcode = fxERR_CLIPPARM;
  45.   }
  46.  
  47.   /* Return code to Clipper */
  48.   _retni(retcode);
  49.  
  50. } /* end of fxVE */
  51.  
  52.