diff options
author | Karl Berry <karl@freefriends.org> | 2006-01-13 00:03:33 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2006-01-13 00:03:33 +0000 |
commit | bbcc6f9fcd3737edc987b1df9e63e52407da99d3 (patch) | |
tree | 8635345408dcecb0c553d98ea27fffa9fc6d52e0 /Master/texmf-dist/tex/latex/prosper/PPRcorners.sty | |
parent | dba09c751a6f9d8fd641a41c73fc590634c4eb19 (diff) |
prosper
git-svn-id: svn://tug.org/texlive/trunk@1223 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/latex/prosper/PPRcorners.sty')
-rw-r--r-- | Master/texmf-dist/tex/latex/prosper/PPRcorners.sty | 196 |
1 files changed, 196 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/latex/prosper/PPRcorners.sty b/Master/texmf-dist/tex/latex/prosper/PPRcorners.sty new file mode 100644 index 00000000000..33b9a92abd4 --- /dev/null +++ b/Master/texmf-dist/tex/latex/prosper/PPRcorners.sty @@ -0,0 +1,196 @@ +%============================================================================= +% Prosper -- (PPRcorners) Style file +% A LaTeX class for creating slides +% Author: Jean-Yves Burlett <jean-yves@burlett.org> +% +% Copyright (c) 2002 Jean-Yves Burlett +% All rights reserved. +% +% Permission is hereby granted, without written agreement and without +% license or royalty fees, to use, copy, modify, and distribute this +% software and its documentation for any purpose, provided that the +% above copyright notice and the following two paragraphs appear in +% all copies of this software. +% +% IN NO EVENT SHALL THE AUTHOR BE LIABLE TO ANY PARTY FOR DIRECT, INDIRECT, +% SPECIAL, INCIDENTAL, OR CONSEQUENTIAL DAMAGES ARISING OUT OF THE USE OF +% THIS SOFTWARE AND ITS DOCUMENTATION, EVEN IF THE AUTHOR HAS BEEN ADVISED +% OF THE POSSIBILITY OF SUCH DAMAGE. +% +% THE AUTHOR SPECIFICALLY DISCLAIMS ANY WARRANTIES, +% INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY +% AND FITNESS FOR A PARTICULAR PURPOSE. THE SOFTWARE PROVIDED HEREUNDER IS +% ON AN "AS IS" BASIS, AND THE AUTHOR HAS NO OBLIGATION TO +% PROVIDE MAINTENANCE, SUPPORT, UPDATES, ENHANCEMENTS, OR MODIFICATIONS. +% +% CVSId : $Id: PPRcorners.sty,v 1.1 2003/01/27 14:39:20 exupery Exp $ +%============================================================================= + +% +% ---[ Subtilités ]--- +% +% Pour de pures raisons esthétiques, j'ai ajouté deux fonctions : +% \slideCaptionLeft{MonTexte} qui permet de définir un cartouche en bas à +% gauche (contient \@Author par défaut) +% \NothingLeftPastThisPoint{} pose la fin du décompte de page. Cela +% permet d'avoir des slides en rab pour les réponses aux questions +% évidentes sans qu'ils soient comptés dans le nombre de pages +% De plus, la commande \NotLastYetMark peut être redéfinie pour +% choisir le marqueur utilisé sur les overlays sauf le dernier (j'ai +% tendance sous le stress à oublier mes animations et cela me permet +% de me souvenir que mon changement de slide sera une animation et pas +% un vrai changement de slide. Oui, c'est idiot). Pour supprimer ça il +% suffit de redéfinir la commande pour ne rien marquer du tout. +% + +\NeedsTeXFormat{LaTeX2e}[1995/12/01] +\ProvidesPackage{PPRcorners}[2002/02/18] +\typeout{`corners' style for Prosper ---} +\typeout{(c) 2002 Jean-Yves Burlett <jean-yves@burlett.org>} +\typeout{CVSId: $Id: PPRcorners.sty,v 1.1 2003/01/27 14:39:20 exupery Exp $} + +\RequirePackage{amssymb} + +%% + +\DefaultTransition{Replace} +\psset{unit=1cm} +\ifinColor +\newrgbcolor{cornerblue}{.2 .36 .77} +\else +\newgray{cornerblue}{.5} +\newgray{verylightgray}{.8} +\fi + + +\FontTitle{% + \usefont{T1}{ptm}{b}{n}\fontsize{20.74pt}{18pt}\selectfont\black}{% + \usefont{T1}{ptm}{b}{n}\fontsize{20.74pt}{18pt}\selectfont\black} +\FontText{% + \usefont{T1}{phv}{m}{n}\fontsize{12.4pt}{12pt}\selectfont\black}{% + \usefont{T1}{phv}{m}{n}\fontsize{12.4pt}{12pt}\selectfont\black} + +\newcommand{\slidetitle}[1]{% + \ifinColor% + \rput[tr](317pt,101pt){% + \includegraphics[width=355pt,height=2pt]{degrade-blanc-bleu.eps}}% + \else% + \rput[tr](317pt,101pt){% + \psframe[linecolor=verylightgray,fillstyle=solid,fillcolor=verylightgray](0pt,0pt)(-355pt,-2pt)}% + \fi% + \rput[lB](0pt,102pt)% + {\fontTitle{#1}}} + +\LogoPosition{-1,-1.1} + +\newcommand{\FrameWithCorners}[1]{% + % (-35pt, -37pt) + \rput(-15pt,-17pt){% + \pspolygon[linewidth=0mm,linecolor=cornerblue,fillstyle=solid,fillcolor=cornerblue](0,0)(.5,0)(.5,.2)(.2,.2)(.2,.5)(0,.5)% + }% + % (342pt, 246pt) + \rput(322pt,226pt){% + \pspolygon[linewidth=0mm,linecolor=cornerblue,fillstyle=solid,fillcolor=cornerblue](0,0)(-.5,0)(-.5,-.2)(-.2,-.2)(-.2,-.5)(0,-.5)% + }% + \PutLogo % Mandatory + {#1}} + +\NewSlideStyle{t}{5.3,2.4}{FrameWithCorners} + +\PDFCroppingBox{10 40 594 820} +\RequirePackage{semhelv} + +\ifinColor +\myitem{1}{\includegraphics[width=2.8mm]{boulebleue-fondblanc.eps}} +\myitem{2}{\includegraphics[width=2.6mm]{bouleverte-fondblanc.eps}} +\myitem{3}{\includegraphics[width=2.5mm]{boulerouge-fondblanc.eps}} +\else +\myitem{1}{$\blacktriangleright$} +\myitem{2}{$\triangleright$} +\myitem{3}{$\star$} +\fi + +\gdef\@captionLeft{}%\@Author} % ATTENTION ! \@Author doit être défini ! +\newcommand{\slideCaptionLeft}[1]{\gdef\@captionLeft{#1}} +\newcommand{\NotLastYetMark}{$\triangledown$} + +\newcommand{\NothingLeftPastThisPoint}{% + \ifallPages\lastpage@putlabel\fi% + \global\thePagesfalse% +} + +% trucs + +\newif\ifThereAreStillOverlays +\global\ThereAreStillOverlaysfalse + +\newif\ifLastPageAlreadyDefined +\global\LastPageAlreadyDefinedfalse + +%% grosse inspiration de PPRpascal +% Copyright (c) 2000 Pascal Poizat +% All rights reserved. + +\newif\ifthePages +\global\thePagestrue +\newif\iftheCartouche +\global\theCartouchetrue + +\renewpagestyle{GenericPageStyle}{\hfill}{% + \ifshowVersion\else\iftheCartouche\tiny{\@captionLeft}\fi\fi% + \hfill% + \ifisDraft{\@colorFoot\tiny% + \textbf{\jobname.tex}~--~\@Title~--~\@Author~--~\number\day/\number\month/\number\year~--~\timenow\ifthePages~--~p.\thepage\ifallPages/\realpageref{last@page}\fi\fi}% + \else% + \ifshowVersion% + {\@colorFoot\tiny% + \textbf{\jobname.tex}~--~\@Title~--~\@Author~--~\number\day/\number\month/\number\year~--~\timenow\ifthePages~--~p.\thepage\ifallPages/\realpageref{last@page}\fi\fi}% + \else% + \iftheCartouche% + {\@colorFoot\tiny\ifThereAreStillOverlays\NotLastYetMark\fi% + \@cartouche\ifthePages~--~p.\thepage\ifallPages/\realpageref{last@page}\fi\fi}% + \fi% + \fi% + \fi% +} +%% fin de l'inspiration + +\AtBeginDocument{% +% +% Redéf de lastpage@label pour pouvoir le définir avant la fin +% + \let\jyb@lastPagePutLabel=\lastpage@putlabel% + \def\lastpage@putlabel{% + \ifLastPageAlreadyDefined{}\else\jyb@lastPagePutLabel% + \global\LastPageAlreadyDefinedtrue\fi}% +% +% on redéfinit \maketitle pour virer le cartouche en bas +% + \let\jyb@maketitle=\maketitle% + \def\maketitle{% + \addtocounter{slide}{-1}% + \global\thePagesfalse% + \global\theCartouchefalse% + \jyb@maketitle% + \global\thePagestrue% + \global\theCartouchetrue% + }% +% +% magouille pour voir si on est en bout d'anim ou pas +% + \let\jyb@Overlays=\SlideOverlay% + \def\SlideOverlay{\@ifnextchar[\jybSlideOverlay@two\jybSlideOverlay@one}% +% + \def\jybSlideOverlay@two[#1]#2{% + \jyb@Overlays[#1]{#2}% + \global\ThereAreStillOverlaystrue% + \fromSlide*{\thelimitOverlays}{\global\ThereAreStillOverlaysfalse}}% +% + \def\jybSlideOverlay@one#1{% + \jyb@Overlays{#1}% + \global\ThereAreStillOverlaystrue% + \fromSlide*{\thelimitOverlays}{\global\ThereAreStillOverlaysfalse}}% +% +} + +\endinput
\ No newline at end of file |