\font\musicfnt=musix20
%\def\mb#1{{\musicfnt\musicfnt\char#1}}
\font\slurfont=xslhz20
\def\mb#1{{\musicfnt\slurfont\char#1}}
\newdimen\wid
\newdimen\inc
\newdimen\here
\def\hruler#1{%
	\wid=#1pt
	\inc=\wid
	\divide\inc by #1
	\divide\wid by 2
	\here=-\wid
	\loop\ifdim\here<\wid\advance\here by\inc
		\hbox to0pt{\kern\here\vrule width0.05pt height 2pt\hss}%
	\repeat%
}

\def\vruler#1{%
	\wid=#1pt
	\inc=\wid
	\divide\inc by #1
	\divide\wid by 2
	\here=-\wid
	\loop\ifdim\here<\wid\advance\here by\inc
		\vbox to0pt{\vskip\here\vrule width2pt height 0.05pt\vss}%
	\repeat%
}
\def\twhrul{\hbox to 0pt{\hbox{\hruler{20}\vrule
	width0.1pt height 3ptdepth 1pt}}}
\def\twvrul{\hbox{\vbox to 20pt{\vruler{20}\vrule
	width3pt height 0.1pt}}}
 
\def\doitem#1{
	#1 %
	 %\twvrul%doesn't work
	\hbox to 50pt{\qquad\twhrul\mb{#1}\hss}\setbox0=\hbox{\mb{#1}} width \the\wd0\ depth \the\dp0 \ height \the\ht0}

\newcount\n
\def\charn{\n=-1
	\loop\ifnum\n<255\advance\n by1
	\doitem{\number\n}\endgraf\repeat}


	\charn

\bye