[pstricks] Re: pstricks Digest, Vol 25, Issue 10
rossi at york.cuny.edu
rossi at york.cuny.edu
Mon Feb 14 17:16:29 CET 2005
Dear Herbert:
Thank you for your help. As usual, you are always there to help me out. Your
solution below worked quite well within xymtex, and now I can place electrons
around appropriate atoms to ensure students understand the bonding.
Best regards,
Angelo
> Message: 2
> Date: Sun, 13 Feb 2005 09:04:08 +0100
> From: Herbert Voss <Herbert.Voss at alumni.TU-Berlin.DE>
> Subject: Re: [pstricks] Help with electron dots around atoms
> To: pstricks at tug.org
> Message-ID: <420F09F8.5000607 at alumni.TU-Berlin.DE>
> Content-Type: text/plain; charset=us-ascii; format=flowed
>
>
> use always pstricks
>
> Herbert
>
> \documentclass[a4paper,12pt]{article}
> \usepackage{pstricks}
> \usepackage{pst-node}
> \usepackage{pst-slpe} % CTAN:graphics/pstricks/contrib/pst-slpe
> \newsavebox\PBox
> \def\TwoDots#1#2{%
> \sbox\PBox{#1}%
> \begin{pspicture}(\wd\PBox,\ht\PBox)
> \rput[lb](0,0){#1}
> \psset{dotsize=2pt, linecolor=black}
> \ifcase#2
> \psdots(1.1\wd\PBox,0.35\ht\PBox)(1.1\wd\PBox,0.65\ht\PBox)%r
> \or\psdots(-0.05,0.35\ht\PBox)(-0.05,0.66\ht\PBox)%l
> \or\psdots(0.35\wd\PBox,-0.1)(0.65\wd\PBox,-0.1)%b
> \or\psdots(0.35\wd\PBox,1.2\ht\PBox)(0.65\wd\PBox,1.2\ht\PBox)%t
> \or\psdots(1.1\wd\PBox,0.15)(1.1\wd\PBox,0.30)%r
> \psdots(-0.05,0.35\ht\PBox)(-0.05,0.65\ht\PBox)%l
> \or\psdots(0.35\wd\PBox,-0.1)(0.65\wd\PBox,-0.1)%b%b
> \psdots(-0.05,0.35\ht\PBox)(-0.05,0.65\ht\PBox)%l
> \psdots(0.35\wd\PBox,1.2\ht\PBox)(0.65\wd\PBox,1.2\ht\PBox)%t
> \fi
> \end{pspicture}}
> \newlength\RCircle\newlength\PDiff\PDiff=5pt
> \def\TwoDotsA#1#2{%
> \RCircle=#1
> \begin{pspicture}(-\RCircle,-\RCircle)(\RCircle,\RCircle)
> \pscircle{\RCircle}
> \psset{dotsize=2pt, linecolor=black}
> \ifcase#2
> \psdots(1.25\RCircle,0.5\PDiff)(1.25\RCircle,-0.5\PDiff)%r
> \or\psdots(-1.25\RCircle,0.5\PDiff)(-1.25\RCircle,-0.5\PDiff)%l
> \or\psdots(-0.5\PDiff,-1.25\RCircle)(0.5\PDiff,-1.25\RCircle)%b
> \or\psdots(-0.5\PDiff,1.25\RCircle)(0.5\PDiff,1.25\RCircle)%t
> \or\psdots(1.25\RCircle,0.5\PDiff)(1.25\RCircle,-0.5\PDiff)%r
> \psdots(-1.25\RCircle,0.5\PDiff)(-1.25\RCircle,-0.5\PDiff)%l
> \or\psdots(-0.5\PDiff,-1.25\RCircle)(0.5\PDiff,-1.25\RCircle)%b
> \psdots(-1.25\RCircle,0.5\PDiff)(-1.25\RCircle,-0.5\PDiff)%l
> \psdots(-0.5\PDiff,1.25\RCircle)(0.5\PDiff,1.25\RCircle)%t
> \fi
> \end{pspicture}}
> \begin{document}
> {\LARGE
> \begin{enumerate}
>
> \item \TwoDots{O}{0}%r
> \item \TwoDots{O}{1}%l
> \item \TwoDots{O}{4}%lr
> \item \TwoDots{O}{2}%b
> \item \TwoDots{O}{3}%t
> \item \TwoDots{O}{5}%blt
> \end{enumerate}
> }
>
> \begin{enumerate}
>
> \item \TwoDotsA{10pt}{0}%r
> \item \TwoDotsA{10pt}{1}%l
> \item \TwoDotsA{10pt}{4}%lr
> \item \TwoDotsA{10pt}{2}%b
> \item \TwoDotsA{10pt}{3}%t
> \item \TwoDotsA{10pt}{5}%blt
> \end{enumerate}
>
> \end{document}
Scanned for Malware by York College/CUNY
More information about the PSTricks
mailing list