\ProvidesPackage{myslides}[2003/05/13 My slide show.]
\RequirePackage{semcolor}
\RequirePackage{semlayer}
\RequirePackage{pstricks}
\RequirePackage{pstcol}
\RequirePackage{pst-grad}
\RequirePackage{fancyhdr}
\RequirePackage{mytools}
\input{seminar.bug}
\input{seminar.bg2}

% Version

% When this is true, the color presentation will be produced; otherwise a
% printable black-and-white is generated.
\newif\ifcolor
\colortrue
%
%%%%%%%%%%%%%%%%%%%%
%
% Configuration
%
%%%%%%%%%%%%%%%%%%%%
%
% Colors
%
%%%%%%%%%%%%%%%%%%%%
%
% Background color
%
\definecolor{DarkBlue}{rgb}{0,0,0.5}
\definecolor{DarkRed}{rgb}{0.5,0,0}
\definecolor{DarkGreen}{rgb}{0,0.5,0}
\def\bgcolor{DarkBlue}
%
% Title highlight font (excludes size)
%
\def\titlefont{\bfseries\ifcolor\color{yellow}\else\color{darkgray}\fi}
%
% Code font
%
\def\cmd#1{{\ifcolor\color{green}\else\color{darkgray}\fi#1}}
%
% Changes the background color
%
\SeminarNewSlideFrameBackground{mystyle}[%
	\psset{fillstyle=gradient,gradbegin=black,gradend=\bgcolor,%
		gradmidpoint=0.5,gradangle=180}%
]{%
	\rput(-1pt,-1pt){\psframe[linestyle=none](\paperheight,\paperwidth)%
	}%
}

%
\AtBeginDocument{%
\ifcolor
	\slideframe{none}
	\SeminarSlideFrameBackground{mystyle}
	\color{white}
	\psset{linecolor=white}
	\white
\else
	\slideframe{none}
	\color{black}
	\black
\fi
}
%
% Black final slide style
%
\newslideframe{black}[\psset{fillstyle=solid,fillcolor=black}]{%
    \rput(-\slideleftmargin,-\slidebottommargin){%
	\psframe[linestyle=none](\paperheight,\paperwidth)%
    }%
    \psframebox{#1}%
}
%
% Makes a black slide at the end of the presentation (only if we're in color)
\def\blackfinalslide{%
    \ifslide
	\typeout{^^JYou didn't end your last slide. I will end it for you.^^J}%
	\end{slide}
    \fi
    \ifcolor
	\begingroup
	    \psset{linecolor=black}
	    \slideframe{black}
	    \begin{slide}
	    \pagestyle{plain}
		\color{black}ABCDEFG HIJKLMNOP QRSTUV WXYZ a b c d e f g h i j k
		    l m n o p q r s t u v w x y z 1 2 3 4 5 6 7 8 9 0
	    \end{slide}
	\endgroup
    \fi%
}
%
%
% Prints a title on a slide
%
\def\slidetitle#1{%
	\begin{center}%
		\titlefont\large#1%
	\end{center}%
	\vspace{6pt}
}
%
% Creates a title slide. Title is created with normal \title, \author, etc.
%
\def\titleslide{\begin{slide}\slidemaketitle\end{slide}}
\def\slidemaketitle{%
    \pagestyle{empty}%
    \vbox to \textheight{
	\vskip 0pt plus 1fill
	\flushvbox[l]{\Large\titlefont\@title\par}%
	\vspace{10pt}
	\hrule\vspace{10pt}%
	{\noindent \hskip 0.15\textwidth
		\@tempdima0.85\textwidth
		\edef\@subtitle{\noexpand\begin{minipage}{\@tempdima}}%
		\def\and{\\[0.3\baselineskip]}%
		\@subtitle\large\@author\\[0.3\baselineskip]%
		\@date\end{minipage}%
	}
	\vskip 0pt plus 1fill
    }
}
%
% Overlay List Environments.
%
\let\myslides@oldlist\list
\def\overlayLists{\def\list{\SeminarItemInOverlay\myslides@oldlist}}%
\def\noOverlayLists{\let\list\myslides@oldlist}%
\overlayLists
%
% Increment the overlay number
%
\newcommand\nextoverlay{\stepcounter{overlay}\overlay{\the\c@overlay}}
\newcommand\nameoverlay[1]{%
    \expandafter\xdef\csname overlay@#1\endcsname{\the\c@overlay}%
}
\newcommand\useoverlay[1]{\overlay{\csname overlay@#1\endcsname}}
%
% Headers and footers
%
\pagestyle{fancy}
\let\headwidth\textwidth
\def\headrulewidth{0pt}
\cfoot{\fancyplain{}{Slide~\theslide}}
\lfoot{}
\rfoot{}
\centerslidesfalse
\SeminarCumulativeOverlays
\endinput