1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
|
%==============================================================================
% HA-prosper -- (HAPciment.sty) Style file
% A LaTeX class for creating slides
% Author: Mathieu Goutelle (mgoutell[at]users[dot]sourceforge[dot]net)
% UREC CNRS, France
%
% Copyright (c) 2004 Mathieu Goutelle
% 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.
%
%==============================================================================
\NeedsTeXFormat{LaTeX2e}[1995/12/01]
\ProvidesPackage{HAPciment}[2004/06/17]
\typeout{ciment style for HA-prosper}
\typeout{(c) 2004 Mathieu Goutelle, UREC CNRS, France}
\typeout{ }
\ifHAP@portrait
\PackageError{HAPcapsules}{This template does not support portrait slides}%
{Sorry, no additional help}%
\fi
% Required packages
\RequirePackage{amssymb}
\RequirePackage{semhelv,mathpazo}
\RequirePackage{multido}
% Colors
\newrgbcolor{mydarkred}{0.7 0.1 0.1}
\newrgbcolor{mydarkgray}{0.2 0.2 0.2}
\newrgbcolor{mylightgray}{0.7 0.7 0.7}
\newrgbcolor{HAP@textc}{0 0 0}
\newrgbcolor{HAP@framecolor}{0.2 0.2 0.2}
\newrgbcolor{HAP@hcolor}{0.7 0.1 0.1} % Highlight frame color
\newrgbcolor{HAP@htcolor}{1 1 1} % Highlight text color
% The fonts
\FontTitle{%
\usefont{T1}{phv}{b}{n}\fontsize{14.4pt}{14.4pt}\selectfont\mydarkred}{%
\usefont{T1}{phv}{b}{n}\fontsize{14.4pt}{14.4pt}\selectfont\mydarkred}
\FontText{%
\usefont{T1}{phv}{m}{n}\fontsize{10pt}{10pt}\selectfont\black}{%
\usefont{T1}{phv}{m}{n}\fontsize{10pt}{10pt}\selectfont\black}
\def\@fontSubtitleColor{\@fontTitleColor\fontsize{14pt}{14pt}\selectfont\itshape}
\FontLeftFoot{\@fontTextColor\fontsize{4pt}{4pt}\selectfont\mydarkgray}%
{\@fontTextColor\fontsize{4pt}{4pt}\selectfont\mydarkgray}
\FontRightFoot{\@fontTextColor\fontsize{4pt}{4pt}\selectfont\mydarkgray}%
{\@fontTextColor\fontsize{4pt}{4pt}\selectfont\mydarkgray}
% Positionning of the title of a slide.
\newlength{\CimentTitleLength}
\setlength{\parindent}{0pt}
\def\slidetitle#1{%
\rput[lt](-0.8,4.8){%
\parbox[t]{11cm}{%
\settowidth{\CimentTitleLength}{\fontTitle{#1}}%
\addtolength{\CimentTitleLength}{0.1cm}%
{\fontTitle{#1}}\\%
\psline[linewidth=3pt,linecolor=mydarkred](-0.05,0.4)(\CimentTitleLength,0.4)%
\psline[linewidth=1pt,linecolor=mydarkred](\CimentTitleLength,0.424)(12.1,0.424)%
}%
}%
\null\\[-1.2cm]%
}
\newcommand{\TitleSlide}[1]{
\multirput(0,2pt){160}{\psline[linecolor=mylightgray,linewidth=0.5pt](-2,-2)(13,-2)}%
\psline[linewidth=1pt,linecolor=mydarkred](-1.5,-0.8)(11.4,-0.8)%
\HAP@PutLF{tl}{-1.45,-.9}%
\HAP@PutRF{tr}{11.35,-.9}%
{#1}}
\newcommand{\NormalSlide}[1]{
\multirput(0,2pt){160}{\psline[linecolor=mylightgray,linewidth=0.5pt](-2,-2)(13,-2)}%
\psframe[fillstyle=solid,fillcolor=mylightgray,linestyle=none,linewidth=0pt](-2,-0.17)(0.4,7.15)%
\ifHAP@toc%
\rput[lt](-1.7,7){\begin{minipage}[t]{2cm}\HAP@toc\end{minipage}}%
\fi%
\psline[linewidth=1pt,linecolor=mydarkred](-1.5,-0.8)(11.4,-0.8)%
\HAP@PutLF{tl}{-1.45,-.9}%
\HAP@PutRF{tr}{11.35,-.9}%
{#1}}
\newcommand{\SpecialSlide}[1]{
\multirput(0,2pt){160}{\psline[linecolor=mylightgray,linewidth=0.5pt](-2,-2)(13,-2)}%
\psline[linewidth=1pt,linecolor=mydarkred](-1.5,-0.8)(11.4,-0.8)%
\HAP@PutLF{tl}{-1.45,-.9}%
\HAP@PutRF{tr}{11.35,-.9}%
{#1}}
% Style of table of contents entries
\newcommand{\HAP@tline}[1]{\guillemotright\,#1}
\newcommand{\HAP@tsectionm}{\psline[linecolor=mydarkred,linewidth=.25pt](-.05,-.05)(2,-.05)}
\myitem{1}{\raisebox{1pt}{\scriptsize\ensuremath{\blacksquare}}}
\myitem{2}{\scriptsize\ensuremath{\blacklozenge}}
\myitem{3}{\raisebox{1pt}{\scriptsize\ensuremath{\bullet}}}
\newcommand{\HAPR@titleSlide}{\NewSlideStyle[12.3cm]{tl}{-1,2.75}{TitleSlide}}
\newcommand{\HAPR@normalSlide}{\NewSlideStyle[9.78cm]{tl}{1.17,2.7}{NormalSlide}}
\newcommand{\HAPR@wideSlide}{\NewSlideStyle[12.3cm]{tl}{-1.2,2.7}{SpecialSlide}}
% \NewSlideStyle{t}{5.3,2.9}{CimentFrame}
\endinput
%%% Local Variables:
%%% mode: latex
%%% TeX-master: t
%%% End:
|
