\input genpctex
\def\boxed#1{\boxit{\hbox{#1}}}
\newcount\charnum
\newcount\hexa\newcount\hexb
%
\baselineskip 20pt
\def\testchar{%
\global\hexa=0\relax
\loop\ligne\global\advance\hexa by 1\relax\ifnum\hexa<8\relax\repeat
\par
}%
\def\ligne{{\global\hexb=0\relax
\global\charnum=\hexa\relax\multiply\charnum by 16\relax
\par\leavevmode\loop\boxed{\char\charnum}\global\advance\hexb by 1\relax\global\advance\charnum by 1\relax\ifnum\hexb<16\relax\repeat
}}%
\par \rm bf\par
\bf\testchar
\par\rm musicn16\par
\font\tata=musicn16
\tata\testchar
\par\rm musicn20\par
\font\tutux=musicn20
\tutux\testchar
\par\rm beamn16\par
\font\tutu=beamn16
\tutu\testchar
\par\rm beamn20\par
\font\tutu=beamn20
\tutu\testchar
\par\rm slurn16\par
\font\tutu=slurn16
\tutu\testchar
\par\rm slurn20\par
\font\tutu=slurn20
\tutu\testchar
\bye