1 \font\musicfont=musixsps
3 \def\thefont{\musicfont}
5 \def\mb#1{{\thefont\char#1}}
16 \loop\ifdim\here<\wid\advance\here by\inc
17 \hbox to0pt{\kern\here\vrule width0.05pt height 2pt\hss}%
27 \loop\ifdim\here<\wid\advance\here by\inc
28 \vbox to0pt{\vskip\here\vrule width2pt height 0.05pt\vss}%
31 \def\twhrul{\hbox to 0pt{\hbox{\hruler{20}\vrule
32 width0.1pt height 3ptdepth 1pt}}}
33 \def\twvrul{\hbox{\vbox to 20pt{\vruler{20}\vrule
34 width3pt height 0.1pt}}}
39 \hbox to 50pt{\qquad\twhrul\mb{#1}\hss}\setbox0=\hbox{\mb{#1}} width \the\wd0\ depth \the\dp0 \ height \the\ht0}
43 \loop\ifnum\n<255\advance\n by1
44 \doitem{\number\n}\endgraf\repeat}