%==============================================================================
%
% HAPTycja -- style file for use with HA-prosper.
%
% Created by: Hendri Adriaens
%             http://center.uvt.nl/phd_stud/adriaens
%             Center for Economic Research
%             Tilburg University, the Netherlands
%
% Copyright (c) 2003-2004 Hendri Adriaens. All rights reserved.
%
% 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 files.txt present in this package.
%
%==============================================================================

\NeedsTeXFormat{LaTeX2e}[1995/12/01]
\ProvidesPackage{HAPTycja}[2004/05/16]
\typeout{`Tycja' style for HA-prosper}
\typeout{(c) 2003-2004 Hendri Adriaens, Tilburg, the Netherlands}
\typeout{Package version: 1.5}
\typeout{ }

% Color definitions
\newrgbcolor{tjlblue}{.78 .82 .85}
\newrgbcolor{tjblue}{.19 .39 .61}
\newrgbcolor{tjdblue}{.09 .27 .47}
\newrgbcolor{HAP@textc}{.09 .27 .47}
\newrgbcolor{tjyellow}{1 .81 .42}
\newrgbcolor{tjlyellow}{1 .97 .84}
\newrgbcolor{HAP@framecolor}{.09 .27 .47}

% Highlighting definitions
\newrgbcolor{HAP@hcolor}{.09 .27 .47} % Highlight frame color
\newrgbcolor{HAP@htcolor}{1 .97 .84}  % Highlight text color

% Font definitions
\FontTitle{\usefont{T1}{phv}{b}{n}\fontsize{14.4pt}{14pt}\selectfont\tjdblue}%
  {\usefont{T1}{phv}{b}{n}\fontsize{14.4pt}{14pt}\selectfont\tjdblue}
\FontText{\usefont{T1}{phv}{m}{n}\fontsize{10pt}{10pt}\selectfont\HAP@textc}%
  {\usefont{T1}{phv}{m}{n}\fontsize{10pt}{10pt}\selectfont\HAP@textc}
\FontLeftFoot{\@fontTextColor\fontsize{4pt}{4pt}\selectfont\tjdblue}%
  {\@fontTextColor\fontsize{4pt}{4pt}\selectfont\tjdblue}
\FontRightFoot{\@fontTextColor\fontsize{4pt}{4pt}\selectfont\tjdblue}%
  {\@fontTextColor\fontsize{4pt}{4pt}\selectfont\tjdblue}

% Slide style definitions
\RequirePackage{pst-grad}
\newcommand{\TitleSlide}[1]{%
  \ifHAP@portrait
    \psframe[linestyle=none,fillcolor=tjlyellow,fillstyle=solid](-2,11.5)(12.5,-.9)%
    \psline[linewidth=.3pt,linecolor=tjdblue]{C-C}(-2,9.1)(-1,9.1)%
    \psline[linewidth=.3pt,linecolor=tjdblue]{C-C}(-1,9.1)(-1,9.4)%
    \psline[linewidth=.3pt,linecolor=tjdblue]{C-C}(-1,9.4)(12.5,9.4)%
    \psframe[linestyle=none,fillstyle=gradient,gradbegin=tjlblue,gradend=tjblue,gradmidpoint=1](-2,-.15)(12.5,-2.26)%
    \HAP@PutLF{tl}{-0.95,-.35}%
    \HAP@PutRF{tr}{8.6,-.35}%
  \else%
    \psframe[linestyle=none,fillcolor=tjlyellow,fillstyle=solid](-2,9)(12.5,-.6)%
    \psline[linewidth=.3pt,linecolor=tjdblue]{C-C}(-2,7.6)(-1,7.6)%
    \psline[linewidth=.3pt,linecolor=tjdblue]{C-C}(-1,7.6)(-1,7.9)%
    \psline[linewidth=.3pt,linecolor=tjdblue]{C-C}(-1,7.9)(12.5,7.9)%
    \psframe[linestyle=none,fillstyle=gradient,gradbegin=tjlblue,gradend=tjblue,gradmidpoint=1](-2,-.5)(12.5,-1.32)%
    \HAP@PutLF{tl}{-1.65,-.9}%
    \HAP@PutRF{tr}{11.35,-.9}%
  \fi%
  {#1}}%

\newcommand{\NormalSlide}[1]{%
  \ifHAP@portrait%
    \psframe[linestyle=none,fillcolor=tjlyellow,fillstyle=solid](-2,11.5)(12.5,-.9)%
    \psline[linewidth=.3pt,linecolor=tjdblue]{C-C}(-2,9.1)(-1,9.1)%
    \psline[linewidth=.3pt,linecolor=tjdblue]{C-C}(-1,9.1)(-1,9.4)%
    \psline[linewidth=.3pt,linecolor=tjdblue]{C-C}(-1,9.4)(12.5,9.4)%
    \psframe[linestyle=none,fillstyle=gradient,gradbegin=tjyellow,gradend=tjlyellow,gradmidpoint=1](8.4,11.5)(10,-2)%
    \psframe[linestyle=none,fillstyle=gradient,gradbegin=tjlblue,gradend=tjblue,gradmidpoint=1](-2,-.15)(12.5,-5)%
    \ifHAP@toc%
      \rput[tr](3.7,-.8){\begin{minipage}[t]{2cm}\HAP@tsections\end{minipage}}%
      \rput[tl](4.1,-.8){\begin{minipage}[t]{2cm}\HAP@tcontent\end{minipage}}%
    \fi%
    \HAP@PutLF{tl}{-0.95,-.35}%
    \HAP@PutRF{tr}{8.6,-.35}%
  \else%
    \psframe[linestyle=none,fillcolor=tjlyellow,fillstyle=solid](-2,9)(9.4,-.6)%
    \psline[linewidth=.3pt,linecolor=tjdblue]{C-C}(-2,7.6)(-1,7.6)%
    \psline[linewidth=.3pt,linecolor=tjdblue]{C-C}(-1,7.6)(-1,7.9)%
    \psline[linewidth=.3pt,linecolor=tjdblue]{C-C}(-1,7.9)(9.4,7.9)%
    \psframe[linestyle=none,fillstyle=gradient,gradbegin=tjyellow,gradend=tjlyellow,gradmidpoint=1](9.3,9)(12.5,-2)%
    \psframe[linestyle=none,fillstyle=gradient,gradbegin=tjlblue,gradend=tjblue,gradmidpoint=1](-2,-.5)(12.5,-1.32)%
    \ifHAP@toc%
      \rput[lt](9.475,7.25){\begin{minipage}[t]{2cm}\HAP@toc\end{minipage}}%
    \fi%
    \HAP@PutLF{tl}{-1.65,-.9}%
    \HAP@PutRF{tr}{11.35,-.9}%
  \fi%
  {#1}}%

\newcommand{\SpecialSlide}[1]{%
  \ifHAP@portrait%
    \psframe[linestyle=none,fillcolor=tjlyellow,fillstyle=solid](-2,11.5)(12.5,-.9)%
    \psline[linewidth=.3pt,linecolor=tjdblue]{C-C}(-2,9.1)(-1,9.1)%
    \psline[linewidth=.3pt,linecolor=tjdblue]{C-C}(-1,9.1)(-1,9.4)%
    \psline[linewidth=.3pt,linecolor=tjdblue]{C-C}(-1,9.4)(12.5,9.4)%
    \psframe[linestyle=none,fillstyle=gradient,gradbegin=tjyellow,gradend=tjlyellow,gradmidpoint=1](8.4,11.5)(10,-.2)%
    \psframe[linestyle=none,fillstyle=gradient,gradbegin=tjlblue,gradend=tjblue,gradmidpoint=1](-2,-.15)(12.5,-5)%
    \ifHAP@toc%
      \rput[tr](3.7,-.8){\begin{minipage}[t]{2cm}\HAP@tsections\end{minipage}}%
      \rput[tl](4.1,-.8){\begin{minipage}[t]{2cm}\HAP@tcontent\end{minipage}}%
    \fi%
    \HAP@PutLF{tl}{-0.95,-.35}%
    \HAP@PutRF{tr}{8.6,-.35}%
  \else%
    \psframe[linestyle=none,fillcolor=tjlyellow,fillstyle=solid](-2,9)(9.4,-.6)%
    \psframe[linestyle=none,fillstyle=gradient,gradbegin=tjyellow,gradend=tjlyellow,gradmidpoint=1](9.3,9)(12.5,-2)%
    \psframe[linestyle=none,fillcolor=tjlyellow,fillstyle=solid](9.2,7.91)(12.5,-2)%
    \psline[linewidth=.3pt,linecolor=tjdblue]{C-C}(-2,7.6)(-1,7.6)%
    \psline[linewidth=.3pt,linecolor=tjdblue]{C-C}(-1,7.6)(-1,7.9)%
    \psline[linewidth=.3pt,linecolor=tjdblue]{C-C}(-1,7.9)(12.5,7.9)%
    \psframe[linestyle=none,fillstyle=gradient,gradbegin=tjlblue,gradend=tjblue,gradmidpoint=1](-2,-.5)(12.5,-1.32)%
    \HAP@PutLF{tl}{-1.65,-.9}%
    \HAP@PutRF{tr}{11.35,-.9}%
  \fi%
  {#1}}%

\ifHAP@portrait
  \newcommand{\HAPR@titleSlide}{\NewSlideStyle[9cm]{tl}{-.65,2.9}{TitleSlide}}
  \newcommand{\HAPR@normalSlide}{\NewSlideStyle[8.7cm]{tl}{-.65,3.3}{NormalSlide}}
  \newcommand{\HAPR@wideSlide}{\NewSlideStyle[8.7cm]{tl}{-.65,3.3}{NormalSlide}}
  \newcommand{\HAPR@dualSlide}{\NewSlideStyle[4.2cm]{tl}{-.65,3.3}{NormalSlide}}
  \newcommand{\slidetitle}[1]{\rput[Br](8.3,4.55){\fontTitle{#1}}}
\else
  \newcommand{\HAPR@titleSlide}{\NewSlideStyle[11.7cm]{tl}{-.6,3.4}{TitleSlide}}
  \newcommand{\HAPR@normalSlide}{\NewSlideStyle[9.5cm]{tl}{-.6,3.7}{NormalSlide}}
  \newcommand{\HAPR@wideSlide}{\NewSlideStyle[11.7cm]{tl}{-.6,3.7}{SpecialSlide}}
  \newcommand{\HAPR@dualSlide}{\NewSlideStyle[5.5cm]{tl}{-.6,3.7}{SpecialSlide}}
  \newcommand{\slidetitle}[1]{\rput[Br](9.2,4.55){\fontTitle{#1}}}
\fi

% List item definitions
\RequirePackage{pifont}
\myitem{1}{\raisebox{1pt}{\fontsize{7pt}{7pt}\selectfont\ding{110}}}
\myitem{2}{\raisebox{1pt}{\fontsize{7pt}{7pt}\selectfont\ding{117}}}
\myitem{3}{\raisebox{1pt}{\fontsize{5pt}{5pt}\selectfont\ding{110}}}

% Style of table of contents entries
\newcommand{\HAP@tsectionm}{%
  \ifHAP@portrait\else
    \psline[linecolor=tjdblue,linewidth=.25pt](-.04,-.05)(2,-.05)%
  \fi
}
\newcommand{\HAP@tsectiononly}[1]{\parbox{2cm}{\raggedleft#1\,}}

\endinput