Sorry, I didn't understand at first what was the problem.
This should do the trick:
\documentclass{book}
\usepackage{musixtex}
\makeatletter
\chardef\@lmusixtex=50
\def\writ@sign{\ifnum\a@s=\z@ \else
\n@v\@lii
\ifnum\a@s>\z@ \C@sig\t@n
\C@sh\@ne\s@v@n
\C@sh\tw@\@l@v@n
\C@sh\thr@@\@ight
\C@sh\f@ur\fiv@
\C@sh\fiv@\nin@
\C@sh\si@\si@\fi
\n@v\@lmusixtex
\ifnum\a@s<\z@ \C@sig\si@
\C@fl\@ne\nin@
\C@fl\tw@\fiv@
\C@fl\thr@@\@ight
\C@fl\f@ur\f@ur
\C@fl\fiv@\s@v@n
\C@fl\si@\thr@@\fi
\fi}
\def\W@Fl#1#2{%
\ifnum\a@s<-#1\n@v\@lmusixtex \C@sig#2\else \ifnum\o@s<-#1\relax\fi \fi}
\def\C@acc#1{%
\check@staff
\inhgetn@i#1\relax
\ifx\rel@sw\@ne
\s@l@ctsigns \n@iii\n@i
\advance\n@iii-\ut@ref \advance\n@iii-\ut@ref
\loop\ifnum\n@iii>\si@ \advance\n@iii-\s@v@n \repeat
\loop\ifnum\n@iii<\z@ \advance\n@iii\s@v@n \repeat
\ifcase\n@iii
\n@ii\si@ % mi
\or\n@ii\@ne % fa
\or\n@ii\thr@@ % sol
\or\n@ii\fiv@ % la
\or\n@ii\s@v@n % si
\or\n@ii\tw@ % do
\or\n@ii\f@ur % re
\fi
% \n@ii positive signature limit, \n@ii-8 negative signature limit
\advance\n@ii-\a@s \advance\n@ii\si@ \divide\n@ii\s@v@n
\@Tii
\fi \advance\n@v\@lmusixtex1 \advance\n@v\n@vi \expandafter\@Ti % [T115]
(Hiroaki)
\fi}
\let\@l\undefined
\makeatother
\usepackage{eledmac}
\usepackage[german]{babel}
\usepackage{lipsum}
\begin{document}
\firstlinenum{1}
\linenumincrement{1}
\beginnumbering
\pstart
\lipsum
\pend
\endnumbering
\end{document}
Olivier
2013/9/8 Olivier Vogel <[email protected]>
> Hi Christoph,
>
> You could simply redefine the macros of MusiXTeX using \@l:
>
> \documentclass{book}
> \usepackage{eledmac}
> \usepackage{musixtex}
> \makeatletter
> \chardef\@lmusixtex=50
> \def\writ@sign{\ifnum\a@s=\z@ \else
> \n@v\@lii
> \ifnum\a@s>\z@ \C@sig\t@n
> \C@sh\@ne\s@v@n
> \C@sh\tw@\@l@v@n
> \C@sh\thr@@\@ight
> \C@sh\f@ur\fiv@
> \C@sh\fiv@\nin@
> \C@sh\si@\si@\fi
> \n@v\@lmusixtex
> \ifnum\a@s<\z@ \C@sig\si@
> \C@fl\@ne\nin@
> \C@fl\tw@\fiv@
> \C@fl\thr@@\@ight
> \C@fl\f@ur\f@ur
> \C@fl\fiv@\s@v@n
> \C@fl\si@\thr@@\fi
> \fi}
> \def\W@Fl#1#2{%
> \ifnum\a@s<-#1\n@v\@lmusixtex \C@sig#2\else \ifnum\o@s<-#1\relax\fi \fi}
> \def\C@acc#1{%
> \check@staff
> \inhgetn@i#1\relax
> \ifx\rel@sw\@ne
> \s@l@ctsigns \n@iii\n@i
> \advance\n@iii-\ut@ref \advance\n@iii-\ut@ref
> \loop\ifnum\n@iii>\si@ \advance\n@iii-\s@v@n \repeat
> \loop\ifnum\n@iii<\z@ \advance\n@iii\s@v@n \repeat
> \ifcase\n@iii
> \n@ii\si@ % mi
> \or\n@ii\@ne % fa
> \or\n@ii\thr@@ % sol
> \or\n@ii\fiv@ % la
> \or\n@ii\s@v@n % si
> \or\n@ii\tw@ % do
> \or\n@ii\f@ur % re
> \fi
> % \n@ii positive signature limit, \n@ii-8 negative signature limit
> \advance\n@ii-\a@s \advance\n@ii\si@ \divide\n@ii\s@v@n
> \@Tii
> \fi \advance\n@v\@lmusixtex1 \advance\n@v\n@vi \expandafter\@Ti %
> [T115] (Hiroaki)
> \fi}
> \makeatother
>
> \usepackage[german]{babel}
> \usepackage{lipsum}
> \begin{document}
> \firstlinenum{1}
> \linenumincrement{1}
> \beginnumbering
> \pstart
> \lipsum
> \pend
> \endnumbering
> \end{document}
>
> Olivier
>
>
> 2013/9/8 Christoph Prendl <[email protected]>
>
>> Hello everybody,
>>
>> I tried to use musixtex together with eledmac in LaTeX. Surprisingly that
>> seems to work, except for the fact that musixtex outputs the count
>> register, created by eledmac in an auxiliary file called "<jobname>.nn", in
>> the first line of the document after the second pass of LaTeX. This I guess
>> due to the fact, that both use "\@l".
>> Anyone having an idea what could be done to get it to work? Reversing the
>> order of loading the packages doesn't help.
>>
>> Here is a minimal working example:
>>
>> \documentclass{book}
>> \usepackage{musixtex}
>> \usepackage{eledmac}
>> \usepackage[german]{babel}
>> \usepackage{lipsum}
>> \begin{document}
>> \firstlinenum{1}
>> \linenumincrement{1}
>> \beginnumbering
>> \pstart
>> \lipsum
>> \pend
>> \endnumbering
>> \end{document}
>>
>> The console gives the following message:
>>
>> /usr/local/texlive/2013/texmf-dist/tex/latex/eledmac/eledmac.sty:521:
>> LaTeX Err
>> or: Command \@l already defined.
>> Or name \end... illegal, see p.192 of the manual.
>>
>> See the LaTeX manual or LaTeX Companion for explanation.
>> Type H <return> for immediate help.
>> ...
>>
>>
>> l.521 \@l@reg}
>>
>>
>> ?
>>
>> many greetings,
>> Christoph
>>
>>
>> -------------------------------
>> [email protected] mailing list
>> If you want to unsubscribe or look at the archives, go to
>> http://tug.org/mailman/listinfo/tex-music
>>
>>
>
-------------------------------
[email protected] mailing list
If you want to unsubscribe or look at the archives, go to
http://tug.org/mailman/listinfo/tex-music
