[pstricks] Protractor

[David Arnold]

Juergen,

Very nice!

Thanks.

D.

On May 7, 2009, at 11:22 PM, Juergen Gilg wrote:

\documentclass{article} %David Arnold
\usepackage{pstricks,multido}
\SpecialCoor
\begin{document}

\begin{pspicture}(-5,0)(5,5)
\psset{linewidth=0.5pt}
     \psarc[fillstyle=solid,fillcolor=lightgray!50](0,0){5}{0}{180}
     \psline(-5,0)(-0.1,0)
     \psline(0.1,0)(5,0)
     \psarc[fillstyle=solid,fillcolor=white](0,0){0.1}{0}{180}
     \multido{\iA=10+10,\iB=-80+10}{17}{\rput{\iB}(4.1;\iA){\iA}}
     \multido{\i=1+1}{179}{\psline[linecolor=gray](4.625;\i)(4.95;\i)}
     \multido{\i=10+10}{17}{\psline[linecolor=black,linewidth=0.75pt] 
(4.4;\i)(5;\i)}
     \psarc[fillstyle=solid,fillcolor=white](0,0){3.5}{15}{165}
     \psline(3.5;15)(3.5;165)
\end{pspicture}
\end{document}

-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://tug.org/pipermail/pstricks/attachments/20090508/a771d623/attachment.html