[pstricks] fillstyle of psarc and pswedge

[Herbert Voss]

Doris Wagner schrieb:
> hi list,
> 
> \pswedge[fillstyle=vlines](...
>   works fine, but
>   \psarc[fillstyle=vlines](...
> 
> not. what can I do to get segmetns covered with lines?

it works also fine, but a wedge is a closed curve and
an arc not ...

Herbert

\listfiles
\documentclass{minimal}
\usepackage{pstricks}
\SpecialCoor

\makeatletter
\def\psArc{\pst at object{psArc}}
\def\psArc at i(#1)#2#3#4{%
  \pst at killglue
  \begingroup
  \use at par
  \pscustom{%
    \translate(#1)
    \psline(#2;#3)(#2;#4)
    \psarc(0,0){#2}{#3}{#4}}
  \endgroup}
\makeatother

\newpsstyle{wedge}{fillcolor=red!30,fillstyle=solid,linestyle=dashed}

\begin{document}

\begin{pspicture}[showgrid=true](10,10)
  \pswedge[style=wedge](5,8){2}{-10}{90}
  \psarc[fillstyle=vlines](5,8){2}{-10}{90}
  \pswedge[style=wedge](5,5){2}{-10}{90}
  \psArc[fillstyle=vlines](5,5){2}{-10}{90}
  \pswedge[style=wedge](2,2){2}{45}{200}
  \psArc[fillcolor=blue!30,fillstyle=solid](2,2){2}{45}{200}
  \psarc[fillcolor=blue!30,fillstyle=solid](8,2){2}{45}{200}
  \psArc[fillstyle=hlines](3,3){2}{-30}{30}
\end{pspicture}

\end{document}