%%=============================================================================
%% PPRazure.sty (a slide style for Prosper)
%% Copyright 2000-2001 Frédéric Goualard
%%
%% This program may be distributed and/or modified under the
%% conditions of the LaTeX Project Public License, either version 1.2
%% of this license or (at your option) any later version.
%% The latest version of this license is in
%%   http://www.latex-project.org/lppl.txt
%% and version 1.2 or later is part of all distributions of LaTeX 
%% version 1999/12/01 or later.
%%
%% This program consists of the files listed in manifest.txt
%%
%% CVSId : $Id: PPRazure.sty,v 1.3 2001/10/24 15:11:25 exupery Exp $
%%=============================================================================
\NeedsTeXFormat{LaTeX2e}[1995/12/01]
\ProvidesPackage{PPRazure}[2000/04/18]
\typeout{Azure style for Prosper ---}
\typeout{(c) 2000 Frederic Goualard, IRIN, France}
\typeout{CVSId: $Id: PPRazure.sty,v 1.3 2001/10/24 15:11:25 exupery Exp $}
\typeout{ }

% Required packages
\IfFileExists{pst-grad}{\RequirePackage{pst-grad}}{\RequirePackage{gradient}}
\RequirePackage{amssymb}
\RequirePackage{times}

% Colors 
\newrgbcolor{lightblue}{.30 .86 .89}
\ifinColor
\def\colA{blue}
\def\colB{black}
\global\let\colC=\lightblue
\ifcolorBG
\global\let\colD=\white
\else
\global\let\colD=\black
\fi
\else
\def\colA{white}
\def\colB{lightgray}
\global\let\colC=\blue
\global\let\colD=\black
\fi

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

\ColorFoot{\colD}

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

% Positionning for a logo
\LogoPosition{-1,-1.1}

\newcommand{\BSquareFrame}[1]{%
  \ifcolorBG
  \psframe[fillstyle=gradient,gradbegin=\colB,gradend=\colA,gradmidpoint=1]%
          (-2,-1.4)(12.5,9)
  \fi
  \psframe[fillstyle=gradient,gradbegin=\colA,gradend=\colB,gradmidpoint=.5,
          linestyle=none]%
          (-2,-1.4)(0,9)
  \multirput(-1.4,-1)(0,.35){29}{%
    \psframe[fillstyle=solid,fillcolor=\colA,linestyle=none](0,0)(.25,.25)}
  \PutLogo % Mandatory
  {#1}}

\NewSlideStyle{t}{6,3.4}{BSquareFrame}
\PDFCroppingBox{10 15 594 840}


\endinput

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