... Stickers_des_drapeaux_3d.pdf avec un effet 3d du texte...
authorJuergen Gilg <gilg@acrotex.net>
Wed, 21 Nov 2012 22:47:20 +0000 (23:47 +0100)
committerJuergen Gilg <gilg@acrotex.net>
Wed, 21 Nov 2012 22:47:20 +0000 (23:47 +0100)
drapeaux/LISTE.txt
drapeaux/Stickers_des_drapeaux_3d.pdf [new file with mode: 0644]
drapeaux/Stickers_des_drapeaux_3d.tex [new file with mode: 0644]
drapeaux/pst-light3d.pro [new file with mode: 0644]
drapeaux/pst-light3d.sty [new file with mode: 0644]
drapeaux/pst-light3d.tex [new file with mode: 0644]

index 35c778c..d48a229 100644 (file)
@@ -1,7 +1,12 @@
 == Style file
 pst-flags.sty
+pst-light3d.tex
+pst-light3d.sty
+pst-light3d.pro
 == Test file
 Drapeaux_europe.tex
 Drapeaux_europe.pdf
 Stickers_des_drapeaux.tex
-Stickers_des_drapeaux.pdf
\ No newline at end of file
+Stickers_des_drapeaux.pdf
+Stickers_des_drapeaux_3d.tex
+Stickers_des_drapeaux_3d.pdf
\ No newline at end of file
diff --git a/drapeaux/Stickers_des_drapeaux_3d.pdf b/drapeaux/Stickers_des_drapeaux_3d.pdf
new file mode 100644 (file)
index 0000000..cae2ef2
Binary files /dev/null and b/drapeaux/Stickers_des_drapeaux_3d.pdf differ
diff --git a/drapeaux/Stickers_des_drapeaux_3d.tex b/drapeaux/Stickers_des_drapeaux_3d.tex
new file mode 100644 (file)
index 0000000..6eda0ef
--- /dev/null
@@ -0,0 +1,52 @@
+
+\documentclass[dvipsnames]{article}
+\usepackage{web}
+\margins{2cm}{2cm}{2cm}{2cm}       %% Kein Seitenrand
+\screensize{297mm}{210mm}          %% Dimensionen: H\"{o}he, Breite des Dokuments
+
+\usepackage{pst-flags}
+\usepackage{pst-grad,pst-light3d}
+\parindent0pt
+\parskip7pt
+
+\DeclareFixedFont{\BK}{T1}{ptm}{b}{n}{1.275cm}    
+
+\begin{document}
+
+\psset{unit=4mm,LightThreeDXLength=0.135,LightThreeDYLength=0.15,
+LightThreeDColorPsCommand=2.5 div setgray,fillstyle=solid,fillcolor=gray}
+
+
+\begin{pspicture}(-5,-5)(5,5)
+  \begin{psclip}{\psellipse[linewidth=4pt](0,0)(6,3.5)}
+    \rput(0,0){\psset{linewidth=0pt}\pstFlag}
+  \end{psclip}
+
+\rput(0,0){\PstLightThreeDText{\BK GER}}
+\end{pspicture}
+
+\begin{pspicture}(-5,-5)(5,5)
+  \begin{psclip}{\psellipse[linewidth=4pt](0,0)(6,3.5)}
+    \rput(0,0){\psset{linewidth=0pt}\pstFlag[nation=France]}
+  \end{psclip}
+
+\rput(0,0){\PstLightThreeDText{\BK FRA}}
+\end{pspicture}
+
+\begin{pspicture}(-5,-5)(5,5)
+  \begin{psclip}{\psellipse[linewidth=4pt](0,0)(6,3.5)}
+    \rput(0,0){\psset{linewidth=0pt}\pstFlag[nation=UnitedKingdom]}
+  \end{psclip}
+
+\rput(0,0){\PstLightThreeDText{\BK UK}}
+\end{pspicture}
+
+\begin{pspicture}(-5,-5)(5,5)
+  \begin{psclip}{\psellipse[linewidth=4pt](0,0)(6,3.5)}
+    \rput(0,0){\psset{linewidth=0pt}\pstFlag[nation=UnitedStates]}
+  \end{psclip}
+
+\rput(0,0){\PstLightThreeDText{\BK USA}}
+\end{pspicture}
+
+\end{document} 
\ No newline at end of file
diff --git a/drapeaux/pst-light3d.pro b/drapeaux/pst-light3d.pro
new file mode 100644 (file)
index 0000000..edb6494
--- /dev/null
@@ -0,0 +1,88 @@
+%%
+%% This is file `pst-li3d.pro',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% pst-li3d.dtx  (with options: `postscript-header')
+%% 
+%% IMPORTANT NOTICE:
+%% 
+%% For the copyright see the source file.
+%% 
+%% Any modified versions of this file must be renamed
+%% with new filenames distinct from pst-li3d.pro.
+%% 
+%% For distribution of the original source see the terms
+%% for copying and modification in the file pst-li3d.dtx.
+%% 
+%% This generated file may be distributed as long as the
+%% original source files, as listed above, are part of the
+%% same distribution. (The sources need not necessarily be
+%% in the same archive or directory.)
+%%
+%% Package `pst-li3d.dtx'
+%%
+%% Denis Girou (CNRS/IDRIS - France) <Denis.Girou@idris.fr>
+%% and Peter Kleiweg (Rijksuniversiteit Groningen - Nederlands)
+%% <kleiweg@let.rug.nl> %% %% July 10, 2003
+%%
+%% This program can be redistributed and/or modified under
+%% the terms of the LaTeX Project Public License Distributed
+%% from CTAN archives in directory macros/latex/base/lppl.txt.
+%%
+%% DESCRIPTION:
+%%   `pst-li3d' is a PSTricks package for three dimensional
+%%   lighten effect on characters and PSTricks graphics.
+%%
+%%
+/tx@LightThreeDDict 40 dict def
+tx@LightThreeDDict begin
+/LightThreeDMove {
+  /y0c exch def
+  /x0c exch def
+  /xc x0c def
+  /yc y0c def
+  newpath } def
+/LightThreeDLine {
+  /yyc exch def
+  /xxc exch def
+  yyc yc sub xxc xc sub 1 index 0 eq 1
+  index 0 eq and not { atan
+  /ac exch def
+  ac LightThreeDMINangle le ac LightThreeDMAXangle ge or
+    { ac LightThreeDAngle sub 2 mul cos 1 add LightThreeDColorPsCommand
+    xc yc moveto xxc yyc lineto LightThreeDDXa LightThreeDDYa
+    rlineto xc LightThreeDDXa add yc LightThreeDDYa add
+    lineto closepath fill } if } if
+    /xc xxc def
+    /yc yyc def } def
+/LightThreeDCurve {
+  /y4c exch def
+  /x4c exch def
+  /y3c exch def
+  /x3c exch def
+  /y2c exch def
+  /x2c exch def
+  /y1c yc def
+  /x1c xc def
+1 LightThreeDSteps div 1 LightThreeDSteps div 1 {
+  /t exch def
+  3 t sub x1c mul t 2 sub x2c mul 1 t sub x3c mul add 3 mul add x4c
+  t mul add t mul x2c x1c sub 3 mul add t mul x1c add % X
+  3 t sub y1c mul t 2 sub y2c mul
+  1 t sub y3c mul add 3 mul add y4c t mul add t
+  mul y2c y1c sub 3 mul add t mul y1c add % Y
+  LightThreeDLine
+  } for
+} def
+/LightThreeDClose {
+  x0c 0 eq {x0c} {x0c 1 add} ifelse y0c 0 eq {y0c} {y0c 1 add} ifelse
+  LightThreeDLine newpath
+} def
+/LightThreeDPathForAll {
+  { LightThreeDMove} { LightThreeDLine } { LightThreeDCurve } { LightThreeDClose }
+    pathforall} def
+end
+%%
+%% End of file `pst-li3d.pro'.
diff --git a/drapeaux/pst-light3d.sty b/drapeaux/pst-light3d.sty
new file mode 100644 (file)
index 0000000..43d8bf7
--- /dev/null
@@ -0,0 +1,8 @@
+\RequirePackage{pstricks}
+\ProvidesPackage{pst-light3d}[2004/08/28 package wrapper for 
+  pst-light3d.tex (hv)]
+\input{pst-light3d.tex}
+\ProvidesFile{pst-light3d.tex}
+  [\filedate\space v\fileversion\space `PST-light3d' (hv)]
+\IfFileExists{pst-light3d.pro}{\@addtofilelist{pst-light3d.pro}}{}%
+\endinput
\ No newline at end of file
diff --git a/drapeaux/pst-light3d.tex b/drapeaux/pst-light3d.tex
new file mode 100644 (file)
index 0000000..04cba26
--- /dev/null
@@ -0,0 +1,110 @@
+%% Package `pst-li3d.tex'
+%%
+%% Denis Girou (CNRS/IDRIS - France) <Denis.Girou@idris.fr>
+%% and Peter Kleiweg (Rijksuniversiteit Groningen - Nederlands)
+%% <kleiweg@let.rug.nl> 
+%% 
+%% This program can be redistributed and/or modified under
+%% the terms of the LaTeX Project Public License Distributed
+%% from CTAN archives in directory macros/latex/base/lppl.txt.
+%%
+%% DESCRIPTION:
+%%   `pst-li3d' is a PSTricks package for three dimensional
+%%   lighten effect on characters and PSTricks graphics.
+%%
+%%
+\csname PSTLightThreeDLoaded\endcsname
+\let\PSTLightThreeDLoaded\endinput
+\ifx\PSTricksLoaded\endinput\else\input{pstricks}\fi
+%
+\input pst-xkey
+\pst@addfams{pst-light3d}
+%
+\def\FileVersion{0.12}
+\def\FileDate{2006/11/25}
+\message{`Pst-Light3d' v\FileVersion, \FileDate\space(DG/PK)}
+%
+\edef\PstAtCode{\the\catcode`\@}
+\catcode`\@=11\relax
+\pstheader{pst-light3d.pro}
+%
+\define@key[psset]{pst-light3d}{LightThreeDXLength}{%
+  \pst@getlength{#1}\PstLightThreeD@XLength}
+\define@key[psset]{pst-light3d}{LightThreeDYLength}{%
+  \pst@getlength{#1}\PstLightThreeD@YLength}
+\define@key[psset]{pst-light3d}{LightThreeDLength}{%
+  \pst@getlength{#1}\PstLightThreeD@XLength%
+  \pst@getlength{#1}\PstLightThreeD@YLength}
+\define@key[psset]{pst-light3d}{LightThreeDSteps}{%
+  \pst@getint{#1}\PstLightThreeD@Steps}
+\define@key[psset]{pst-light3d}{LightThreeDAngle}{%
+  \pst@getangle{#1}\PstLightThreeD@LightAngle}
+\define@key[psset]{pst-light3d}{LightThreeDColorPsCommand}{%
+  \edef\PstLightThreeD@ColorPsCommand{#1}}
+\psset{%
+  LightThreeDXLength=0.2,LightThreeDYLength=0.3,%
+  LightThreeDSteps=40,LightThreeDAngle=45,%
+  LightThreeDColorPsCommand=2.5 div setgray}
+\def\PstLightThreeDGraphic{\pst@object{PstLightThreeDGraphic}}
+\def\PstLightThreeDGraphic@i{%
+  \pst@makebox{%
+    \PstLightThreeD@i{%
+      /LightThreeDDXa LightThreeDDX def
+      /LightThreeDDYa LightThreeDDY def
+      /stroke { gsave reversepath LightThreeDPathForAll grestore
+        LightThreeDPathForAll } def }{ end }%
+  }%
+}
+\def\PstLightThreeDText{\pst@object{PstLightThreeDText}}
+\def\PstLightThreeDText@i{%
+  \pst@makebox{%
+    \PstLightThreeD@i{%
+      /LightThreeDDXa LightThreeDDX Resolution 100 div mul def
+      /LightThreeDDYa LightThreeDDY VResolution 100 div mul def
+      /tx@LightThreeDSavedShow /show load def
+      /show {
+        dup
+        gsave
+        false charpath
+        reversepath LightThreeDPathForAll
+        grestore true charpath 
+      } def }%
+    {/show /tx@LightThreeDSavedShow load def end }%
+  \begin@ClosedObj%
+    \def\use@pscode{%
+      \pst@Verb{%
+        gsave
+        \tx@STV
+        \pst@code grestore CP newpath moveto 
+      }%
+      \gdef\pst@code{}%
+    }%
+    \end@ClosedObj%
+  }%
+}%
+\def\PstLightThreeD@i#1#2{{%
+  \use@par%
+  \leavevmode%
+  \pstVerb{%
+    tx@LightThreeDDict begin
+      /LightThreeDDX \PstLightThreeD@XLength\space def
+      /LightThreeDDY \PstLightThreeD@YLength\space neg def
+      /LightThreeDSteps \PstLightThreeD@Steps def
+      /LightThreeDAngle \PstLightThreeD@LightAngle def
+      /LightThreeDColorPsCommand {\PstLightThreeD@ColorPsCommand} def
+      /LightThreeDMINangle LightThreeDDY LightThreeDDX atan 180 sub def
+      /LightThreeDMAXangle LightThreeDDY LightThreeDDX atan def
+      #1}%
+  \hbox{\box\pst@hbox}%
+  \pstVerb{#2}%
+}\ignorespaces}
+%
+\catcode`\@=\PstAtCode\relax
+\endinput
+%%
+%% End of file `pst-li3d.tex'.
+
+\iffalse
+0.11 hv use pst-xkey
+0.10 hv        initial version
+\fi
\ No newline at end of file

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.