\setlength{\textwidth}{18.0cm}
\setlength{\textheight}{26.0cm}
\frenchspacing
\usepackage[latin1]{inputenc}

\input lettres

\input short

\input icones

\hsize    = 18.0cm
\hoffset = -2.5cm
\vsize    = 26.0cm
\voffset = -3.0cm


\def\retrait{\hspace*{1cm}}
\def\saut{\hspace{1cm}}
\def\sl{\hspace*{1em}}


\everymath{\rm}      %  supprime les italiques du mode maths
\everydisplay{\rm}   %  supprime les italiques du mode maths

\setcounter{secnumdepth}{4}

\renewcommand{\thesection}{\Alph{section}}
\renewcommand{\thesubsection}{\arabic{subsection}}
\renewcommand{\thesubsubsection}{\alph{subsubsection}}
\renewcommand{\theparagraph}{\roman{paragraph}}

\newcommand{\sv}{\vskip 1mm \noindent} % saut vertical pour démarrer une nouvelle section

\newcommand{\reta}{\leftskip=0.5cm}
\newcommand{\retb}{\leftskip=1cm}
\newcommand{\retc}{\leftskip=1.5cm}
\newcommand{\retd}{\leftskip=2cm}
\newcommand{\rete}{\leftskip=2.5cm}
\newcommand{\retf}{\leftskip=3cm}

\newcount\niveau
%\def\ecrit{\theniveau} 	% m'a servi en cours de déboguage des macros

\newcommand{\secI}[1]{\chapter{#1} \niveau=1}
\newcommand{\secA}[1]{ \niveau=2 \leftskip=0.cm \section{#1} \everypar={ \reta}}
\newcommand{\secun}[1]{ \niveau=3  \reta \subsection{#1}  \everypar={ \retb}}
\newcommand{\seca}[1]{  \niveau=4  \retb  \subsubsection{#1}  \everypar={ \retc}}
\newcommand{\seci}[1]{ \niveau=5  \retc \paragraph{#1} \everypar={ \retd}}
\newcommand{\secbas}[1]{ \niveau=6 \retd \subparagraph{#1}  \everypar={ \rete}}

% Les macros commençant par \st créent des sections sans titre avec début 
% immédiat il y a encore des bricoles à régler

\newcommand{\stsecA}{\sv \niveau=2 \leftskip=0.cm \addtocounter{section}{1} {\bf \Large \thesection} \setcounter{subsection}{0}  \everypar={ \reta}}

\newcommand{\stsecun}{\sv \niveau=3  \reta \addtocounter{subsection}{1} {\bf \large \thesubsection} \setcounter{subsubsection}{0}   \everypar={ \retb}  }

\newcommand{\stseca}{\sv \niveau=4  \retb \addtocounter{subsubsection}{1} {\bf \thesubsubsection} \setcounter{paragraph}{0}   \everypar={ \retc}}

\newcommand{\stseci}{\sv  \niveau=5 \retc \addtocounter{paragraph}{1} {\bf \theparagraph} \setcounter{subparagraph}{0}   \everypar={ \retd}}

\newcommand{\stseczero}{\sv \niveau=6 \retd \addtocounter{subparagraph}{1} {\bf \thesubparagraph}   \everypar={ \rete} }

% les macros \sec et \stsec 
% créent une nouvelle section avec titre du niveau courant 
% ou idem sans titre 

%\newcommand{\sec}[1]{ \ifcase\niveau\or \secI{#1} \or %\secA{#1} \or \secun{#1} \or \seca{#1} \or \seci{#1} \or %\secbas{#1} \fi}

\newcommand{\stsec}{ \ifcase\niveau\or \stsecI \or \stsecA \or \stsecun \or \stseca \or \stseci \or \stsecbas \fi}

\parindent=1cm

\newcommand{\qc}{\ensuremath{\spadesuit\ }}
\newcommand{\nqc}{\ensuremath{\heartsuit\ }}

