%==============================================================================
% Prosper -- (PPRcapsules.sty) Style file
% A LaTeX class for creating slides
% Author: Mathieu Goutelle (Mathieu.Goutelle@ens-lyon.fr)
%         INRIA Rhône-Alpes
%         École Normale Supérieure de Lyon, France
%
% Copyright (c) 2002 Mathieu Goutelle
% 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.
%
%==============================================================================
\NeedsTeXFormat{LaTeX2e}[1995/12/01]
\ProvidesPackage{PPRcapsules}[2003/01/30]
\typeout{capsules style for Prosper ---}
\typeout{(c) 2002 Mathieu Goutelle, INRIA, France}
\typeout{ }

% Required packages
\RequirePackage{amssymb}
\RequirePackage{palatino,mathpazo}

% Colors 
\newrgbcolor{mylightgreen}{0.6 0.8 0.6}
\newrgbcolor{mygreen}{0 0.4 0.4}
\newrgbcolor{myblue}{0 0.2 0.4}
\ifinColor%
   \def\colA{mylightgreen}
   \def\colB{myblue}
   \global\let\colC=\mygreen
   \global\let\colD=\myblue
\else%
   \def\colA{lightgray}
   \def\colB{black}
   \global\let\colC=\black
   \global\let\colD=\black
\fi

% The fonts
\FontTitle{%
  \usefont{T1}{phv}{b}{n}\fontsize{20.74pt}{20pt}\selectfont\colD}{%
  \usefont{T1}{phv}{b}{n}\fontsize{20.74pt}{20pt}\selectfont\colD}
\FontText{%
  \usefont{T1}{ppl}{m}{n}\fontsize{14.4pt}{13pt}\selectfont\colD}{%
  \usefont{T1}{ppl}{m}{n}\fontsize{14.4pt}{13pt}\selectfont\colD}

\ColorFoot{\colD}

% Positionning of the title of a slide.
\def\slidetitle#1{\rput[lb](0.1,3.3){%\fontTitle
    \parbox{11.5cm}{\fontTitle{\colC\baselineskip=0pt #1}}}}

% Positionning for a logo
\LogoPosition{-1.2,-1.2}

\newcommand{\CapsuleFrame}[1]{%
  \psframe[fillstyle=solid,fillcolor=\colA,linestyle=none,linewidth=0pt](-2,-1.4)(0,9)%
  \psframe[fillstyle=solid,fillcolor=\colA,linestyle=none,linewidth=0pt](0,7.5)(5,9)%
  \pscircle[fillstyle=solid,fillcolor=white,linestyle=none,linewidth=0pt](0.5,7.5){0.5}%
  \psframe[fillstyle=solid,fillcolor=white,linestyle=none,linewidth=0pt](0.5,7.49)(5.01,8)%

  \pscircle[fillstyle=solid,fillcolor=\colB,linestyle=none,linewidth=0pt](-0.5,6.5){0.2}%
  \psframe[fillstyle=solid,fillcolor=\colB,linestyle=none,linewidth=0pt](-0.5,6.3)(9,6.7)%

  \PutLogo % Mandatory
  {#1}}

\myitem{1}{\scriptsize\colD\raisebox{1pt}{\ensuremath{\blacksquare}}}
\myitem{2}{\scriptsize\colD\raisebox{1pt}{\ensuremath{\blacklozenge}}}
\myitem{3}{\scriptsize\colD\raisebox{1pt}{\ensuremath{\bullet}}}

\NewSlideStyle[11.5cm]{t}{6.4,2.4}{CapsuleFrame}
\PDFCroppingBox{0 15 594 840}

\endinput

%%% Local Variables: 
%%% mode: latex
%%% TeX-master: t
%%% End: 
