% This is is the plain TeX file for the `chronosys' package.
%
% The maintener of this work is Mathieu Long.
% email : mlong.tex@hotmail.fr
% the `chronosys' package consists in the 9 files :
%  -- `docchronosys_en.tex' and `docchronosys_en.pdf' (english manual)
%  -- `docchronosys_fr.tex' and `docchronosys_fr.pdf' (french manual)
%  -- README
%  -- `chronosys.tex' (file for plain TeX)
%  -- `chronosyschr.tex' (main file of the `chronosys' package)
%  -- `chronosys.sty' (file for LaTeX)
%  -- `x-chronosys.tex' (file for ConTeXt)
%
% This work may be distributed and/or modified under the
% conditions of the LaTeX Project Public License, either version 1.3
% 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.3 or later is part of all distributions of LaTeX
% version 2005/12/01 or later.
%
% This work has the LPPL maintenance status `maintained'.
% 
% The Current Maintainer of this work is Mathieu Long.
%
\catcode`\@=11
\unless\ifdefined\tikzpicture
\catcode`\!=12\input tikz.tex \relax\fi %\usetikzlibrary{arrows,decorations.pathmorphing,backgrounds,positioning,fit,petri}\fi
\catcode`\!=11
\let\!chr@verif\relax
\def\starttikzpicture{\tikzpicture} \def\stoptikzpicture{\endtikzpicture}
\def\!chrperiodcolorbox#1{%
\setbox\z@ \hbox{\kern2pt#1\kern2pt}%
\dimen@i\ht\z@\advance\dimen@i 2pt\ht\z@\dimen@i
\dimen@i\dp\z@\advance\dimen@i 2pt\dp\z@\dimen@i
\advance\dimen@i\ht\z@
\dimen@ii\wd\z@
\setbox\z@\hbox{\tikzpicture\fill[color=\!chr@periodcolorbox]%
(\z@,\z@)--(\dimen@ii,\z@)--(\dimen@ii,\dimen@i)--(\z@,\dimen@i);\endtikzpicture 
\kern-\wd\z@\raise2pt\box\z@}\vbox to\z@{\box\z@\vss}}
\def\!chreventcolorbox#1{%
\setbox\z@ \hbox{\kern2pt#1\kern2pt}%
\dimen@i\ht\z@\advance\dimen@i 2pt\ht\z@\dimen@i
\dimen@i\dp\z@\advance\dimen@i 2pt\dp\z@\dimen@i
\advance\dimen@i\ht\z@
\dimen@ii\wd\z@
\setbox\z@\hbox{\tikzpicture\fill[color=\!chr@eventcolorbox]%
(\z@,\z@)--(\dimen@ii,\z@)--(\dimen@ii,\dimen@i)--(\z@,\dimen@i);\endtikzpicture 
\kern-\wd\z@\raise2pt\box\z@}\vbox to\z@{\box\z@\vss}}
\input chronosyschr.tex

\catcode`\!=12
\catcode`\@=12
\endinput