🚀 go-pugleaf

dfarrow@spam.ua.oz (Duncan Farrow) writes:

>Dear TeXers, here is a macro for producing the current time (or actually
>the time that the macro is called) which behaves very similarly to the
>\today macro (The TeXbook, page 406) that returns the current date in
>the current font. This macro uses the TeX primative \time that returns
>the number of minutes since midnight and most of the effort is spent
>in converting this to the hour and minutes past the hour.
Corrected:
\newcount\hour \newcount\minute
\def\now{\ifnum\time<60       %check to see if it's just after midnight
          12:\ifnum\time<10 0\fi\number\time am %and act accordingly.
         \else
%          \ifnum\time>719\let\a=p\else\leta=p\fi %Check to see if it is pm
% there is one backslash missing. Besides, why not
          \ifnum\time>719\chardef\a=p\else\chardef\a=p\fi %Check to see if it is pm
          \hour=\time
          \divide\hour by 60 %\hour is the result of an integer divide
          \ifnum\hour>12\advance\hour by -12\advance\minute by -720\fi
          \number\hour:%
          \multiply\hour by 60 %Use is made of the integer divide here.
          \advance\minute by -\hour
          \ifnum\minute<10 0\fi\number\minute\a m\fi}

>Well I use it in my draft papers etc.

>Duncan.