2 * PostScript pen handling
4 * Copyright 1998 Huw D M Davies
12 DEFAULT_DEBUG_CHANNEL(psdrv
)
14 static char PEN_dash
[] = "50 30"; /* ----- ----- ----- */
15 static char PEN_dot
[] = "20"; /* -- -- -- -- -- -- */
16 static char PEN_dashdot
[] = "40 30 20 30"; /* ---- -- ---- -- */
17 static char PEN_dashdotdot
[] = "40 20 20 20 20 20"; /* ---- -- -- ---- */
18 static char PEN_alternate
[] = "1";
20 /***********************************************************************
21 * PSDRV_PEN_SelectObject
23 extern HPEN
PSDRV_PEN_SelectObject( DC
* dc
, HPEN hpen
, PENOBJ
* pen
)
25 HPEN prevpen
= dc
->w
.hPen
;
26 PSDRV_PDEVICE
*physDev
= (PSDRV_PDEVICE
*)dc
->physDev
;
28 TRACE(psdrv
, "hpen = %08x colour = %08lx\n", hpen
, pen
->logpen
.lopnColor
);
31 physDev
->pen
.width
= XLSTODS(dc
, pen
->logpen
.lopnWidth
.x
);
32 if(physDev
->pen
.width
< 0)
33 physDev
->pen
.width
= -physDev
->pen
.width
;
35 PSDRV_CreateColor(physDev
, &physDev
->pen
.color
, pen
->logpen
.lopnColor
);
37 if(physDev
->pen
.width
> 1) { /* dashes only for 0 or 1 pixel pens */
38 physDev
->pen
.dash
= NULL
;
40 switch(pen
->logpen
.lopnStyle
& PS_STYLE_MASK
) {
42 physDev
->pen
.dash
= PEN_dash
;
46 physDev
->pen
.dash
= PEN_dot
;
50 physDev
->pen
.dash
= PEN_dashdot
;
54 physDev
->pen
.dash
= PEN_dashdotdot
;
58 physDev
->pen
.dash
= PEN_alternate
;
62 physDev
->pen
.dash
= NULL
;
67 physDev
->pen
.set
= FALSE
;
72 /**********************************************************************
77 BOOL
PSDRV_SetPen(DC
*dc
)
79 PSDRV_PDEVICE
*physDev
= (PSDRV_PDEVICE
*)dc
->physDev
;
81 PSDRV_WriteSetColor(dc
, &physDev
->pen
.color
);
83 if(!physDev
->pen
.set
) {
84 PSDRV_WriteSetPen(dc
);
85 physDev
->pen
.set
= TRUE
;