summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/generic/chronosys/x-chronosys.tex
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/generic/chronosys/x-chronosys.tex')
-rw-r--r--Master/texmf-dist/tex/generic/chronosys/x-chronosys.tex47
1 files changed, 46 insertions, 1 deletions
diff --git a/Master/texmf-dist/tex/generic/chronosys/x-chronosys.tex b/Master/texmf-dist/tex/generic/chronosys/x-chronosys.tex
index d8e0561d706..db9456b2527 100644
--- a/Master/texmf-dist/tex/generic/chronosys/x-chronosys.tex
+++ b/Master/texmf-dist/tex/generic/chronosys/x-chronosys.tex
@@ -28,10 +28,55 @@
\catcode`\!=11
\def\!chr@verif#1#2{\ifdefined#2\error!message \fi #1#2} %
\defineframed[chreventframedcolorbox][background=color,backgroundcolor=\!chr@eventcolorbox,frame=off,backgroundoffset=\z@,location=low]
-\defineframed[chrperiodframedcolorbox][background=color,backgroundcolor=\!chr@periodcolorbox,frame=off,backgroundoffset=-1pt,location=low]
+\defineframed[chrperiodframedcolorbox][background=color,backgroundcolor=\!chr@periodcolorbox,frame=off,backgroundoffset=\z@,location=low]
\let\!chreventcolorbox\chreventframedcolorbox
\let\!chrperiodcolorbox\chrperiodframedcolorbox
\input chronosyschr.tex
+
+\def\setupchronology{\dosingleempty\dosetupchronology}
+\def\dosetupchronology[#1]{\iffirstargument \!chrtraitingargvirgule{#1}{!chrdefault}\fi}
+
+\def\setupchronoevent{\def\@@string@a{event}\dodoubleempty\dosetupchronoeventandperiode}
+\def\dosetupchronoeventandperiode[#1][#2]{\iffirstargument
+\ifsecondargument
+\def\@@string@a{#1}\def\@@string@b{#2}\else\def\@@string@b{#1}\fi \expandafter\!chr@parcoursoptions\@@string@b,\end\fi}
+
+\def\setupchronoperiode{\def\@@string@a{periode}\dodoubleempty\dosetupchronoeventandperiode}
+\def\definechronoperiode{\dosingleempty\dodefinechronoperiode}
+\!chrverif\def\dodefinechronoperiode[#1]{%
+\iffirstargument
+\def\@@string@a{#1}%
+\!chrverifdefines{%
+\expandafter\expandafter\expandafter\!chrtraitingargvirgule\expandafter\expandafter\expandafter{\csname !chr#1defaultoptions\endcsname}{!chr@period}%
+\!chrtraiteoneargument\dochronoperiode}%
+\if!chrverifdefines
+\expandafter\def\csname !chr#1defaultoptions\endcsname{textdepth=15pt, dates=true,
+color=\!chrperiodedef@ultcolor, datesstyle=\relax,
+startdate=true, stopdate=true, textstyle=\relax,
+dateselevation=0pt, ifcolorbox=true,
+colorbox=white, bottomdepth=0pt, topheight=\!chrheight}\fi\fi
+\ifnexttoken[{\!chr@defineorsetupoptions}{}}
+
+\def\definechronoevent{\dosingleempty\dodefinechronoevent}
+\!chrverif\def\dodefinechronoevent[#1]{%
+\iffirstargument
+\def\@@string@a{#1}%
+\!chrverifdefines{%
+\expandafter\expandafter\expandafter\!chrtraitingargvirgule\expandafter\expandafter\expandafter{\csname !chr#1defaultoptions\endcsname}{!chr@event}%
+\!chrtraiteoneargument\dochronoevent}%
+\if!chrverifdefines
+\expandafter\def\csname !chr#1defaultoptions\endcsname{barre=true, icon=\relax,
+markdepth=10pt, textstyle=\relax, mark=true,
+date=true, datesseparation=\space, conversionmonth=true,
+datestyle=\relax, datesstyle=\relax, year=true,
+iconheight=0.5\!chrheight, ifcolorbox=true, colorbox=white,
+textwidth=\relax}\fi\fi
+\ifnexttoken[{\!chr@defineorsetupoptions}{}}
+
+\setupchronoevent[!!eventgradu@tion][datesstyle=\tfxx]
+\setupchronoperiode[!!periodegradu@tion][datesstyle=\tfxx]
+
+
\catcode`\@=12
\catcode`\!=12
\endinput \ No newline at end of file