home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 7 / 07.iso / c / c011 / 3.ddi / INCS / FXLIB.PRG < prev   
Encoding:
Text File  |  1989-06-01  |  3.8 KB  |  78 lines
  1. * fxLib.PRG                                                                 *
  2. * Copyright (c) Genus Microprogramming, Inc. 1988-89  All Rights Reserved.  *
  3.  
  4. *****************************************************************************
  5. *                                                                           *
  6. * Function declarations for PCX Effects, for Clipper.                       *
  7. *                                                                           *
  8. *                                                                           *
  9. *                                                                           *
  10. * Clipper Summer '87                      Programmer: Chris Howard  5/08/89 *
  11. *                                                                           *
  12. *****************************************************************************
  13.  
  14. PROCEDURE fxInit                            && Init F/X Clipper constants
  15.  
  16. * Effects
  17. PUBLIC               fxMINEFFECT,fxWIPE,fxSPLIT,fxCRUSH,fxSLIDE
  18. PUBLIC               fxSAND,fxDRIP,fxEXPLODE,fxDIAGONAL,fxSPIRAL
  19. PUBLIC               fxRANDOM,fxMAXEFFECT
  20. fxMINEFFECT          = 0
  21. fxWIPE               = 0                    && Wipe    
  22. fxSPLIT              = 1                    && Split   
  23. fxCRUSH              = 2                    && Crush   
  24. fxSLIDE              = 3                    && Slide   
  25. fxSAND               = 4                    && Sand    
  26. fxDRIP               = 5                    && Drip    
  27. fxEXPLODE            = 6                    && Explode 
  28. fxDIAGONAL           = 7                    && Spiral  
  29. fxSPIRAL             = 8                    && Diagonal
  30. fxRANDOM             = 9                    && Random  
  31. fxMAXEFFECT          = 9
  32.  
  33.  
  34. * Palette
  35. PUBLIC               fxFADEOUT,fxFADEIN
  36. fxFADEOUT            = 1000                 && Fade out  
  37. fxFADEIN             = 1001                 && Fade in   
  38.  
  39. * Directions
  40. PUBLIC               fxNONE,fxLEFT,fxRIGHT,fxUP,fxDOWN,fxHORIZ,fxVERT
  41. PUBLIC               fxOUT,fxIN
  42. fxNONE               = 0                    && Left      
  43. fxLEFT               = 1                    && Left      
  44. fxRIGHT              = 2                    && Right     
  45. fxUP                 = 4                    && Up        
  46. fxDOWN               = 8                    && Down      
  47. fxHORIZ              = 1                    && Horizontal
  48. fxVERT               = 2                    && Vertical  
  49. fxOUT                = 1                    && OUT       
  50. fxIN                 = 2                    && In        
  51.                                             
  52. * Grain 
  53. PUBLIC               fxMINGRAIN,fxMAXGRAIN
  54. fxMINGRAIN           = 2                    && Minimum grain
  55. fxMAXGRAIN           = 64                   && Maximum grain
  56.                                             
  57. * Delay                                    
  58. PUBLIC               fxMINDELAY,fxMAXDELAY
  59. fxMINDELAY           = 0                    && Minimum delay
  60. fxMAXDELAY           = 500                  && Maximum delay
  61.  
  62. * Miscellaneous
  63. PUBLIC               fxTRUE,fxFALSE,fxON,fxOFF
  64. fxTRUE               = 1                    && True
  65. fxFALSE              = 0                    && False
  66. fxON                 = fxTRUE               && On
  67. fxOFF                = fxOFF                && Off
  68.  
  69. * Error codes 
  70. PUBLIC               fxSUCCESS,fxE_ESCAPE,fxE_BADEFFECT
  71. PUBLIC               fxE_BADGRAIN,fxE_BADDELAY
  72. fxSUCCESS            = pcxSUCCESS           && Successful                
  73. fxE_ESCAPE           = pcxE_ESCAPE          && Escape key was pressed    
  74. fxE_BADEFFECT        = -1000                && Effect not defined/invalid
  75. fxE_BADGRAIN         = -1001                && Grain  not defined/invalid
  76. fxE_BADDELAY         = -1002                && Delay  not defined/invalid
  77.  
  78.