Hello Olivier,

thank you for your help.
Attached (I hope) is my result with your suggestions included.
I copied the inline TeX code to one more place and used a negative hard
space to left shift the other note.


Bodo
Title: Berggeboren
%Composer: 
%Poet: 
Style: TTBB
TTBB: Voices T1,T2 B1,B2; Choral; Clefs G8 F;
Name: T B
Indent: 0.05
Flats: 3
Meter: 3/4
Pages: 1
Systems: 3
Space: 8 6
Start: ;@+2
%%\input plainenc\relax\inputencoding{latin1}
%%\voffset=-2cm
%%\font\eightrm=pncr at 8pt\font\eightit=pncri at 8pt
%%\font\tenrm=pncr at 10pt\font\tenit=pncri at 10pt 
%%\font\twelverm=pncr at 12pt\font\twelvebf=pncb at 12pt\font\BIGfont=pncb at 
18pt\font\Bigfont=pncr at 12pt
%%\twelverm\setlyrstrut
%%\def\myverA{{\tenit M-Tx} \mtxversion\ {\eightrm\mtxdate}, PMX \pmxversion\ 
{\eightrm<\pmxdate>} und }
%%\def\myver{\myverA\musixtex\ \mxversion\ {\eightrm<\mxdate>}}
%%\def\myft{\tenrm Notensatz: Bodo Mei�ner mit \myver}
%%\let\sav\Endpiece
%%\def\Endpiece{\sav\vfill\noindent\myft\def\vfill{\vskip5mm}}

{vers}
Berg-ge-bo-ren ist mein Lied,
wie ein Sturz-bach rei�t es mit
je-des Hemm-nis, je-den Schmerz.
Sin-ge nur, sin-ge nur! 
Sin-ge, sin-ge mein Herz!

%%w195m
%%h290m
%%Iipipit70
%%ArpT
% Bar 0-2
\let\oldcu\cu\ibu4{4}{-2}\def\cu#1{\qb4{#1}}\ b4ax3 \def\cu#1{\tbu4\qb4{#1}}\ g 
\let\cu\oldcu\ b | e4d d8 c g | b2 \let\oldcu\cu\ibu4{4}{-2}\def\cu#1{\qb4{#1}}\ c4ax3 
\def\cu#1{\tbu4\qb4{#1}}\ bs \let\cu\oldcu\ c |
\let\oldcl\cl\ibl3{4}{-2}\def\cl#1{\qb3{#1}}\beginmel\ b4ax3n+1 
\def\cl#1{\tbl3\qb3{#1}}\endmel\ g \let\cl\oldcl\ b | e4d d8 c g | b2   a4x3Dn+1       
a |
L: {vers}
\let\oldcu\cu\ibu2{9}{-2}\def\cu#1{\qb2{#1}}\ b4ax3nf-1 \def\cu#1{\tbu2\qb2{#1}}\ g 
\let\cu\oldcu\ b | e4d d8 c g | b2   f4x3D XS-1 f |
\let\oldcl\cl\ibl1{9}{-2}\def\cl#1{\qb1{#1}}\ b4ax3nf \def\cl#1{\tbl1\qb1{#1}}\ g 
\let\cl\oldcl\ b | e4d d8 c g | b2 f4x3Dn-2s+2    e |
%
% simpler version with slurs instead of beams
%( b4ax3   g ) b | e4d d8 c g | b2 ( c4ax3 bs )    c |
%( b4ax3   g ) b | e4d d8 c g | b2   a4x3D         a |
%L: {vers}
%( b4ax3nf g ) b | e4d d8 c g | b2   f4x3Dn+1 XS-1 f |
%( b4ax3nf g ) b | e4d d8 c g | b2   f4x3Dn-2s+2   e |

% Bar 3-4
f4d d8 c8d b1 | g+2 g8 f |
a4d a8 a8d a1r | b2 d8f d |
[ f8 e d ] f f8d f1 | e2 b+8 b |
[ d8 c b ] b c8d d1 | e2 e8 f |

% Bar 5-7
f4  es e8n df | c2  r4+0 |   ( c4   f4d )       d8 |
d4f c  b8  b  | b2r r4b  |  (t a2         a8 )t a |
b4  b  g8  g  | g2  r4+0 | ( [ f8 e f e ] g )+0+0-1   f |
g4  g  g8  f  | e2s r4b  | ( [ f8 e d c ] b )   b |

% Bar 8-10
( c4 b ) r+0 |   g+2        g4       | ( g   f ) r4+0 |
  a2     r4b | ( b4  e )  [ d8 d8f ] |   c2      r4b  |
( e4 d ) r+0 | ( e4  b+ )   b        | ( b   a ) r+0  |
  b2     r4b |   e2r        e4       |   a-2     r4b  |

% Bar 11-13
rpb                |   b2      g8d of  f1 | e2 |]
( f4d e8 ) [ d c ] |   d2      d8d     d1 | b2 |]
rp+0               | ( f4 c+ ) b8d     a1 | g2 |]
rpb                |   b2      b8d ofd b1 | e2 |]
%
%%%%%%%%%%%%%%%
%
% Note:
%
% I changed the definition of \setlyrstrut in my copy of musixlyr.tex 
% (version MusiXLYRics 2.1c <June 10, 2003>)
%
% \def\setlyrstrut{% set up strut according to currently active font
%   \setbox0=\hbox{(\"Ag)}%
%   \setbox\lyrstrutbox=\hbox{\vrule height 1.1\ht0 depth 1.1\dp0 [EMAIL PROTECTED]
%
% The original had \hbox{()} which does not work for pncr font.
%
% Without this change in musixlyr.tex you might need the following
% TeX command in a line before \setlyrstrut (with only 2 % instead of 3)
%
%%%\def\setlyrstrut{\setbox0=\hbox{(g)}\setbox\lyrstrutbox=\hbox{\vrule height 1.1\ht0 
depth 1.1\dp0 width 0pt}}
%
_______________________________________________
TeX-music mailing list
[EMAIL PROTECTED]
http://icking-music-archive.org/mailman/listinfo/tex-music

Reply via email to