pst-circ 1.57 (6nov10)

git-svn-id: svn://tug.org/texlive/trunk@20358 c570f23f-e606-0410-a88d-b1316a301751

1 files changed, 18 insertions, 11 deletions

diff --git a/Master/texmf-dist/tex/generic/pst-circ/pst-circ.tex b/Master/texmf-dist/tex/generic/pst-circ/pst-circ.tex
index 75d725f2eda..2bd5869e4d8 100644
--- a/Master/texmf-dist/tex/generic/pst-circ/pst-circ.tex
+++ b/Master/texmf-dist/tex/generic/pst-circ/pst-circ.tex
@@ -5,8 +5,6 @@
 %%
 %% Package `pst-circ.tex'
 %%
-%% Original idea: A.Premoli I.Maio, M.Luque,
-%%
 %% Christophe Jorssen
 %% Herbert Voss <hvoss@tug.org>
 %%
@@ -29,8 +27,8 @@
 \ifx\PSTXKeyLoaded\endinput   \else\input pst-xkey \fi
 \ifx\PSTMultidoLoaded\endinput\else\input multido.tex\fi
 %
-\def\fileversion{1.56}
-\def\filedate{2010/09/18}
+\def\fileversion{1.57}
+\def\filedate{2010/11/06}
 \message{`pst-circ' v\fileversion (CJ,hv,pd)}
 %
 \edef\PstAtCode{\the\catcode`\@}
@@ -62,7 +60,6 @@
 \def\pst@Ttype@FET{FET}
 \def\pst@FETchanneltype@P{P}% Ted
 \def\pst@FETchanneltype@N{N}% Ted
-% start  Herbert 2003-07-17
 \def\pst@Dstyle@twoCircles{twoCircles}
 \def\pst@Dstyle@varistor{varistor}
 \def\pst@Dstyle@thyristor{thyristor}
@@ -70,7 +67,7 @@
 \def\pst@Dstyle@photo{photo}
 \def\pst@Dstyle@triac{triac}
 \def\pst@Dstyle@Z{Z}
-% end  Herbert 2003-07-17
+\def\pst@Dstyle@schottky{schottky}
 \def\pst@Dstyle@normal{normal}
 \def\pst@Dstyle@chemical{chemical}
 \def\pst@Dstyle@elektor{elektor}
@@ -393,9 +390,13 @@
     \fi%
     \ifx\psk@Ttype\pst@Ttype@FET\relax%
       \ifnum180=\Pst@TRot\relax
-        \psline[arrows=-](0.6,0.5)(0.05,0.5)(0.05,-0.5)(0.6,-0.5)%
+        \psline[arrows=-](0.6,0.5)(0.05,0.5)
+        \psline[linestyle=dashed,dash=8pt 3pt,arrows=-](0.05,0.6)(0.05,-0.6)
+        \psline[arrows=-](0.05,-0.5)(0.6,-0.5)%
       \else 
-        \psline[arrows=-](0.65,0.5)(0.15,0.5)(0.15,-0.5)(0.65,-0.5)%
+        \psline[arrows=-](0.65,0.5)(0.15,0.5)
+        \psline[linestyle=dashed,dash=8pt 3pt,arrows=-](0.15,0.6)(0.15,-0.6)
+        \psline[arrows=-](0.15,-0.5)(0.65,-0.5)%
       \fi%
     \else%
       \psline[arrows=-](0.5,0.5)(TBaseNode)(0.5,-0.5)%
@@ -403,9 +404,11 @@
     \ifx\psk@Ttype\pst@Ttype@FET\relax%
 %      \ifx\psk@Ttype\pst@Ttype@PNP\relax%
       \ifx\psk@FETchanneltype\pst@FETchanneltype@P\relax% Ted 2007-10-15
-        \psline[origin={#3},arrowinset=0,arrowsize=8\pslinewidth]{->}(-0.5,0)%
+        \psline[arrowinset=0,arrowsize=8\pslinewidth]{->}(0.15,0)(0.65,0)%
+	\qdisk(#2){1.5pt}\psline[origin={#2}]{-}(0,0.5)%
       \else%
-        \psline[origin={#2},arrowinset=0,arrowsize=8\pslinewidth]{<-}(-0.5,0)%
+        \psline[arrowinset=0,arrowsize=8\pslinewidth]{<-}(0.15,0)(0.65,0)%
+	\qdisk(#2){1.5pt}\psline[origin={#2}]{-}(0,0.5)%
       \fi%
     \else%
       \ifx\psk@Ttype\pst@Ttype@PNP\relax%
@@ -1174,7 +1177,11 @@
     \psline[arrows=-,linewidth=\pslinewidth](0.25,-0.2)(0.5,-0.3)(0.5,-0.6)
   \else%
     \pspolygon[arrows=-,linewidth=1.5\pslinewidth](-0.25,-0.2)(-0.25,0.2)(0.25,0)
-    \psline[arrows=-,linewidth=1.5\pslinewidth](0.25,0.2)(0.25,-0.2)
+    \ifx\psk@Dstyle\pst@Dstyle@schottky 
+      \psline[linewidth=1.1\pslinewidth](0.4,0.2)(0.4,0.3)(0.3,0.3)(0.3,-0.3)(0.2,-0.3)(0.2,-0.2)
+    \else
+      \psline[arrows=-,linewidth=1.5\pslinewidth](0.25,0.2)(0.25,-0.2)% for all following
+    \fi
     \ifx\psk@Dstyle\pst@Dstyle@thyristor
       \psline[arrows=-,linewidth=1.5\pslinewidth](0,-0.1)(0,-0.35)
     \fi%