home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / OS2BAS.ZIP / GPIMARK.BI < prev    next >
Text File  |  1989-07-25  |  1KB  |  50 lines
  1. '**************************************************************
  2. '*
  3. '* Include File: GpiMark.BI
  4. '*
  5. '* Requires:     OS2Def.BI (POINTL type)
  6. '*               GpiLine.BI (SIZEF type)
  7. '*
  8. '* Description:  Marker controls
  9. '*
  10. '**************************************************************
  11.  
  12. '  basic marker symbols
  13. CONST  MARKSYMERROR      =    -1
  14. CONST  MARKSYMDEFAULT      =    0
  15. CONST  MARKSYMCROSS      =    1
  16. CONST  MARKSYMPLUS      =    2
  17. CONST  MARKSYMDIAMOND      =    3
  18. CONST  MARKSYMSQUARE      =    4
  19. CONST  MARKSYMSIXPOINTSTAR  =  5
  20. CONST  MARKSYMEIGHTPOINTSTAR = 6
  21. CONST  MARKSYMSOLIDDIAMOND  =  7
  22. CONST  MARKSYMSOLIDSQUARE   =  8
  23. CONST  MARKSYMDOT        =  9
  24. CONST  MARKSYMSMALLCIRCLE   =  10
  25. CONST  MARKSYMBLANK        =  64
  26.  
  27. ' ** marker primitive functions
  28. DECLARE FUNCTION  GpiSetMarkerSet%( BYVAL HPS AS LONG,_
  29.                     BYVAL ALONG AS LONG )
  30.  
  31. DECLARE FUNCTION  GpiQueryMarkerSet&( BYVAL HPS AS LONG )
  32.  
  33. DECLARE FUNCTION  GpiSetMarker%( BYVAL HPS AS LONG,_
  34.                  BYVAL ALONG AS LONG )
  35.  
  36. DECLARE FUNCTION  GpiQueryMarker&( BYVAL HPS AS LONG )
  37.  
  38. DECLARE FUNCTION GpiSetMarkerBox%( BYVAL HPS AS LONG,_
  39.                    BYVAL PSIZEF AS LONG)
  40.  
  41. DECLARE FUNCTION GpiQueryMarkerBox%( BYVAL HPS AS LONG,_
  42.                      BYVAL PSIZEF AS LONG)
  43.  
  44. DECLARE FUNCTION GpiMarker&( BYVAL HPS AS LONG,_
  45.                  BYVAL PPOINTL AS LONG )
  46.  
  47. DECLARE FUNCTION GpiPolyMarker&( BYVAL HPS AS LONG,_
  48.                  BYVAL ALONG AS LONG,_
  49.                  BYVAL PPOINTL AS LONG )
  50.