summaryrefslogtreecommitdiff
path: root/graphics/pstricks/contrib/pst-mirror/tex/pst-mirror.tex
diff options
context:
space:
mode:
Diffstat (limited to 'graphics/pstricks/contrib/pst-mirror/tex/pst-mirror.tex')
-rw-r--r--graphics/pstricks/contrib/pst-mirror/tex/pst-mirror.tex21
1 files changed, 10 insertions, 11 deletions
diff --git a/graphics/pstricks/contrib/pst-mirror/tex/pst-mirror.tex b/graphics/pstricks/contrib/pst-mirror/tex/pst-mirror.tex
index dcb63ab676..89917b065b 100644
--- a/graphics/pstricks/contrib/pst-mirror/tex/pst-mirror.tex
+++ b/graphics/pstricks/contrib/pst-mirror/tex/pst-mirror.tex
@@ -1,4 +1,4 @@
-%% $Id: pst-mirror.tex 894 2014-02-18 09:46:21Z herbert $
+%% $Id: pst-mirror.tex 248 2021-09-14 08:57:11Z herbert $
%%
%% This is file `pst-mirror.tex',
%%
@@ -23,11 +23,11 @@
\ifx\PSTricksLoaded\endinput\else\input pstricks.tex\fi
\ifx\PSTXKeyLoaded\endinput \else\input pst-xkey \fi
\ifx\PSTnodesLoaded\endinput\else\input pst-node \fi
+\ifx\PSTtoolsLoaded\endinput\else\input pst-tools.tex \fi
\ifx\MultidoLoaded\endinput \else\input multido.tex \fi
%
-%\def\fileversion{1.00} CTAN
-\def\fileversion{1.01}
-\def\filedate{2014/02/17}%
+\def\fileversion{1.02}
+\def\filedate{2021/09/14}%
\message{`pst-mirror v\fileversion, \filedate\space (ml,hv)}%
%
\edef\PstAtCode{\the\catcode`\@} \catcode`\@=11\relax
@@ -85,14 +85,14 @@
\define@key[psset]{pst-mirror}{Hpyramide}[5]{\def\psk@Sphere@Hpyramide{#1}} % hauteur pyramide
% choix de la police et de la taille des caractères en cm !!
-\define@key[psset]{pst-mirror}{PSfont}[Times-Roman]{\def\psk@PSfont{/#1 }}
+\define@key[psset]{pst-mirror}{fontname}[Times-Roman]{\def\psk@fontname{/#1 }}
\define@key[psset]{pst-mirror}{fontscale}[1]{\def\psk@fontscale{#1 }}
\define@key[psset]{pst-mirror}{xlabelsep}[-0.5]{\def\psk@xlabelsep{#1 }}
\define@key[psset]{pst-mirror}{ylabelsep}[-0.5]{\def\psk@ylabelsep{#1 }}
\define@key[psset]{pst-mirror}{xO}[0]{\def\pst@SphereMirror@xO{#1 }} % origine du texte
\define@key[psset]{pst-mirror}{yO}[0]{\def\pst@SphereMirror@yO{#1 }}
\define@key[psset]{pst-mirror}{translation}[0 0 0]{\def\psk@SphereMirror@translation{#1}} % vecteur translation
-\psset[pst-mirror]{PSfont=Times-Roman,fontscale=1,xlabelsep=-0.5,ylabelsep=-0.5,xO=0,yO=0,translation=0 0 0}
+\psset[pst-mirror]{fontname=Times-Roman,fontscale=1,xlabelsep=-0.5,ylabelsep=-0.5,xO=0,yO=0,translation=0 0 0}
%
\psset{Xmax=50,Ymax=50,Xmin=-50,Ymin=-50,pas=1,grille=10,distance=30,Rayon=10,scale=1,
Xorigine=\psk@Sphere@Distance,Yorigine=0,Zorigine=0,RotX=0,RotY=0,RotZ=0,
@@ -107,18 +107,17 @@
/unit_image {\pst@number\psunit div 10 mul} bind def
%% Caracteres accentues
/ReEncode { exch findfont
- dup length dict begin { 1 index /FID eq {pop pop} {def} ifelse
- }forall
+ dup length dict begin { 1 index /FID eq {pop pop} {def} ifelse }forall
/Encoding ISOLatin1Encoding def currentdict end definefont
pop
} bind def
\ifPst@isolatin
- /Font \psk@PSfont\space /ISOfont ReEncode /ISOfont def
+ /Font \psk@fontname /ISOfont ReEncode /ISOfont def
\else
- /Font \psk@PSfont\space def
+ /Font \psk@fontname def
\fi
/SizeFont { \psk@fontscale\space cm } bind def
- Font findfont SizeFont scalefont setfont
+ Font findfont SizeFont scalefont setfont
/x0 \pst@SphereMirror@xO def % pour positionner le texte
/y0 \pst@SphereMirror@yO def %
/Xmax \psk@Sphere@Xmax\space def