> 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

Reply via email to