%%
%% A DANTE-Edition example
%%
%% Example 36-00-7 on page 772.
%%
%% Copyright (C) 2011 Herbert Voss
%%
%% It may be distributed and/or modified under the conditions
%% of the LaTeX Project Public License, either version 1.3
%% of this license or (at your option) any later version.
%%
%% See
http://www.latex-project.org/lppl.txt for details.
%%
%%
%% ====
% Show page(s) 1
%%
\documentclass[]{article}
\pagestyle{empty}
\setlength\textwidth{375.57637pt}
\setlength\parindent{0pt}
\usepackage{pstricks}
\psset{unit=1ex}
\newcount\elcount
\newcount\Xresult
\makeatletter
\def\foreach#1#2{%
\ifx\\#2\\%
\else\@ReturnAfterFi{\do@foreach{#2}#1\@nil}%
\fi%
}
\def\do@foreach#1#2#3\@nil{%
#1#2%
\ifx\\#3\\%
\else\@ReturnAfterFi{\do@foreach{#1}#3\@nil}%
\fi%
}
\long\def\@ReturnAfterFi#1\fi{\fi#1}
\def\lambda#1{\csname do#1\endcsname}
\expandafter\def\csname do.\endcsname{\OneSignal{0}}
\expandafter\def\csname do-\endcsname{\OneSignal{1}}
\def\OneSignal#1{%
\lineto(\the\elcount,#1)
\advance\elcount by 1
\lineto(\the\elcount,#1)
}
\def\signal{\@ifnextchar[{\signal@i}{\signal@i[]}}
\def\signal@i[#1]#2#3{%
#2 &
\Xresult=0
\foreach{#3}{\advance\Xresult by 1 }%
&
\begin{pspicture}[#1](\the\Xresult,1)
\elcount=0
\pscustom{%
\moveto(0,0)
\foreach{#3}{\lambda}}
\end{pspicture}\\%
}
\makeatother
\begin{document}
\psset{yunit=2ex}
\begin{tabular}{@{}llp{3.75cm}}
text & parameter & result\\\hline
~\\[-10pt]
\signal[linewidth=1pt,linecolor=red]{XSUS\_G}{-.-.-.-.-.-.-.-.-.-.-}
\signal[linewidth=1pt,linecolor=green]{XPR\_U${}_1$}{..--..--..--..--..--.}
\signal[linewidth=1pt,linecolor=blue]{XPR\_U${}_2$}{....----....----....-}
\end{tabular}
\end{document}
