% Requires some packages
\ifx\PSTricksLoaded\endinput\else \input pstricks \fi
\ifx\PSTXKeyLoaded\endinput\else \input pst-xkey \fi
-\def\fileversion{0.21}
-\def\filedate{2011/10/14}
+\def\fileversion{0.3}
+\def\filedate{2011/10/21}
\message{`PSTANAMORPHOSIS' v\fileversion, \filedate}
\pstheader{anamorphosis.pro}
\newif\ifPst@Anamorphose@draw
\define@key[psset]{pst-anamorphosis}{drawanamorphosis}[true]{\@nameuse{Pst@Anamorphose@draw#1}}
\psset[pst-anamorphosis]{drawanamorphosis=true}
-%
+%
+%% === Option pour ne pas dessiner l'image vue ---------------------
+% 23 mars 2013
+\newif\ifPst@Anamorphose@image
+\define@key[psset]{pst-anamorphosis}{image}[false]{\@nameuse{Pst@Anamorphose@image#1}}
+\psset[pst-anamorphosis]{image=true}
%% Reservation des noms de macros
% adaptation de la macro de pst-solides3d
% #1=type de reservation associee a une liste qui
}}
% nature de l'anamorphose
\def\pst@anamorphosis@list@type{%
- cylindrical,conical,spherical,perspective,inverseperspective}
+ cylindrical,conical,spherical,perspective,inverseperspective,cylindricalV}
%
%% Reservation de macros correspondants aux types
\pst@anamorphosis@reservednames{type}
\def\psanamorphosis{\def\pst@par{}\pst@object{psanamorphosis}}
\def\psanamorphosis@i{\@ifnextchar({\psanamorphosis@do}{\psanamorphosis@do(0,0)}}
-\def\psanamorphosis@do(#1)#2{% #1 = fichier.eps à transformer
+\def\psanamorphosis@do(#1)#2{% #2 = fichier.eps à transformer
\begingroup%
\use@par%
\begin@SpecialObj%
\pst@coor /t@@y ED /t@@x ED % Translate
/fichier (#2) def
\tx@optionsanamorphosis
+\ifPst@Anamorphose@image
Image
+\fi
\ifPst@Anamorphose@draw
tx@anamorphosisPathDict begin
gsave