diff options
Diffstat (limited to 'Master/texmf-dist/tex/latex/koma-script/scrdate.sty')
| -rw-r--r-- | Master/texmf-dist/tex/latex/koma-script/scrdate.sty | 165 |
1 files changed, 165 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/latex/koma-script/scrdate.sty b/Master/texmf-dist/tex/latex/koma-script/scrdate.sty new file mode 100644 index 00000000000..78e0fad466b --- /dev/null +++ b/Master/texmf-dist/tex/latex/koma-script/scrdate.sty @@ -0,0 +1,165 @@ +%% +%% This is file `scrdate.sty', +%% generated with the docstrip utility. +%% +%% The original source files were: +%% +%% scrtime.dtx (with options: `scrdate') +%% scrlogo.dtx +%% +%% Copyright (C) 1994-2004 by Markus Kohm. +%% +%% All rights reserved. For further copyright information see the file +%% legal.txt, and any other copyright indicated in this file. +%% +%% This file is part of the LaTeX2e KOMA-Script-bundle. +%% ---------------------------------------------------- +%% +%% The KOMA-Script-bundle (but not this file) bases on the +%% Script-family created by Frank Neukam 1993 and the standard +%% documents classes created by the LaTeX3-Team 1994-1996. +%% ------------------------------------------------------------- +%% +%% This system is distributed in the hope that it will be useful, +%% but WITHOUT ANY WARRANTY; without even the implied warranty of +%% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. +%% +%% +%% IMPORTANT NOTICE: +%% +%% For error reports in case of UNCHANGED versions see documentation. +%% +%% Please do not request updates from us directly. Distribution is +%% done through Mail-Servers, Mailboxes and TeX organizations. +%% +%% You are not allowed to change this file. +%% +%% You are allowed to distribute this file under the condition that +%% it is distributed together with all files mentioned in readme.txt +%% and liesmich.txt. See LEGAL.TXT or LEGALDE.TXT for further +%% information. +%% +%% If you receive only some of these files from someone, complain! +%% +%% You are NOT ALLOWED to distribute this file alone. +%% +\NeedsTeXFormat{LaTeX2e}[1995/12/01] +\ProvidesPackage{scrdate} + [2002/02/02 v1.1m LaTeX2e KOMA + package] +\newcommand\todaysname{% + \begingroup% + \@tempcnta=\year + \@tempcntb=1 % 1. Januar 1980 war ein Dienstag + \ifnum\@tempcnta<1980 unknown\else% + \advance\@tempcnta by-1980% + \@whilenum\@tempcnta>3\do% + {\advance\@tempcntb by5\advance\@tempcnta by-4}% + \ifnum\@tempcnta=0% + \ifnum\month>2\advance \@tempcntb by1\fi% + \else% + \advance\@tempcntb by\@tempcnta% + \advance\@tempcntb by1 + \fi% + \ifcase\month\or\or\advance\@tempcntb3% Jan = 28 + 3 + \or\advance\@tempcntb3% +Feb = 56 + 3 + \or\advance\@tempcntb6% +Mar = 84 + 6 + \or\advance\@tempcntb1% +Apr = 119 + 1 + \or\advance\@tempcntb4% +May = 147 + 4 + \or\advance\@tempcntb6% +Jun = 175 + 6 + \or\advance\@tempcntb2% +Jul = 210 + 2 + \or\advance\@tempcntb5% +Aug = 238 + 5 + \or% +Sep = 273 + 0 + \or\advance\@tempcntb3% +Oct = 301 + 3 + \or\advance\@tempcntb5% +Nov = 329 + 5 + \fi% + \advance\@tempcntb by\day% + \advance\@tempcntb by-1% die Zaehlung beginnt bei 0 + \@whilenum\@tempcntb>6\do% + {\advance\@tempcntb by-7}% + \@dayname{\@tempcntb}% + \fi\endgroup} +\newcommand\nameday[1]{\renewcommand\todaysname{#1}} +\newcommand*\scrdate@languagenamewarning{ + \PackageWarningNoLine{scrdate} + {\string\languagename\space not + defined, using \string\language.\MessageBreak + This may result in use of wrong language!\MessageBreak + You should use a compatible language + package\MessageBreak + (e.g. `Babel', `german', `french', ...)} + \let\scrdate@languagenamewarning\relax} +\newcommand\newdaylanguage[8]{% + \begingroup\expandafter\expandafter\expandafter\endgroup + \expandafter\ifx\csname l@#1\endcsname\relax + \PackageWarningNoLine{scrdate}{Language #1\space not defined.\MessageBreak + \protect\dayname@#1\space skipped!} + \else + \@namedef{dayname@#1}##1{% + \begingroup% + \@tempcnta ##1% + \ifcase\@tempcnta% + #2\or #3\or #4\or #5\or #6\or #7\or #8\fi\endgroup% + } + \AtBeginDocument{ + \begingroup\expandafter\expandafter\expandafter\endgroup + \expandafter\ifx\csname date#1\endcsname\relax + \PackageWarningNoLine{scrdate} + {\protect\date#1\space not defined.\MessageBreak + \protect\todaysname maybe can't use + \protect\dayname@#1!} + \else + \expandafter\let\csname D@date#1\expandafter\endcsname + \csname date#1\endcsname + \@namedef{date#1}{% + \expandafter\let\expandafter\@dayname\csname dayname@#1\endcsname + \@nameuse{D@date#1}}% + \@ifundefined{languagename}{ + \scrdate@languagenamewarning + \ifnum\language=\@nameuse{l@#1} + \@nameuse{date#1} + \fi}{ + \@ifundefined{date\languagename} + {} + {\@nameuse{date\languagename}} + } + \fi + } + \fi +} +\newdaylanguage{german}{Montag}{Dienstag}{Mittwoch} + {Donnerstag}{Freitag}{Samstag}{Sonntag} +\newdaylanguage{ngerman}{Montag}{Dienstag}{Mittwoch} + {Donnerstag}{Freitag}{Samstag}{Sonntag} +\newdaylanguage{english}{Monday}{Tuesday}{Wednesday} + {Thursday}{Friday}{Saturday}{Sunday} +\newdaylanguage{USenglish}{Monday}{Tuesday}{Wednesday} + {Thursday}{Friday}{Saturday}{Sunday} +\newdaylanguage{french}{Lundi}{Mardi}{Mercredi} + {Jeudi}{Vendredi}{Samedi}{Dimanche} +\newdaylanguage{italian}{Luned\`\i}{Marted\`\i}{Mercoled\`\i} + {Gioved\`\i}{Venerd\`\i}{Sabato}{Domenica} +\newdaylanguage{spanish}{Lunes}{Martes}{Mi\'ercoles} + {Jueves}{Viernes}{S\'abado}{Domingo} +\newdaylanguage{croatian}{Ponedjeljak}{Utorak}{Srijeda} + {\v{C}etvrtak}{Petak}{Subota}{Nedjelja} +\newdaylanguage{dutch}{Maandag}{Dinsdag}{Woensdag} + {Donderdag}{Vrijdag}{Zaterdag}{Zondag} +\def\@dayname#1{% + \begingroup% + \@tempcnta #1% + \ifcase\@tempcnta% + Monday\or Tuesday\or Wednesday\or Thursday\or + Friday\or Saturday\or Sunday\fi\endgroup% +} +\InputIfFileExists{scrdate.cfg} + {\typeout{*************************************^^J% + * Local config file scrdate.cfg used^^J% + *************************************}} + {} +\@ifundefined{KOMAScript}{% + \DeclareRobustCommand{\KOMAScript}{\textsf{K\kern.05em O\kern.05em% + M\kern.05em A\kern.1em-\kern.1em Script}}}{} +\endinput +%% +%% End of file `scrdate.sty'. |