Stanislav Kneifl wrote
> Not SO hard; something like this could do the job (NOT TESTED):
>
> \def\num#1#2{\setbox0=\hbox{#2}
> \special{ps: 1 setgray}
> \zcharnote{#1}{\vrule height \ht0 width \wd0 depth \dp0}
> \special{ps: 0 setgray}
> \zcharnote{#1}{\box0}}
>
> \num02 puts number '2' at the bottom line
>
> Please tell me if it works (it should) ...
Wow! After a small change, it worked. Your code produced overfull
hboxes. What I'm using now is:
%% tabbox ensures a white background for the tab number in the ps-file
%% (the stafflines don't overrun the number.
\def\tabbox#1#2{\setbox0=\hbox{\chordfnt #2}%
\special{ps: 1 setgray}%
\ccharnote{#1}{\vrule height \ht0 width \wd0 depth \dp0}%
\special{ps: 0 setgray}%
\ccharnote{#1}{\box0}%
}
%% \tab takes two arguments.
%% #1 is the string number
%% #2 is the symbol to be put on the string
%% the symbols are horizontally centered and a \sk is put behind it,
%% to jump to the position of the next symbol
\def\tab#1#2{%
\ifnum#1=1\tabbox n#2%
\else\ifnum#1=2\tabbox l#2%
\else\ifnum#1=3\tabbox j#2%
\else\ifnum#1=4\tabbox h#2%
\else\ifnum#1=5\tabbox f#2%
\else\ifnum#1=6\tabbox d#2%
\fi\fi\fi\fi\fi\fi
\sk
}
So, \tab12 puts a "2" on string number 1, with a fancy white box behind
it.
Thanks a LOT!
Cheers,
Ronald
--
Eindhoven University of Technology | tel: +31 40 2473575
e-mail: [EMAIL PROTECTED] | fax: +31 40 2455054
http://www.tak.chem.tue.nl/personal/rgelten/
"Trust me, I'm a doctor!" - S.P. Bates, Ph.D.
