\newdimen\bitdotsize\bitdotsize=1pt\newcount\bitmapwidth\bitmapwidth=48%\newcount\bitmapheight\bitmapheight=48%\newcount\bitcol\bitcol=0%\newcount\bitrow\bitrow=0%\newcount\bitbyteswide\bitbyteswide=6%\newsavebox{\bitzero}\newsavebox{\bitone}\newsavebox{\bittwo}\newsavebox{\bitthree}\newsavebox{\bitfour}\newsavebox{\bitfive}\newsavebox{\bitsix}\newsavebox{\bitseven}\newsavebox{\biteight}\newsavebox{\bitnine}\newsavebox{\bita}\newsavebox{\bitb}\newsavebox{\bitc}\newsavebox{\bitd}\newsavebox{\bite}\newsavebox{\bitf}\def\initbitmap{ \def\bitdot{\vrule height\bitdotsize width\bitdotsize depth0pt}%% \def\bitblank{\vbox to\bitdotsize{\hbox to\bitdotsize{}}}% \def\bitblank{\hskip\bitdotsize}% \sbox{\bitzero}{\bitblank\bitblank\bitblank\bitblank}% \sbox{\bitone}{\bitdot\bitblank\bitblank\bitblank}% \sbox{\bittwo}{\bitblank\bitdot\bitblank\bitblank}% \sbox{\bitthree}{\bitdot\bitdot\bitblank\bitblank}% \sbox{\bitfour}{\bitblank\bitblank\bitdot\bitblank}% \sbox{\bitfive}{\bitdot\bitblank\bitdot\bitblank}% \sbox{\bitsix}{\bitblank\bitdot\bitdot\bitblank}% \sbox{\bitseven}{\bitdot\bitdot\bitdot\bitblank}% \sbox{\biteight}{\bitblank\bitblank\bitblank\bitdot}% \sbox{\bitnine}{\bitdot\bitblank\bitblank\bitdot}% \sbox{\bita}{\bitblank\bitdot\bitblank\bitdot}% \sbox{\bitb}{\bitdot\bitdot\bitblank\bitdot}% \sbox{\bitc}{\bitblank\bitblank\bitdot\bitdot}% \sbox{\bitd}{\bitdot\bitblank\bitdot\bitdot}% \sbox{\bite}{\bitblank\bitdot\bitdot\bitdot}% \sbox{\bitf}{\bitdot\bitdot\bitdot\bitdot} \advance\bitbyteswide by-1 \def\bitstep{% \ifnum\bitcol>\bitbyteswide\advance\bitrow by1\bitcol=0% \hfill\break% \fi\advance\bitcol by1\relax}%}
\newdimen\bitdotsize\bitdotsize=1pt
\newcount\bitmapwidth\bitmapwidth=48%
\newcount\bitmapheight\bitmapheight=48%
\newcount\bitcol\bitcol=0%
\newcount\bitrow\bitrow=0%
\newcount\bitbyteswide\bitbyteswide=6%
\newsavebox{\bitzero}
\newsavebox{\bitone}
\newsavebox{\bittwo}
\newsavebox{\bitthree}
\newsavebox{\bitfour}
\newsavebox{\bitfive}
\newsavebox{\bitsix}
\newsavebox{\bitseven}
\newsavebox{\biteight}
\newsavebox{\bitnine}
\newsavebox{\bita}
\newsavebox{\bitb}
\newsavebox{\bitc}
\newsavebox{\bitd}
\newsavebox{\bite}
\newsavebox{\bitf}
\def\initbitmap{
\def\bitdot{\vrule height\bitdotsize width\bitdotsize depth0pt}%
% \def\bitblank{\vbox to\bitdotsize{\hbox to\bitdotsize{}}}%
\def\bitblank{\hskip\bitdotsize}%
\sbox{\bitzero}{\bitblank\bitblank\bitblank\bitblank}%
\sbox{\bitone}{\bitdot\bitblank\bitblank\bitblank}%
\sbox{\bittwo}{\bitblank\bitdot\bitblank\bitblank}%
\sbox{\bitthree}{\bitdot\bitdot\bitblank\bitblank}%
\sbox{\bitfour}{\bitblank\bitblank\bitdot\bitblank}%
\sbox{\bitfive}{\bitdot\bitblank\bitdot\bitblank}%
\sbox{\bitsix}{\bitblank\bitdot\bitdot\bitblank}%
\sbox{\bitseven}{\bitdot\bitdot\bitdot\bitblank}%
\sbox{\biteight}{\bitblank\bitblank\bitblank\bitdot}%
\sbox{\bitnine}{\bitdot\bitblank\bitblank\bitdot}%
\sbox{\bita}{\bitblank\bitdot\bitblank\bitdot}%
\sbox{\bitb}{\bitdot\bitdot\bitblank\bitdot}%
\sbox{\bitc}{\bitblank\bitblank\bitdot\bitdot}%
\sbox{\bitd}{\bitdot\bitblank\bitdot\bitdot}%
\sbox{\bite}{\bitblank\bitdot\bitdot\bitdot}%
\sbox{\bitf}{\bitdot\bitdot\bitdot\bitdot}
\advance\bitbyteswide by-1
\def\bitstep{%
\ifnum\bitcol>\bitbyteswide\advance\bitrow by1\bitcol=0%
\hfill\break%
\fi\advance\bitcol by1\relax}%
}