[Fwd: Re: [pstricks] pst-circ quintipole op-amp]

[Herbert Voss]

-------- Original Message --------
Subject: 	Re: [pstricks] pst-circ quintipole op-amp
Date: 	Sun, 06 Mar 2005 22:27:40 +0100
From: 	Herbert Voss <LaTeX at zedat.fu-berlin.de>
To: 	Joel Salomon <joelcsalomon at gmail.com>
References: 	<7871fcf50503052137530cb238 at mail.gmail.com> 
<422AD53A.8080805 at zedat.fu-berlin.de> 
<7871fcf50503060739505eac8e at mail.gmail.com> 
<422B686A.2000207 at zedat.fu-berlin.de> 
<7871fcf50503061248558ba551 at mail.gmail.com>



Joel Salomon wrote:

>Note the oapr (op-amp positive rail) and the other 3 nodes at the end.
>It's a bit of a kludge, but is there an easier way to create this
>"quintipole" op-amp?
>
>  
>
\documentclass{article}
\usepackage{pst-circ}
\makeatletter
\def\pst at draw@OA{%
 \pspolygon[arrows=-](-1,-0.75)(-1,0.75)(1,0)(-1,-0.75)
 \psline{-o}(0,0.375)(0,0.75)\uput[90](0,0.75){$+$}
 \psline{-o}(0,-0.375)(0,-0.75)\uput[-90](0,-0.75){$-$}
 \pnode(-1,0.25){\ifPst at OA@invert Minus@\else Plus@\fi}
 \pnode(-1,-0.25){\ifPst at OA@invert Plus@\else Minus@\fi}
 \pnode(1,0){S@}
 \uput{0.1}[0](-1,0.25){\ifPst at OA@invert$-$\else$+$\fi}
 \uput{0.1}[0](-1,-0.25){\ifPst at OA@invert$+$\else$-$\fi}
 \ifPst at OA@perfect\rput(0.25,0){$\infty$}\fi%
}
\makeatother
\begin{document}

\psset{unit=2,arrowscale=2}
\begin{pspicture}(0,0)(5,2)
\psgrid[subgriddiv=1,griddots=10]
   \pnode(.5,.5){oan}
   \pnode(.5,1.5){oap}
   \pnode(4.5,1){oao}
   \OA[OAperfect=false,
       OAinvert=false,
       OAipluslabel=$i_p$,
       OAiminuslabel=$i_n$,
       OAioutlabel=$i_o$,arrows=o-o](oap)(oan)(oao)
   \uput[r](oao){$v_o$}
\end{pspicture}

\end{document}


Herbert