%==============================================================================
% Prosper -- (PPRfyma.sty) Style file
% A LaTeX class for creating slides
% Author: Laurent Jacques <ljacques@fyma.ucl.ac.be>
%         FYMA/UCL
%
% Copyright (c) 2002 Laurent Jacques
% 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: PPRfyma.sty,v 1.1 2003/01/27 14:39:20 exupery Exp $
%==============================================================================
\NeedsTeXFormat{LaTeX2e}[1995/12/01]
\ProvidesPackage{PPRfyma}[2002/12/03]
\typeout{FYMA style for Prosper ---}
\typeout{(copyleft) 2002, L. Jacques FYMA/UCL}
\typeout{CVSId: $Id: PPRfyma.sty,v 1.1 2003/01/27 14:39:20 exupery Exp $}
\typeout{ }

\RequirePackage{amssymb}
% Loading packages necessary to define this slide style.
\IfFileExists{pst-grad}{\RequirePackage{pst-grad}}{\RequirePackage{gradient}}

\newrgbcolor{fymablue}{0.24 0.45 0.70}
\newrgbcolor{fymalightblue}{0.43 0.61 0.84}
\newrgbcolor{fymadarkblue}{0.14 0.34 0.55}
\newrgbcolor{fymaroyalblue}{0.06 0.25 0.41}
\newrgbcolor{fymafaintblue}{0.88 0.95 1.00}

\FontTitle{%
  \usefont{T1}{ptm}{m}{sl}\fontsize{13pt}{13pt}\selectfont\fymaroyalblue}{%
  \usefont{T1}{ptm}{m}{sl}\fontsize{13pt}{13pt}\selectfont\fymaroyalblue}
\FontText{%
  \usefont{T1}{phv}{m}{n}\fontsize{11pt}{11pt}\selectfont\fymadarkblue}{%
  \usefont{T1}{phv}{m}{n}\fontsize{10pt}{10pt}\selectfont\fymadarkblue}

\ColorFoot{\fymablue}

% Positionning of the title of a slide.
\newlength{\FymaTitleLength}
\newcommand{\slidetitle}[1]{%
  \rput[lt](-0.8,4.6){\parbox[t]{10cm}
    {
      \settowidth{\FymaTitleLength}{#1}
      \addtolength{\FymaTitleLength}{0.2cm}
      {\fymaroyalblue #1}\\
      \psframe[linestyle=none,fillstyle=solid,linewidth=2pt,fillcolor=fymalightblue](-0.05,0.45)(\FymaTitleLength,0.55)
    }
  }
  \ \\[-1.5cm]
}

% Redefining the bullet of the itemize
\myitem{1}{\scriptsize\fymalightblue\raisebox{2pt}{\ensuremath{\bullet}}}
\myitem{2}{\scriptsize\fymalightblue\raisebox{2pt}{\ensuremath{\circ}}}

% Positionning for a logo
\LogoPosition{-1.25,-1.15}

% Definition of this style for slides.

\newcommand{\TPFrame}[1]
{
  % Main gradient
  \ifisDraft
  \else
  \psframe[linestyle=none, fillstyle=gradient, 
  gradbegin=fymafaintblue,gradend=white,gradmidpoint=0](-1.37,-0.77)(11.97,8.47)
  \fi
  % Top line
  \psframe[linestyle=none,fillstyle=solid,linewidth=2pt,fillcolor=fymalightblue](-1.5,8.5)(12.1,8.4)

  % Top left cross
  \psframe[linestyle=none,fillstyle=solid,linewidth=2pt,fillcolor=fymalightblue](-1.4,8.6)(-1.3,8.25)
  % Top right cross
  \psframe[linestyle=none,fillstyle=solid,linewidth=2pt,fillcolor=fymalightblue](11.9,8.6)(12.0,8.25)

  % Bottom line
  \psframe[linestyle=none,fillstyle=solid,linewidth=2pt,fillcolor=fymalightblue](-1.5,-0.8)(12.1,-0.7)

  % Bottom left blue rectangle
  %\psframe[linestyle=none,fillstyle=solid,linewidth=2pt,fillcolor=fymalightblue](-1.4,-1.2)(0.4,-0.7)

  % Bottom left cross
  \psframe[linestyle=none,fillstyle=solid,linewidth=2pt,fillcolor=fymalightblue](-1.4,-0.9)(-1.3,-0.55)

  % Bottom right cross
  \psframe[linestyle=none,fillstyle=solid,linewidth=2pt,fillcolor=fymalightblue](11.9,-0.9)(12,-0.55)

  {\fymadarkblue \small \PutLogo} % Mandatory 
  {#1}
}

\NewSlideStyle{t}{5.3,2.9}{TPFrame}
\RequirePackage{semhelv}
\addtolength{\textwidth}{2cm}
\endinput

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