🚀 go-pugleaf

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.

\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
          \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.