2 * PostScript pen handling
4 * Copyright 1998 Huw D M Davies
9 #include "debugtools.h"
11 DEFAULT_DEBUG_CHANNEL(psdrv
);
13 static char PEN_dash
[] = "50 30"; /* ----- ----- ----- */
14 static char PEN_dot
[] = "20"; /* -- -- -- -- -- -- */
15 static char PEN_dashdot
[] = "40 30 20 30"; /* ---- -- ---- -- */
16 static char PEN_dashdotdot
[] = "40 20 20 20 20 20"; /* ---- -- -- ---- */
17 static char PEN_alternate
[] = "1";
19 /***********************************************************************
20 * PSDRV_PEN_SelectObject
22 HPEN
PSDRV_PEN_SelectObject( DC
* dc
, HPEN hpen
)
25 HPEN prevpen
= dc
->hPen
;
26 PSDRV_PDEVICE
*physDev
= (PSDRV_PDEVICE
*)dc
->physDev
;
28 if (!GetObjectA( hpen
, sizeof(logpen
), &logpen
)) return 0;
30 TRACE("hpen = %08x colour = %08lx\n", hpen
, logpen
.lopnColor
);
34 physDev
->pen
.width
= INTERNAL_XWSTODS(dc
, logpen
.lopnWidth
.x
);
35 if(physDev
->pen
.width
< 0)
36 physDev
->pen
.width
= -physDev
->pen
.width
;
38 PSDRV_CreateColor(physDev
, &physDev
->pen
.color
, logpen
.lopnColor
);
39 physDev
->pen
.style
= logpen
.lopnStyle
& PS_STYLE_MASK
;
41 switch(physDev
->pen
.style
) {
43 physDev
->pen
.dash
= PEN_dash
;
47 physDev
->pen
.dash
= PEN_dot
;
51 physDev
->pen
.dash
= PEN_dashdot
;
55 physDev
->pen
.dash
= PEN_dashdotdot
;
59 physDev
->pen
.dash
= PEN_alternate
;
63 physDev
->pen
.dash
= NULL
;
66 if ((physDev
->pen
.width
> 1) && (physDev
->pen
.dash
!= NULL
)) {
67 physDev
->pen
.style
= PS_SOLID
;
68 physDev
->pen
.dash
= NULL
;
71 physDev
->pen
.set
= FALSE
;
76 /**********************************************************************
81 BOOL
PSDRV_SetPen(DC
*dc
)
83 PSDRV_PDEVICE
*physDev
= (PSDRV_PDEVICE
*)dc
->physDev
;
85 if (physDev
->pen
.style
!= PS_NULL
) {
86 PSDRV_WriteSetColor(dc
, &physDev
->pen
.color
);
88 if(!physDev
->pen
.set
) {
89 PSDRV_WriteSetPen(dc
);
90 physDev
->pen
.set
= TRUE
;