%% %% This is file `scrtime.sty', %% generated with the docstrip utility. %% %% The original source files were: %% %% scrtime.dtx (with options: `scrtime') %% 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{scrtime} [2002/02/02 v1.1m LaTeX2e KOMA package] \newif\if@Hxii \DeclareOption{12h}{\@Hxiitrue} \DeclareOption{24h}{\@Hxiifalse} \ExecuteOptions{24h} \ProcessOptions \def\thistime{% \@ifstar {\let\@tempif\iffalse\@thistime} {\let\@tempif\iftrue\@thistime}} \newcommand*{\@thistime}[1][:]{% \begingroup \@tempcnta\time\divide\@tempcnta60\multiply\@tempcnta60 \@tempcntb\time\advance\@tempcntb-\@tempcnta \divide\@tempcnta60 \if@Hxii\ifnum\@tempcnta>12 \advance\@tempcnta-12 \fi\fi \the\@tempcnta{#1}\@tempif\ifnum\@tempcntb<10 0\fi\fi\the\@tempcntb% \endgroup} \newcommand*{\settime}[1]{\renewcommand*{\@thistime}[1][]{#1}} \@ifundefined{KOMAScript}{% \DeclareRobustCommand{\KOMAScript}{\textsf{K\kern.05em O\kern.05em% M\kern.05em A\kern.1em-\kern.1em Script}}}{} \endinput %% %% End of file `scrtime.sty'.