home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / OS2BAS.ZIP / GPITRANS.BI < prev    next >
Text File  |  1989-08-20  |  3KB  |  94 lines
  1. '**************************************************************
  2. '*
  3. '* Include File: GpiTrans.BI
  4. '*
  5. '* Requires:     PMBase.BI (RECTL type)
  6. '*               OS2Def.BI (POINTL type)
  7. '*
  8. '* Description:  Transformation Matrices
  9. '*
  10. '**************************************************************
  11.  
  12. '  co-ordinates space for GpiConvert
  13. CONST  CVTCWORLD      =    1
  14. CONST  CVTCMODEL      =    2
  15. CONST  CVTCDEFAULTPAGE      =    3
  16. CONST  CVTCPAGE       =    4
  17. CONST  CVTCDEVICE      =    5
  18.  
  19. '  type of transformation for GpiSetSegmentTransformMatrix
  20. CONST  TRANSFORMREPLACE    =   0
  21. CONST  TRANSFORMADD       =   1
  22. CONST  TRANSFORMPREEMPT    =   2
  23.  
  24. '  transform matrix
  25. TYPE MATRIXLF       '  matlf
  26.     fxM11 AS LONG
  27.     fxM12 AS LONG
  28.     lM13 AS LONG
  29.     fxM21 AS LONG
  30.     fxM22 AS LONG
  31.     lM23 AS LONG
  32.     lM31 AS LONG
  33.     lM32 AS LONG
  34.     lM33 AS LONG
  35. END TYPE
  36.  
  37. ' ** transform and transform conversion functions
  38. DECLARE FUNCTION GpiQuerySegmentTransformMatrix%( BYVAL HPS AS LONG,_
  39.                           BYVAL ALONG AS LONG,_
  40.                           BYVAL BLONG AS LONG,_
  41.                           BYVAL PMATRIXLF AS LONG )
  42.  
  43. DECLARE FUNCTION GpiSetSegmentTransformMatrix%( BYVAL HPS AS LONG,_
  44.                         BYVAL ALONG AS LONG,_
  45.                         BYVAL BLONG AS LONG,_
  46.                         BYVAL PMATRIXLF AS LONG,_
  47.                         BYVAL CLONG AS LONG )
  48.  
  49. DECLARE FUNCTION GpiConvert%( BYVAL HPS AS LONG,_
  50.                   BYVAL ALONG AS LONG,_
  51.                   BYVAL BLONG AS LONG,_
  52.                   BYVAL CLONG AS LONG,_
  53.                   BYVAL PPOINTL AS LONG )
  54.  
  55. DECLARE FUNCTION GpiQueryModelTransformMatrix%( BYVAL HPS AS LONG,_
  56.                         BYVAL ALONG AS LONG,_
  57.                         BYVAL PMATRIXLF AS LONG )
  58.  
  59. DECLARE FUNCTION GpiSetModelTransformMatrix%( BYVAL HPS AS LONG,_
  60.                           BYVAL ALONG AS LONG,_
  61.                           BYVAL PMATRIXLF AS LONG,_
  62.                           BYVAL BLONG AS LONG )
  63.  
  64. DECLARE FUNCTION GpiCallSegmentMatrix&( BYVAL HPS AS LONG,_
  65.                     BYVAL ALONG AS LONG,_
  66.                     BYVAL BLONG AS LONG,_
  67.                     BYVAL PMATRIXLF AS LONG,_
  68.                     BYVAL CLONG AS LONG )
  69.  
  70. DECLARE FUNCTION GpiQueryDefaultViewMatrix%( BYVAL HPS AS LONG,_
  71.                          BYVAL ALONG AS LONG,_
  72.                          BYVAL PMATRIXLF AS LONG )
  73.  
  74. DECLARE FUNCTION GpiSetDefaultViewMatrix%( BYVAL HPS AS LONG,_
  75.                        BYVAL ALONG AS LONG,_
  76.                        BYVAL PMATRIXLF AS LONG,_
  77.                        BYVAL BLONG AS LONG )
  78.  
  79. DECLARE FUNCTION GpiQueryPageViewport%( BYVAL HPS AS LONG,_
  80.                     BYVAL PRECTL AS LONG )
  81.  
  82. DECLARE FUNCTION GpiSetPageViewport%( BYVAL HPS AS LONG,_
  83.                       BYVAL PRECTL AS LONG )
  84.  
  85. DECLARE FUNCTION GpiQueryViewingTransformMatrix%( BYVAL HPS AS LONG,_
  86.                           BYVAL ALONG AS LONG,_
  87.                           BYVAL PMATRIXLF AS LONG )
  88.  
  89. DECLARE FUNCTION GpiSetViewingTransformMatrix%( BYVAL HPS AS LONG,_
  90.                         BYVAL ALONG AS LONG,_
  91.                         BYVAL PMATRIXLF AS LONG,_
  92.                         BYVAL BLONG AS LONG )
  93.  
  94.