Comme annoncé, voici quelques exemples d'anamorphose cylindrique avec image vue verti...
[pst-anamorphosis.git] / doc / pst-anamorphosis.tex
index c91d9ad..ed08750 100644 (file)
@@ -11,8 +11,8 @@
 % 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}
-%
-%% === Chemin pour les dessins ---------------------------------------------
-\define@key[psset]{pst-anamorphosis}{path}{\edef\psk@Anamorphose@Path{#1}} % chemin des dessins
-\psset{path=}
-
+% 
+%% === 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
@@ -74,7 +75,7 @@
 }}
 % 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@@getcoor{#1}%
     \addto@pscode{
       \pst@coor /t@@y ED /t@@x ED % Translate
-      /fichier (\psk@Anamorphose@Path#2) def
+      /fichier (#2) def
     \tx@optionsanamorphosis
+\ifPst@Anamorphose@image
      Image
+\fi
 \ifPst@Anamorphose@draw
    tx@anamorphosisPathDict begin
       gsave

Licence Creative Commons Les fichiers de Syracuse sont mis à disposition (sauf mention contraire) selon les termes de la
Licence Creative Commons Attribution - Pas d’Utilisation Commerciale - Partage dans les Mêmes Conditions 4.0 International.