diff options
author | Karl Berry <karl@freefriends.org> | 2006-01-13 00:10:21 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2006-01-13 00:10:21 +0000 |
commit | 5c94c0f0ad17fb17d4784dd79d4f2d0342012882 (patch) | |
tree | 5de2acfadbeaa8a4b7262d98e4562576ac3d6837 /Master/texmf-dist/tex/latex/uhrzeit | |
parent | 453706b7fafc0a34cbdd1b39c02f3e368dd1e3cc (diff) |
uhrzeit
git-svn-id: svn://tug.org/texlive/trunk@1420 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/latex/uhrzeit')
-rw-r--r-- | Master/texmf-dist/tex/latex/uhrzeit/uhrzeit.sty | 113 |
1 files changed, 113 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/latex/uhrzeit/uhrzeit.sty b/Master/texmf-dist/tex/latex/uhrzeit/uhrzeit.sty new file mode 100644 index 00000000000..762e98a7ef3 --- /dev/null +++ b/Master/texmf-dist/tex/latex/uhrzeit/uhrzeit.sty @@ -0,0 +1,113 @@ +%% `uhrzeit.sty' +%% +\NeedsTeXFormat{LaTeX2e} +\ProvidesPackage{uhrzeit}[2001/02/13 v0.2 Uhrzeit-Formate] +\RequirePackage{soul} +%% +%% Autor: Olaf Meltzer (Olaf.Meltzer@freenet.de) +%% unter Verwendung verschiedener Ideen, +%% die in de.comp.text.tex veröffentlicht wurden. +%% +%% +%% Automatische Ausgabe der Uhrzeit: +%% +%% Befehl Format +%% ---------------------------------------------- +%% \dtd 5.07 (eher ungebräuchlich) +%% \dtc 05:07 (international) +%% \uhri 5.07 Uhr (Duden, 22. Aufl., S. 110) +%% \uhrii 05:07 Uhr (DIN 5008) +%% \uhriii 5^07 Uhr (ehemals üblich) +%% \uhriv 05^07 Uhr (eher ungebräuchlich) +%% +%% +%% Alte Uhrzeit-Formatierung bei manueller Eingabe: +%% +%% Befehl Format +%% ----------------------------------------- +%% \uhr{5}{07} 5^07 Uhr +%% \vonbis{5}{07}{13}{45} 5^07 -- 13^45 Uhr +%% +%% +%% Die Definition von '\uhr{}{}' stammt weitgehend von +%% "Andreas Matthias" <amat@kabsi.at> +%% in de.comp.text.tex am 24.09.2000 +%% +%% Formatiert als '1^05 Uhr' +\newcommand{\uhr}[2]{#1% + \sbox\z@ T% + \vbox to\ht\z@{\hbox{\check@mathfonts + \fontsize\ssf@size\z@ + \math@fontsfalse\selectfont + \setul{.17em}{.03em}\,\ul{#2}\resetul}% + \vss}\,Uhr} + +%% Formatiert als '1^05 -- 2^15 Uhr' +\newcommand{\vonbis}[4]{#1% + \sbox\z@ T% + \vbox to\ht\z@{\hbox{\check@mathfonts + \fontsize\ssf@size\z@ + \math@fontsfalse\selectfont + \setul{.17em}{.03em}\,\ul{#2}\resetul}% + \vss}~--\,#3% + \sbox\z@ T% + \vbox to\ht\z@{\hbox{\check@mathfonts + \fontsize\ssf@size\z@ + \math@fontsfalse\selectfont + \setul{.17em}{.03em}\,\ul{#4}\resetul}% + \vss}\,Uhr} + +%% Die Definition von \mytime stammt ursprünglich von +%% einem heute nicht mehr identifizierbaren user +%% des Mausnet. Sie wurde am 06.06.2000 noch einmal von +%% Stefan Witzgall in de.comp.text.tex gepostet. + +% Es wird der TeX-Zähler \time verwendet, der die Systemzeit +% in "Minuten seit Mitternacht" enthält. Ich mache daraus zwei +% Zähler, \myminutes und \myhours, die die Zeit in "Stunden +% und Minuten seit Mitternacht" enthalten. +\newcount\myhours % Zähler (Variable) \myhours Definieren +\newcount\myminutes % \myminutes Definieren + +% Berechnung der Stundenzahl: +% \myhours := \time DIV 60 (Division ohne Rest) +\myhours = \time +\divide \myhours by 60 + +% Berechnung der Minutenzahl: +% \myminutes := \time MOD 60 +% = \time - ( \myhours x 60 ) +\myminutes = \time +\multiply \myhours by 60 % Zur Berechnung der Minuten wird noch + % mal an "\myhours" herumgefummelt +\advance \myminutes by -\myhours% +\divide \myhours by 60 % \myhours wiederherstellen + +%% Verschiedene Formate für die automatische Zeitangabe: + +%% International, 1.05 (eher ungebräuchlich) +\newcommand{\dtd}{\the\myhours.\ifnum\myminutes<10 0\fi\the\myminutes} + +%% International, 01:05 (international) +\newcommand{\dtc}{\ifnum\myhours<10 0\fi\the\myhours:% + \ifnum\myminutes<10 0\fi\the\myminutes} + +%% Deutsch, 1.05~Uhr (Duden) +\newcommand{\uhri}{\the\myhours.\ifnum\myminutes<10 0\fi\the\myminutes\,Uhr} + +%% Deutsch, 01:05~Uhr (DIN) +\newcommand{\uhrii}{\ifnum\myhours<10 0\fi\the\myhours:% + \ifnum\myminutes<10 0\fi\the\myminutes\,Uhr} + +%% Altes Format, 1^05 Uhr (ehemals üblich) +\newcommand{\uhriii}{\expandafter\uhr{% + \expandafter\the\myhours}% + {\expandafter{\expandafter{\ifnum\myminutes<10 0\fi\the\myminutes}}}} + +%% Altes Format, 01^05 Uhr (eher ungebräuchlich) +\newcommand{\uhriv}{\expandafter\uhr{% + \expandafter{\expandafter{\ifnum\myhours<10 0\fi\the\myhours}}}% + {\expandafter{\expandafter{\ifnum\myminutes<10 0\fi\the\myminutes}}}} + +%% Ende uhrzeit.sty + |