> From: [EMAIL PROTECTED]
> Date: Sun, 17 Sep 2000 13:19:47 +0200
> In fingering classical guitar music, one very often needs a way to
> indicate how long a barre chord must be sustained. This is commonly
> notated by a horizontal line above the staff that terminates in a
> downward hook where the barre ends.
> Werner Icking has suggested that MusixTeX's \Ioctfinup \Ioctfindown
> macros might lend themselves to adaptation to handle the line break
> issue. So my question is as follows:
>
> How would one adapt those macros to produce a solid line rather than a
> dashed one and to follow after my \cfr symbol rather than the
> octaviation symbol?
Here's is a bad solution which destroys the normal functionality of
\Ioctfin...\Toctfin by modifying \C@TO, \I/Toctfin's base construct.
% This is the original C@TO for comparison
%\def\C@TO{%
% \ifnum \@ne=\the\o@sw
% \n@v\@xxiii \n@ii\@xxiv \else \n@v\@xxv \n@ii\@xxvi \fi
% \ifx\T@ii\n@ii \y@v\lin@pos \else \getcurpos \fi
% \advance\y@v-\o@x \kernm\y@v \raise\o@y\hbox\@to\y@v{%
% \octnumber\mxsps\xleaders\hbox{\char\n@v}\hfill\T@ii\n@ii}}%
\nobarnumbers
\def\BB{\NOtes\qa{cccc}\en\bar}
\startpiece\addspace\afterruleskip
\BB\Ioctfinup2{12}\BB\BB\BB\BB\BB\BB\BB\NOtes\qa{cc}\Toctfin2\qa{cc}\en\bar
\BB\Ioctfinup2{12}\BB\NOtes\qa{cc}\Toctfin2\qa{cc}\en
\linegoal4\Endpiece
% Now redefine C@TO to meet chord barre notation for guitar
\makeatletter
\def\C@TO{%
\ifnum \@ne=\the\o@sw
\n@v\@xxiii \n@ii\@xxiv \else \n@v\@xxv \n@ii\@xxvi \fi
\ifx\T@ii\n@ii \y@v\lin@pos \else \getcurpos \fi
\advance\y@v-\o@x \kernm\y@v \raise\o@y\hbox{\raise\Internote\hbox\@to\y@v{%
\lower\Internote\hbox{\octnumber}\hrulefill}\vrule height\Internote}}%
\makeatother
\def\fr#1#2{\smalltype C\kern -4pt$\mid$\hskip1pt{#1}{$_#2$}}
\def\Ifr#1#2#3#4{\gdef\octnumber{\fr{#3}{#4}}\Ioctfinup{#1}{#2}}
\let\Tfr\Toctfin
\startpiece\addspace\afterruleskip
\BB\Ifr2{12}I2\BB\BB\BB\BB\BB\BB\BB\NOtes\qa{cc}\Tfr2\qa{cc}\en\bar
\BB\Ifr2{12}{II}4\BB\NOtes\qa{cc}\Tfr2\qa{cc}\en
\linegoal4\Endpiece
\endmuflex\bye
IMHO the usage of \Internote (copied from \holdc) isn't good. I would
prefer something else e.g. 0.5\Interligne. I understand \Internote
as "horizontal" dimension, whilst \Interligne is a "vertical" dimension.
Nevertheless it makes no sense to use the one or the other unless \fr
uses a musicsize specific font, too.
-- Werner