%
% pstricks example on ConTeXt mkiv
% context pstest3.tex
%
\usemodule[pstricks]
\usePSTRICKSmodule[pstricks]
\starttext
\startPSTRICKS
\def\circles#1{%
  \psarc(0,-#1){4.5}{0}{360}
  \psarcn[liftpen=2](0,#1){2.5}{360}{0}}
\psset{unit=0.3,linewidth=4pt,linecolor=black,%
  fillstyle=vlines,hatchcolor=red}
\pspicture(-18,-9)(18,7)
\rput(-12,0){\circles{4}}
\rput(0,-2){\circles{2}}
\rput(12,-4){\circles{0}}
\endpspicture

\pspicture(-18,-9)(18,7)
\rput(-12,0){\pscustom{\circles{4}}}
\rput(0,-2){\pscustom{\circles{2}}}
\rput(12,-4){\pscustom{\circles{0}}}
\endpspicture

\psset{fillstyle=none}
\pspicture(-18,-9)(18,7)
\rput(-12,0){\psclip{\circles{4}}
\psframe[fillstyle=vlines](-5,-9)(5,7)
\endpsclip}
\rput(0,-2){\psclip{\circles{2}}
\psframe[fillstyle=vlines](-5,-9)(5,7)
\endpsclip}
\rput(12,-4){\psclip{\circles{0}}
\psframe[fillstyle=vlines](-5,-9)(5,7)
\endpsclip}
\endpspicture

\pspicture(-18,-9)(18,7)
\rput(-12,0){\psclip{\pscustom{\circles{4}}}
\psframe[fillstyle=vlines](-5,-9)(5,7)
\endpsclip}
\rput(0,-2){\psclip{\pscustom{\circles{2}}}
\psframe[fillstyle=vlines](-5,-9)(5,7)
\endpsclip}
\rput(12,-4){\psclip{\pscustom{\circles{0}}}
\psframe[fillstyle=vlines](-5,-9)(5,7)
\endpsclip}
\endpspicture
\stopPSTRICKS
\stoptext
