diff options
Diffstat (limited to 'graphics/pictex/addon/picmore.tex')
-rw-r--r-- | graphics/pictex/addon/picmore.tex | 152 |
1 files changed, 76 insertions, 76 deletions
diff --git a/graphics/pictex/addon/picmore.tex b/graphics/pictex/addon/picmore.tex index b6cec46a3a..1bda81e6ae 100644 --- a/graphics/pictex/addon/picmore.tex +++ b/graphics/pictex/addon/picmore.tex @@ -1,76 +1,76 @@ -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-% PiCTeX Erweiterungen von Andreas Schrell %
-% Windhoevel 2 %
-% 5600 Wuppertal 2 %
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-% Version 1.0 29.10.1989 %
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-
-% Befehle fr die Benutzer:
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-% \setsignal zur Benutzung wie \setlinear %
-% \plot erzeugt danach Signalverlaeufe%
-% fuer Impulsdiagramme. Es werden TeX-%
-% Linien benutzt, daher schneller als %
-% \plot mit \setlinear %
-% Bsp: %
-% \setsignal \plot 0 1 1 0 2 1 4 0 7 1 8 0 / %
-% erzeugt %
-% 0 1 2 3 4 5 6 7 8 %
-% __ ___ _ %
-% ! ! ! ! ! %
-% !_! !_____! ! %
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-% \setmsignal zur Benutzung wie \setlinear %
-% \plot erzeugt danach Signalverlaeufe%
-% fuer Impulsdiagramme. Es werden TeX-%
-% Linien benutzt, daher schneller als %
-% \plot mit \setlinear %
-% Bsp: %
-% \setmsignal \plot 0 1 1 2 2 4 3 6 0 7 1 1 %
-% erzeugt %
-% 0 1 2 3 4 5 6 7 8 %
-% --- %
-% ! ! %
-% - ! %
-% --! ! - %
-% !___! %
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-
-\catcode`!=11
-
-\def\setsignal{%
- \let\!drawcurve=\!scurve}
-
-\def\!scurve #1 #2 {%
- \edef\!hxS{#1}%
- \edef\!hyS{#2}%
- \!sjoin}
-
-\def\!sjoin#1 #2 {%
- \putrule from {\!hxS} {\!hyS} to {#1} {\!hyS}
- \putrule from {#1} {\!hyS} to {#1} {#2}
- \edef\!hxS{#1}%
- \edef\!hyS{#2}%
- \!ifnextchar/{\!finish}{\!sjoin}}
-
-
-\def\setmsignal{%
- \let\!drawcurve=\!smcurve}
-
-\def\!smcurve #1 #2 #3 {%
- \edef\!hxS{#2}%
- \edef\!hyS{#3}%
- \putrule from {#1} {\!hyS} to {\!hxS} {\!hyS}
- \!smjoin}
-
-\def\!smjoin#1 #2 {%
- \putrule from {\!hxS} {\!hyS} to {\!hxS} {#2}
- \putrule from {\!hxS} {#2} to {#1} {#2}
- \edef\!hxS{#1}%
- \edef\!hyS{#2}%
- \!ifnextchar/{\!finish}{\!smjoin}}
-
-\catcode`!=12
-
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +% PiCTeX Erweiterungen von Andreas Schrell % +% Windhoevel 2 % +% 5600 Wuppertal 2 % +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +% Version 1.0 29.10.1989 % +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + +% Befehle fr die Benutzer: +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +% \setsignal zur Benutzung wie \setlinear % +% \plot erzeugt danach Signalverlaeufe% +% fuer Impulsdiagramme. Es werden TeX-% +% Linien benutzt, daher schneller als % +% \plot mit \setlinear % +% Bsp: % +% \setsignal \plot 0 1 1 0 2 1 4 0 7 1 8 0 / % +% erzeugt % +% 0 1 2 3 4 5 6 7 8 % +% __ ___ _ % +% ! ! ! ! ! % +% !_! !_____! ! % +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +% \setmsignal zur Benutzung wie \setlinear % +% \plot erzeugt danach Signalverlaeufe% +% fuer Impulsdiagramme. Es werden TeX-% +% Linien benutzt, daher schneller als % +% \plot mit \setlinear % +% Bsp: % +% \setmsignal \plot 0 1 1 2 2 4 3 6 0 7 1 1 % +% erzeugt % +% 0 1 2 3 4 5 6 7 8 % +% --- % +% ! ! % +% - ! % +% --! ! - % +% !___! % +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% + +\catcode`!=11 + +\def\setsignal{% + \let\!drawcurve=\!scurve} + +\def\!scurve #1 #2 {% + \edef\!hxS{#1}% + \edef\!hyS{#2}% + \!sjoin} + +\def\!sjoin#1 #2 {% + \putrule from {\!hxS} {\!hyS} to {#1} {\!hyS} + \putrule from {#1} {\!hyS} to {#1} {#2} + \edef\!hxS{#1}% + \edef\!hyS{#2}% + \!ifnextchar/{\!finish}{\!sjoin}} + + +\def\setmsignal{% + \let\!drawcurve=\!smcurve} + +\def\!smcurve #1 #2 #3 {% + \edef\!hxS{#2}% + \edef\!hyS{#3}% + \putrule from {#1} {\!hyS} to {\!hxS} {\!hyS} + \!smjoin} + +\def\!smjoin#1 #2 {% + \putrule from {\!hxS} {\!hyS} to {\!hxS} {#2} + \putrule from {\!hxS} {#2} to {#1} {#2} + \edef\!hxS{#1}% + \edef\!hyS{#2}% + \!ifnextchar/{\!finish}{\!smjoin}} + +\catcode`!=12 + |