%%
%% Name:                DGslides.sty
%%
%% Created:             051095
%%
%% By:                  Jesper Grode
%%
%% Original:            DAGSlides.sty by J.P.Brage (J.Staunstrup, J.Madsen)
%%
%% Modifications:       
%%
%% Defines:             The DGslides style, which is a style for making
%%                      slides in the 'horisontal bars' style. The slides
%%                      will include the Design Group logo.
%%
%% Usage:               1) Include this file in the main text:
%%
%%                              \usepackage{DGslides}
%%
%%                      2) Redefine SlideSet (lower left comment)
%%                         in the slide file:
%%
%%                              \renewcommand{\SlideSet}{Conference Name}
%%
%%                      3) Redefine Title (title comment) before each slide:
%%
%%                              \renewcommand{\Title}{This is the First Slide}
%%
%%
%%
%% Runs with:           LaTeX2e
%%


%% Reduce the topmargin:
\setlength{\topmargin}{-20mm}

%% Set the height of the top box (hor. bar and logo)
\setlength{\headheight}{21mm}

%% Set the space between the head and the body of the slide
\setlength{\headsep}{10mm}

%% Set the width and the height of the body of the slide
\setlength{\textheight}{135mm}
\setlength{\textwidth}{245mm}


%% Redefine the list environment
\def\@listi{
\parsep .2\parskip
%\parsep .5\parskip
\topsep \parsep
\itemsep 0pt
%\itemsep \parskip
\partopsep \z@}

%% Set the distance between the last line in the body and the bottom
%% of the foot
\setlength{\footskip}{15mm}

%% \footheight has been removed from LaTeX2e, redefine and set it.
%% The value defines the height of the bottom box (hor. bar)
\def\footheight{7mm}

%% The value of \oddsidemargin is one inch less than the distance
%% from the left edge of the paper to the left margin (on right
%% hand side pages)
\setlength{\oddsidemargin}{0mm}

%% Define default values for the title of each slide and the
%% title for the entire slideset
\def\DefaultTitle{\rm You have forgotten to supply a title for this slide!}
\def\Title{\DefaultTitle}
\def\SlideSet{\rm You have forgotten to supply a title for the slideset!}

%% Define the bars in the head and the foot
%% Note: The %-signs are placed to make TeX understand the code
%%       the way its supposed to. Sometimes newlines will induce
%%       strange behaviours, therefore they have been commented out.
%%
%% The \@oddhead defines the head of the page at right hand side pages,
%% similar the \@oddfoot. The \strut is a veritical empty box with
%% zero width, to make it all align with spacing around head- and foot-
%% text and the bars.

\def\ps@slide
{%
  \def\@oddhead
  {%
    \@visibletrue
    \vbox
    {%
      \vbox to 25mm
      {%
        \vfill
        \vbox
        {%
          \centering
          \large
          \bf
          \baselineskip 9mm
          \Title 
          \strut
        }
      } 
      \newdimen\aa
      \aa=\hsize
      \advance\aa-25mm
      \hrule width \aa height 1.2mm
%   }
    } \hspace*{-26mm} \psfig{file=CNRLogo.eps,width=15mm}
%   } \hspace*{-26mm} \psfig{file=CSLogo.eps,width=15mm}
    \global\def\Title{\DefaultTitle}%
  }%
  \def\@oddfoot
  {%
    \@visibletrue
    \vbox to \footheight
    {%
      \hrule width \hsize height 1.2mm
      \vfil
      \hbox to \hsize
      {%
        \tiny
        \bf
        \strut
        \SlideSet
        \hfill
%       \theslide
      }%
    }%
  }%
}