From 6fdbc04e91d94d0edf11a1572ae579236fb069e5 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Thu, 12 Jan 2006 23:58:35 +0000 Subject: makeplot git-svn-id: svn://tug.org/texlive/trunk@1066 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/tex/latex/makeplot/makeplot.sty | 546 ++++++++++++++++++++++ 1 file changed, 546 insertions(+) create mode 100644 Master/texmf-dist/tex/latex/makeplot/makeplot.sty (limited to 'Master/texmf-dist/tex') 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'. -- cgit v1.2.3