diff options
author | Karl Berry <karl@freefriends.org> | 2011-02-24 23:36:18 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2011-02-24 23:36:18 +0000 |
commit | 2a886fbce3b9f2ed32e02e952d4b300e6e3dd7b4 (patch) | |
tree | 1e795c05f0261278a6d0889ad79c977485ec6e5c /Master/texmf-dist/doc/latex/pstricks-examples/36-00-9.ltx | |
parent | 9b3b61b4613379d47f4dc1700f76efc1c1dbfced (diff) |
new german doc pstricks examples (23feb11)
git-svn-id: svn://tug.org/texlive/trunk@21511 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/doc/latex/pstricks-examples/36-00-9.ltx')
-rw-r--r-- | Master/texmf-dist/doc/latex/pstricks-examples/36-00-9.ltx | 73 |
1 files changed, 73 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/latex/pstricks-examples/36-00-9.ltx b/Master/texmf-dist/doc/latex/pstricks-examples/36-00-9.ltx new file mode 100644 index 00000000000..8283d4463f6 --- /dev/null +++ b/Master/texmf-dist/doc/latex/pstricks-examples/36-00-9.ltx @@ -0,0 +1,73 @@ +%% +%% Ein Beispiel der DANTE-Edition +%% +%% +%% Copyright (C) 2010 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[]{exaarticle} +\pagestyle{empty} +\setlength\textwidth{190.324pt} +\setlength\parindent{0pt} +\StartShownPreambleCommands +\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 + +\StopShownPreambleCommands +\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} |