pst-sigsys update (1apr09)

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

1 files changed, 44 insertions, 5 deletions

diff --git a/Master/texmf-dist/tex/latex/pst-sigsys/pst-sigsys.sty b/Master/texmf-dist/tex/latex/pst-sigsys/pst-sigsys.sty
index cb9a3c877cd..732b8bedd27 100644
--- a/Master/texmf-dist/tex/latex/pst-sigsys/pst-sigsys.sty
+++ b/Master/texmf-dist/tex/latex/pst-sigsys/pst-sigsys.sty
@@ -6,11 +6,11 @@
 %% E-mail: fdelgosha@gmail.com
 %%=========================================
 
-\ProvidesPackage{pst-sigsys}[2009/01/15 by Farshid Delgosha]
+\ProvidesPackage{pst-sigsys}[2009/04/01 by Farshid Delgosha]
 
 \csname PSTsigsysLoaded\endcsname
-\def\fileversion{1.00}
-\def\filedate{2008/01/15}
+\def\fileversion{1.1}
+\def\filedate{2009/04/01}
 \message{`PST-sigsys' v\fileversion, \filedate\space (Farshid Delgosha)}
 
 \ifx\PSTricksLoaded\endinput\else\input pstricks \fi
@@ -39,6 +39,7 @@
 
 
 %--- internal macros -------------------------------------
+\newdimen\ss@ticklength
 \newdimen\ss@zerowidth
 \newdimen\ss@zeroradius
 \newdimen\ss@zeroradiusinc
@@ -118,6 +119,7 @@
      \def\ss@ylpos{l}
   \fi
 }
+\define@key[psset]{pst-sigsys}{ticklength}{\pssetlength{\ss@ticklength}{#1}}
 \define@key[psset]{pst-sigsys}{stemhead}[]{\def\ss@stemhead{#1}}
 \define@boolkey[psset]{pst-sigsys}[ss@]{stemtag}[true]{}
 \define@key[psset]{pst-sigsys}{stemtagformat}[]{\def\ss@stemtagformat{#1}}
@@ -146,6 +148,7 @@
 %--- default key values ----------------------------------
 \psset[pst-sigsys]{scale=1}%   global
 \psset[pst-sigsys]{xlpos=b,ylpos=r}%  psaxeslabels
+\psset[pst-sigsys]{ticklength=.075}%  pshTick and psvTick
 \psset[pst-sigsys]{stemhead=*,stemtag=false,stemtagformat=\scriptstyle}%   psstem
 \psset[pst-sigsys]{zerowidth=.7pt,zeroradius=.08,zeroradiusinc=.07,order=1}%   pszero
 \psset[pst-sigsys]{polewidth=.7pt,polelength=.12}%   pspole
@@ -187,6 +190,42 @@
 %--- end psaxeslabels ------------------------------------
 
 
+%--- pshtick ---------------------------------------------
+\def\pshtick{\def\pst@par{}\pst@object{pshtick}}
+\def\pshtick@i(#1)#2{{%
+\use@par%
+\rput(#1){\psline(-#2,0)(#2,0)}%
+}\ignorespaces}
+%--- end pshtick -----------------------------------------
+
+
+%--- psvtick ---------------------------------------------
+\def\psvtick{\def\pst@par{}\pst@object{psvtick}}
+\def\psvtick@i(#1)#2{{%
+\use@par%
+\rput(#1){\psline(0,-#2)(0,#2)}%
+}\ignorespaces}
+%--- end psvtick -----------------------------------------
+
+
+%--- pshTick ---------------------------------------------
+\def\pshTick{\def\pst@par{}\pst@object{pshTick}}
+\def\pshTick@i(#1){{%
+\use@par%
+\rput(#1){\psline(-\ss@ticklength,0)(\ss@ticklength,0)}%
+}\ignorespaces}
+%--- end pshTick -----------------------------------------
+
+
+%--- psvTick ---------------------------------------------
+\def\psvTick{\def\pst@par{}\pst@object{psvTick}}
+\def\psvTick@i(#1){{%
+\use@par%
+\rput(#1){\psline(0,-\ss@ticklength)(0,\ss@ticklength)}%
+}\ignorespaces}
+%--- end psvTick -----------------------------------------
+
+
 %--- psstem ----------------------------------------------
 \def\psstem{\def\pst@par{}\pst@object{psstem}}
 \def\psstem@i{\@ifnextchar({\psstem@ii}{\psstem@ii(0,1)}}
@@ -359,7 +398,7 @@
 \def\psusampler{\def\pst@par{}\pst@object{psusampler}}
 \def\psusampler@i(#1)#2#3{{%
 \use@par%
-\psfblock(#1){#2}{\ensuremath{\mathord{\uparrow} #3}}%
+\psfblock(#1){#2}{$\mathord{\uparrow} #3$}%
 }\ignorespaces}
 %--- end psusampler --------------------------------------
 
@@ -368,7 +407,7 @@
 \def\psdsampler{\def\pst@par{}\pst@object{psdsampler}}
 \def\psdsampler@i(#1)#2#3{{%
 \use@par%
-\psfblock(#1){#2}{\ensuremath{\mathord{\downarrow} #3}}%
+\psfblock(#1){#2}{$\mathord{\downarrow} #3$}%
 }\ignorespaces}
 %--- end psdsampler --------------------------------------