makeplot

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

1 files changed, 546 insertions, 0 deletions

diff --git a/Master/texmf-dist/tex/latex/makeplot/makeplot.sty b/Master/texmf-dist/tex/latex/makeplot/makeplot.sty
new file mode 100644
index 00000000000..bc67dc5f99a
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/makeplot/makeplot.sty
@@ -0,0 +1,546 @@
+%%
+%% This is file `makeplot.sty',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% makeplot.dtx  (with options: `makeplot')
+%%  Copyright 2004--2005  by Jose Emilio Vila Forcen (jemilio@ieee.org)
+%% 
+%%  All rights reserved.
+%% 
+%%  This work 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. The latest version of the
+%%  license is in
+%% 
+%%      http://www.latex-project.org/lppl.txt
+%% 
+%%  and version 1.3 or later is part of all distributions of LaTeX
+%%  version 2003/12/01 or later.
+%% 
+%%  This work has the LPPL maintenance status "maintained".
+%%  The Current Maintainer of this work is Jose Emilio Vila Forcen (jemilio@ieee.org).
+%% 
+
+%% \CharacterTable
+%%  {Upper-case    \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z
+%%   Lower-case    \a\b\c\d\e\f\g\h\i\j\k\l\m\n\o\p\q\r\s\t\u\v\w\x\y\z
+%%   Digits        \0\1\2\3\4\5\6\7\8\9
+%%   Exclamation   \!     Double quote  \"     Hash (number) \#
+%%   Dollar        \$     Percent       \%     Ampersand     \&
+%%   Acute accent  \'     Left paren    \(     Right paren   \)
+%%   Asterisk      \*     Plus          \+     Comma         \,
+%%   Minus         \-     Point         \.     Solidus       \/
+%%   Colon         \:     Semicolon     \;     Less than     \<
+%%   Equals        \=     Greater than  \>     Question mark \?
+%%   Commercial at \@     Left bracket  \[     Backslash     \\
+%%   Right bracket \]     Circumflex    \^     Underscore    \_
+%%   Grave accent  \`     Left brace    \{     Vertical bar  \|
+%%   Right brace   \}     Tilde         \~}
+%%
+\NeedsTeXFormat{LaTeX2e}%
+\ProvidesPackage{makeplot}[2005/09/22 %
+                           v1.0 %
+                           Plots utility from Jose-Emilio Vila-Forcen]%
+\RequirePackage[nomessages]{fp}%
+\RequirePackage{pst-plot}%
+\RequirePackage{pstricks-add}%
+\RequirePackage{xkeyval}%
+\newif\ifMP@color%
+\MP@colorfalse%
+\DeclareOption{color}{%
+  \MP@colortrue%
+  \typeout{ ------}%
+  \typeout{ ------   startPlot package working in color}%
+  \typeout{ ------}}%
+\newif\ifMP@drawmargins%
+\MP@drawmarginsfalse%
+\DeclareOption{drawmargins}{%
+  \MP@drawmarginstrue%
+  \typeout{ ------}%
+  \typeout{ ------   startPlot package drawing the margins}%
+  \typeout{ ------}}%
+\DeclareOption*{%
+  \PackageWarning{startPlot}{%
+    Unknown option '\CurrentOption'}}%
+\ProcessOptions\relax%
+\newcommand{\MPbg}{%
+ \def\styleoflineA{%
+  \psset{linestyle=solid, dash=1pt 0pt 0pt 0pt, dotsep=0pt,%
+     color=black}}%
+ \def\styleoflineB{%
+  \psset{linestyle=dashed, dash=5pt 5pt 0pt 0pt, dotsep=0pt,%
+     color=black}}%
+ \def\styleoflineC{%
+  \psset{linestyle=dotted, dash=3pt 2pt 0pt 0pt, dotsep=1pt,%
+     color=black}}%
+ \def\styleoflineD{%
+  \psset{linestyle=dashed, dash=4pt 1.5pt 1pt 1.5pt, dotsep=3pt,%
+     color=black}}%
+ \def\styleoflineE{%
+  \psset{linestyle=dotted, dash=1pt 4pt 0pt 0pt, dotsep=3pt,%
+     color=black}}%
+ \def\styleoflineF{%
+  \psset{linestyle=dashed, dash=6pt 1.5pt 3pt 1.5pt, dotsep=3pt,%
+     color=black}}%
+ \def\styleoflineG{%
+  \psset{linestyle=dashed, dash=2pt 6pt 0pt 0pt, dotsep=0pt,%
+     color=black}}}%
+\definecolor{colorLineA}{rgb}{0,0,1}%
+\definecolor{colorLineB}{rgb}{1,0,0}%
+\definecolor{colorLineC}{rgb}{0,1,0}%
+\definecolor{colorLineD}{rgb}{0,1,1}%
+\definecolor{colorLineE}{rgb}{1,0,1}%
+\definecolor{colorLineF}{rgb}{1,1,0}%
+\definecolor{colorLineG}{rgb}{0.5,0.5,0.5}%
+\newcommand{\MPcolor}{%
+ \def\styleoflineA{\psset{linestyle=solid, linecolor=colorLineA}}%
+ \def\styleoflineB{\psset{linestyle=solid, linecolor=colorLineB}}%
+ \def\styleoflineC{\psset{linestyle=solid, linecolor=colorLineC}}%
+ \def\styleoflineD{\psset{linestyle=solid, linecolor=colorLineD}}%
+ \def\styleoflineE{\psset{linestyle=solid, linecolor=colorLineE}}%
+ \def\styleoflineF{\psset{linestyle=solid, linecolor=colorLineF}}%
+ \def\styleoflineG{\psset{linestyle=solid, linecolor=colorLineG}}}%
+\ifMP@color%
+ \MPcolor%
+\else%
+ \MPbg%
+\fi%
+\makeatletter%
+\def\fontaxeY{\normalsize}%
+\def\fontaxeX{\normalsize}%
+\def\fonttitleY{\normalsize}%
+\def\fonttitleX{\normalsize}%
+\def\fontlegend{\footnotesize}%
+\define@key[psset]{makeplot}{Dx}[1]%
+   {\def\gridDxmakeplot{#1}}%
+\define@key[psset]{makeplot}{Dy}[1]%
+   {\def\gridDymakeplot{#1}}%
+\define@key[psset]{makeplot}{width}[50]%
+   {\def\widthPlotmakeplot{#1}}%
+\define@key[psset]{makeplot}{heightFactor}[1]%
+   {\def\heightPlotFactormakeplot{#1}}%
+\define@key[psset]{makeplot}{startX}[0]%
+   {\def\xamakeplot{#1}}%
+\define@key[psset]{makeplot}{startY}[0]%
+   {\def\yamakeplot{#1}}%
+\define@key[psset]{makeplot}{endX}[1]%
+   {\def\xzmakeplot{#1}}%
+\define@key[psset]{makeplot}{endY}[1]%
+   {\FPmul\yzmakeplot{#1}{1.0001}}%
+\define@key[psset]{makeplot}{factorBoundaryX}%
+   {\FPdiv\factorBOUNDARYxmakeplot{#1}{1.5}}%
+\define@key[psset]{makeplot}{factorBoundaryY}%
+   {\FPdiv\factorBOUNDARYymakeplot{#1}{1.5}}%
+\define@key[psset]{makeplot}{captionY}%
+   {\FPdiv\factorXmakeplot{#1}{8}}%
+\define@key[psset]{makeplot}{captionX}%
+   {\FPdiv\factorYmakeplot{#1}{11}}%
+\define@choicekey[psset]{makeplot}{changeEndXpos}[\var\nr]{no,yes}%
+   {\def\endXamakeplot{\nr}}%
+\define@key[psset]{makeplot}{changeEndXsize}%
+   {\def\endXbmakeplot{#1}}%
+\define@choicekey[psset]{makeplot}{tickyplot}[\val\nr]{all,x,y,none}%
+   {\def\tickymakeplot{\nr}} %
+\define@choicekey[psset]{makeplot}{drawmargins}[\vall\nrr]{yes,no}%
+   {\def\drawmarginsmakeplot{\nrr}} %
+\define@key[psset]{makeplot}{orgX}%
+   {\def\orgXmakeplot{#1}} %
+\define@key[psset]{makeplot}{orgY}%
+   {\def\orgYmakeplot{#1}} %
+\pst@addfams{makeplot}%
+\psset{linewidth=0.5pt, Dx=1, Dy=1,%
+width=50, heightFactor=1, startX=0, endX=1, startY=0, endY=1,%
+showorigin=true, axesstyle=frame, ticks=all, labels=all, %
+factorBoundaryX=1, factorBoundaryY=1, captionY=100, captionX=100, %
+xsubticks=0, subticksize=1, tickwidth=0.2pt, subtickwidth=0.2pt, %
+subtickcolor=black}%
+\psset{tickyplot=all}%
+\psset{changeEndXsize=0, changeEndXpos=no}%
+\ifMP@drawmargins%
+ \psset{drawmargins=yes}%
+\else%
+ \psset{drawmargins=no}%
+\fi%
+\psset{orgX=314, orgY=314}%
+\newenvironment{makeplot}[3][]%
+  {\makeplot[#1]{#2}{#3}}%
+  {\end{pspicture}}%
+\def\defaultOptionsMakeplot{}%
+\def\makeplot{\@ifnextchar[\@makeplot{\@makeplot[]}}%
+\def\@makeplot[#1]#2#3{%
+  % Use the default options command and process
+  % the options of the command line
+  \defaultOptionsMakeplot%
+  \psset{#1}%
+  % Calculate the dimensions of the plot
+  \def\gridDx{\gridDxmakeplot}%
+  \def\gridDy{\gridDymakeplot}%
+  \def\widthPlot{\widthPlotmakeplot}%
+  \def\heightPlotFactor{\heightPlotFactormakeplot}%
+  \def\xa{\xamakeplot}%
+  \def\ya{\yamakeplot}%
+  \def\xz{\xzmakeplot}%
+  \def\yz{\yzmakeplot}%
+  \def\factorBOUNDARYx{\factorBOUNDARYxmakeplot}%
+  \def\factorBOUNDARYy{\factorBOUNDARYymakeplot}%
+  \def\factorX{\factorXmakeplot}%
+  \def\factorY{\factorYmakeplot}%
+  \def\endXa{\endXamakeplot}%
+  \def\endXb{\endXbmakeplot}%
+  \def\ticky{\tickymakeplot}%
+  \def\drawmargins{\drawmarginsmakeplot}%
+  \def\orgX{\orgXmakeplot}%
+  \def\orgY{\orgYmakeplot}%
+  %
+  % Use the fonts established
+  \def\pshlabel{\fontaxeX}%
+  \def\psvlabel{\fontaxeY}%
+  \def\pshlabel{\fontaxeX}%
+  \def\psvlabel{\fontaxeY}%
+  %
+  % Calculate the proper units for the plot
+  \FPadd\xDiff\xz{-\xa}%
+  \FPdiv\unitX\widthPlot\xDiff%
+  \FPadd\yDiff\yz{-\ya}%
+  \FPmul\ff\widthPlot\heightPlotFactor%
+  \FPdiv\unitY\ff\yDiff%
+  \psset{xunit=\unitX mm,yunit=\unitY mm}%
+  %
+  \FPadd\yinc\yz{-\ya}%
+  \FPdiv\ymid\yinc{2}%
+  \FPadd\ymid\ymid\ya%
+  \FPadd\xinc\xz{-\xa}%
+  \FPdiv\xmid\xinc{2}%
+  \FPadd\xmid\xmid\xa%
+  \FPadd\xzz\xz{0}%
+  %
+  % Related to the position of the legends
+  \FPdiv\factorX\factorX\unitX%
+  \FPadd\xaa\xa{-\factorX}%
+  \FPdiv\factorY\factorY\unitY%
+  \FPadd\yaa\ya{-\factorY}%
+  %
+  % Related to the size of the plot
+  \FPdiv\factorBOUNDARYx\factorBOUNDARYx\unitX%
+  \FPadd\xaaa\xaa{-\factorBOUNDARYx}%
+  \FPdiv\factorBOUNDARYy\factorBOUNDARYy\unitY%
+  \FPadd\yaaa\yaa{-\factorBOUNDARYy}%
+  %
+  % Change of the size of the plot
+  % if it is asked in the options,
+  % like putting the legend at the right
+  \ifnum \endXb>0%
+    \FPdiv\w{\endXb}\unitX%
+    \ifnum \endXa=0%
+      \def\endXa{\xz}%
+    \fi%
+    \FPadd\ww{\endXa}{-\xz}%
+    \def\sep{0.5}%
+    \FPdiv\www\sep\unitX%
+    \FPadd\xzz\xz\w%
+    \FPadd\xzz\xzz\ww%
+    \FPadd\xzz\xzz\www %
+  \fi%
+  %
+  % Starting the pspicture environment
+  \begin{pspicture}(\xaaa,\yaaa)(\xzz,\yz)%
+  %
+  % Draw a box with the margins if requested
+  \ifnum \drawmargins=0%
+    \psframe(\xaaa,\yaaa)(\xzz,\yz)%
+  \fi%
+  %
+  \FPadd\tickHerex{\yz}{-\ya}%
+  \FPmul\tickHerex\tickHerex\unitY%
+  \FPadd\tickHerey{\xz}{-\xa}%
+  \FPmul\tickHerey\tickHerey\unitX%
+  %
+  % To change the origin of the plot
+  % not working yet
+  \def\xaOrigin{\xa}%
+  \def\yaOrigin{\ya}%
+  \ifnum \orgX=314%
+  \else%
+    \def\xaOrigin{\orgX}%
+  \fi%
+  \ifnum \orgY=314%
+  \else%
+    \def\yaOrigin{\orgY}%
+  \fi %
+  %
+  % Put the ticks as given in the options
+  \ifnum \ticky=0%
+    \psaxes[Ox=\xa,Oy=\ya,Dx=\gridDx,Dy=\gridDy, #1,%
+        ticksize=-4pt 4pt, subticks=0, subticksize=0,%
+        tickwidth=0.5pt, linewidth=0pt, labels=none,%
+        axesstyle=axes, linecolor=white, #1, ticks=all]%
+        {-}(\xa,\ya)(\xa,\ya)(\xz,\yz)%
+  \fi%
+  \ifnum \ticky=1%
+    \psaxes[Ox=\xa,Oy=\ya,Dx=\gridDx,Dy=\gridDy, #1,%
+        ticksize=-4pt 4pt, subticks=0, subticksize=0,%
+        tickwidth=0.5pt, linewidth=0pt, labels=none,%
+        axesstyle=axes, linecolor=white, #1, ticks=x]%
+        {-}(\xa,\ya)(\xa,\ya)(\xz,\yz)%
+  \fi%
+  \ifnum \ticky=2%
+    \psaxes[Ox=\xa,Oy=\ya,Dx=\gridDx,Dy=\gridDy, #1,%
+        ticksize=-4pt 4pt, subticks=0, subticksize=0,%
+        tickwidth=0.5pt, linewidth=0pt, labels=none,%
+        axesstyle=axes, linecolor=white, #1, ticks=y]%
+        {-}(\xa,\ya)(\xa,\ya)(\xz,\yz)%
+  \fi%
+  \ifnum \ticky=3%
+    \psset{ticks=none}%
+  \fi%
+  %
+  % Put the main axes and the grid
+  \psaxes[xticksize=0pt \tickHerex mm, yticksize=0pt \tickHerey mm,%
+    Ox=\xa,Oy=\ya,Dx=\gridDx,Dy=\gridDy, #1]%
+    {-}(\xaOrigin,\yaOrigin)(\xa,\ya)(\xz,\yz)%
+  %
+  % Write the legend of the plot
+  \rput(\xaa,\ymid){\rotateleft{\fonttitleY #2}}%
+  \rput(\xmid,\yaa){\fonttitleX #3}%
+  \psset{linewidth=1pt}%
+}%
+\def\plotFile{\@ifnextchar[\@plotFile{\@plotFile[]}}%
+\def\@plotFile[#1]#2{%
+  \readdata{\data}{#2}\dataplot[#1]{\data}}%
+\def\plotFileA{\@ifnextchar[\@plotFileA{\@plotFileA[]}}%
+\def\@plotFileA[#1]#2{%
+  \styleoflineA%
+  \plotFile[#1]{#2}}%
+\def\plotFileB{\@ifnextchar[\@plotFileB{\@plotFileB[]}}%
+\def\@plotFileB[#1]#2{%
+  \styleoflineB%
+  \plotFile[#1]{#2}}%
+\def\plotFileC{\@ifnextchar[\@plotFileC{\@plotFileC[]}}%
+\def\@plotFileC[#1]#2{%
+  \styleoflineC%
+  \plotFile[#1]{#2}}%
+\def\plotFileD{\@ifnextchar[\@plotFileD{\@plotFileD[]}}%
+\def\@plotFileD[#1]#2{%
+  \styleoflineD%
+  \plotFile[#1]{#2}}%
+\def\plotFileE{\@ifnextchar[\@plotFileE{\@plotFileE[]}}%
+\def\@plotFileE[#1]#2{%
+  \styleoflineE%
+  \plotFile[#1]{#2}}%
+\def\plotFileF{\@ifnextchar[\@plotFileF{\@plotFileF[]}}%
+\def\@plotFileF[#1]#2{%
+  \styleoflineF%
+  \plotFile[#1]{#2}}%
+\def\plotFileG{\@ifnextchar[\@plotFileG{\@plotFileG[]}}%
+\def\@plotFileG[#1]#2{%
+  \styleoflineG%
+  \plotFile[#1]{#2}}%
+\def\legend{\@ifnextchar[\@legend{\@legendf[]}}%
+\def\@legend[#1]#2#3#4#5#6{%
+  \def\xb{#2}%
+  \def\x{#3}%
+  \FPdiv\x\x\unitX%
+  \FPadd\xbb\xb\x%
+  \def\x{#4}%
+  \FPdiv\x\x\unitX%
+  \FPadd\xc\xbb\x%
+  %
+  \def\y{#5}%
+  \psline[#1]{-}(\xb,\y)(\xbb,\y)%
+  \rput(\xc,\y){\makebox[0 cm][l]{{\fontlegend #6}}}}%
+\def\legendA{\@ifnextchar[\@legendA{\@legendA[]}}%
+\def\@legendA[#1]#2#3#4#5{%
+  \styleoflineA%
+  \legend[#1]{#2}{#3}{#4}{#5}}%
+\def\legendB{\@ifnextchar[\@legendB{\@legendB[]}}%
+\def\@legendB[#1]#2#3#4#5{%
+  \styleoflineB%
+  \legend[#1]{#2}{#3}{#4}{#5}}%
+\def\legendC{\@ifnextchar[\@legendC{\@legendC[]}}%
+\def\@legendC[#1]#2#3#4#5{%
+  \styleoflineC%
+  \legend[#1]{#2}{#3}{#4}{#5}}%
+\def\legendD{\@ifnextchar[\@legendD{\@legendD[]}}%
+\def\@legendD[#1]#2#3#4#5{%
+  \styleoflineD%
+  \legend[#1]{#2}{#3}{#4}{#5}}%
+\def\legendE{\@ifnextchar[\@legendE{\@legendE[]}}%
+\def\@legendE[#1]#2#3#4#5{%
+  \styleoflineE%
+  \legend[#1]{#2}{#3}{#4}{#5}}%
+\def\legendF{\@ifnextchar[\@legendF{\@legendF[]}}%
+\def\@legendF[#1]#2#3#4#5{%
+  \styleoflineF%
+  \legend[#1]{#2}{#3}{#4}{#5}}%
+\def\legendG{\@ifnextchar[\@legendG{\@legendG[]}}%
+\def\@legendG[#1]#2#3#4#5{%
+  \styleoflineG%
+  \legend[#1]{#2}{#3}{#4}{#5}}%
+\def\legendAf{\@ifnextchar[\@legendAf{\@legendAf[]}}%
+\def\@legendAf[#1]#2{%
+  \legendA[#1]{\posx}{\l}{\s}{\posy}{#2}%
+  \FPadd\posy\posy{-\dif}}%
+\def\legendBf{\@ifnextchar[\@legendBf{\@legendBf[]}}%
+\def\@legendBf[#1]#2{%
+  \legendB[#1]{\posx}{\l}{\s}{\posy}{#2}%
+  \FPadd\posy\posy{-\dif}}%
+\def\legendCf{\@ifnextchar[\@legendCf{\@legendCf[]}}%
+\def\@legendCf[#1]#2{%
+  \legendC[#1]{\posx}{\l}{\s}{\posy}{#2}%
+  \FPadd\posy\posy{-\dif}}%
+\def\legendDf{\@ifnextchar[\@legendDf{\@legendDf[]}}%
+\def\@legendDf[#1]#2{%
+  \legendD[#1]{\posx}{\l}{\s}{\posy}{#2}%
+  \FPadd\posy\posy{-\dif}}%
+\def\legendEf{\@ifnextchar[\@legendEf{\@legendEf[]}}%
+\def\@legendEf[#1]#2{%
+  \legendE[#1]{\posx}{\l}{\s}{\posy}{#2}%
+  \FPadd\posy\posy{-\dif}}%
+\def\legendFf{\@ifnextchar[\@legendFf{\@legendFf[]}}%
+\def\@legendFf[#1]#2{%
+  \legendF[#1]{\posx}{\l}{\s}{\posy}{#2}%
+  \FPadd\posy\posy{-\dif}}%
+\def\legendGf{\@ifnextchar[\@legendGf{\@legendGf[]}}%
+\def\@legendGf[#1]#2{%
+  \legendG[#1]{\posx}{\l}{\s}{\posy}{#2}%
+  \FPadd\posy\posy{-\dif}}%
+\def\legendText{\@ifnextchar[\@legendText{\@legendText[]}}%
+\def\@legendText[#1]#2{%
+  \rput(\posx,\posy){%
+    \makebox[0 cm][l]{%
+    \hspace{-0.1cm}{\footnotesize #2}}}%
+  \FPadd\posy\posy{-\dif}}%
+\define@key[psset]{whiteBG}{fillcolorWhiteBG}{\def\fillcolorWhiteBG{#1}}%
+\define@key[psset]{whiteBG}{fillstyleWhiteBG}{\def\fillstyleWhiteBG{#1}}%
+\define@key[psset]{whiteBG}{framearcWhiteBG}{\def\framearcWhiteBG{#1}}%
+\define@key[psset]{whiteBG}{linewidthWhiteBG}{\def\linewidthWhiteBG{#1}}%
+\define@key[psset]{whiteBG}{linestyleWhiteBG}{\def\linestyleWhiteBG{#1}}%
+\define@key[psset]{whiteBG}{linecolorWhiteBG}{\def\linecolorWhiteBG{#1}}%
+\pst@addfams{whiteBG}%
+\psset{fillcolorWhiteBG=white, fillstyleWhiteBG=solid,%
+   framearcWhiteBG=0.3, linewidthWhiteBG=0.01, %
+   linestyleWhiteBG=solid, linecolorWhiteBG=black}%
+\def\whiteBG{\@ifnextchar[\@whiteBG{\@whiteBG[]}}%
+\def\@whiteBG[#1]#2#3#4#5{%
+  \psframe[framearc=\framearcWhiteBG, fillcolor=\fillcolorWhiteBG,%
+    fillstyle=\fillstyleWhiteBG, linewidth=\linewidthWhiteBG cm,%
+    linestyle=\linestyleWhiteBG, linecolor=\linecolorWhiteBG, #1]%
+    (#2,#3)(#4,#5)}%
+\define@key[psset]{legendXY}{legendSep}{\def\sepYlegendXY{#1}} %
+\define@key[psset]{legendXY}{lineLength}{\def\llegendXY{#1}} %
+\define@key[psset]{legendXY}{lineTextSep}{\def\slegendXY{#1}} %
+\define@key[psset]{legendXY}{borderlineSep}{\FPmul\sepTxlegendXY{#1}{2}} %
+\pst@addfams{legendXY}%
+\psset{legendSep=4, lineLength=5, lineTextSep=1, borderlineSep=1}%
+\def\legendXY{\@ifnextchar[\@legendXY{\@legendXY[]}}%
+\def\@legendXY[#1](#2,#3)#4#5{%
+  \psset{#1}%
+  \def\sepY{\sepYlegendXY}%
+  \def\l{\llegendXY}%
+  \def\s{\slegendXY}%
+  \def\sepTx{\sepTxlegendXY}%
+  \def\xaXY{#2}%
+  \def\yzXY{#3}%
+  \FPdiv\sep\sepY{8}%
+  \FPdiv\sepYy\sepY{1.33} %
+  \FPdiv\x\sep\unitX% To separate \sep mm the legend from the axe
+  \FPdiv\y\sep\unitY% To separate \sep mm the legend from the axe
+  \FPadd\leftX\xaXY{\x}%
+  \FPadd\highY\yzXY{-\y}%
+  \FPdiv\w{#4}\unitX%
+  \FPadd\rightX\leftX{\w}%
+  \FPdiv\sepTx\sepTx\unitX%
+  \FPadd\posx\leftX\sepTx%
+  \FPdiv\sepTy\sepYy\unitY%
+  \FPadd\posy\highY{-\sepTy}%
+  \FPdiv\dif{\sepY}\unitY% Separation of the legends
+  \FPadd\n{#5}{-1}%
+  \FPmul\lowY\dif\n%
+  \FPadd\lowY\lowY\sepTy%
+  \FPadd\lowY\posy{-\lowY}%
+  \whiteBG[#1]{\leftX}{\lowY}{\rightX}{\highY}}%
+\def\legendUL{\@ifnextchar[\@legendUL{\@legendUL[]}}%
+\def\@legendUL[#1]#2#3{%
+  \FPmul\xUL\xa{1}%
+  \FPmul\yUL\yz{1}%
+  \legendXY[#1](\xUL,\yUL){#2}{#3}}%
+  %
+  \def\legendUR{\@ifnextchar[\@legendUR{\@legendUR[]}}%
+  \def\@legendUR[#1]#2#3{%
+  \FPmul\xUR\xz{1}%
+  \FPmul\yUR\yz{1}%
+  \def\sep{0.5}%
+  \FPdiv\xp\sep\unitX% To separate \sep mm the legend from the axe
+  \FPmul\xp\xp{2}%
+  \FPadd\xp\xUR{-\xp}%
+  \FPdiv\xx{#2}\unitX%
+  \FPadd\xp\xp{-\xx}%
+  \legendXY[#1](\xp,\yUR){#2}{#3}}%
+  %
+\def\legendDL{\@ifnextchar[\@legendDL{\@legendDL[]}}%
+\def\@legendDL[#1]#2#3{%
+  \psset{#1}%
+  \def\sepY{\sepYlegendXY}%
+  \def\sepTx{\sepTxlegendXY}%
+  \FPmul\xzDL\xz{1}%
+  \FPmul\xaDL\xa{1}%
+  \FPmul\yzDL\yz{1}%
+  \FPmul\yaDL\ya{1}%
+  \FPdiv\sep\sepY{8}%
+  \FPdiv\sep\sepY{8}%
+  \FPdiv\sepYy\sepY{1.33} %
+  \FPdiv\x\sep\unitX% To separate \sep mm the legend from the axe
+  \FPdiv\y\sep\unitY% To separate \sep mm the legend from the axe
+  \FPadd\leftX\xaDL{0}%
+  \FPdiv\w{#2}\unitX%
+  \FPadd\rightX\leftX{\w}%
+  \FPdiv\sepTx\sepTx\unitX%
+  \FPadd\posx\leftX\sepTx%
+  \FPadd\lowY\yaDL{\y}%
+  \FPadd\lowY\lowY{\y}%
+  \FPdiv\sepTy\sepYy\unitY%
+  \FPadd\posy\lowY{\sepTy}%
+  \FPdiv\dif\sepY\unitY% Separation of the legends
+  \FPadd\n{#3}{-1}%
+  \FPmul\highY\dif\n%
+  \FPadd\highY\highY\sepTy%
+  \FPadd\highY\posy{\highY}%
+  \FPadd\posy\highY{-\sepTy}%
+  \legendXY[#1](\leftX,\highY){#2}{#3}}%
+  %
+\def\legendDR{\@ifnextchar[\@legendDR{\@legendDR[]}}%
+\def\@legendDR[#1]#2#3{%
+  \psset{#1}%
+  \def\sepY{\sepYlegendXY}%
+  \def\sepTx{\sepTxlegendXY}%
+  \FPmul\xzDR\xz{1}%
+  \FPmul\xaDR\xa{1}%
+  \FPmul\yzDR\yz{1}%
+  \FPmul\yaDR\ya{1}%
+  \FPdiv\sep\sepY{8}%
+  \FPdiv\sepYy\sepY{1.33} %
+  \FPdiv\x\sep\unitX% To separate \sep mm the legend from the axe
+  \FPdiv\y\sep\unitY% To separate \sep mm the legend from the axe
+  \FPadd\rightX\xzDR{-\x}%
+  \FPdiv\w{#2}\unitX%
+  \FPadd\leftX\rightX{-\w}%
+  \FPadd\leftX\leftX{-\x}%
+  \FPdiv\sepTx\sepTx\unitX%
+  \FPadd\posx\leftX\sepTx%
+  \FPadd\lowY\yaDR{\y}%
+  \FPadd\lowY\lowY{\y}%
+  \FPdiv\sepTy\sepYy\unitY%
+  \FPadd\posy\lowY{\sepTy}%
+  \FPdiv\dif{\sepY}\unitY% Separation of the legends
+  \FPadd\n{#3}{-1}%
+  \FPmul\highY\dif\n%
+  \FPadd\highY\highY\sepTy%
+  \FPadd\highY\posy{\highY}%
+  \FPadd\posy\highY{-\sepTy}%
+  \legendXY[#1](\leftX,\highY){#2}{#3}}%
+\makeatother%
+\endinput
+%%
+%% End of file `makeplot.sty'.