On Fri, Apr 21, 2000 at 05:59:10PM +0200, Mats Bengtsson wrote:
> If the letters are available in the Latin-1 
> character set, try to write them directly
> using their 8 bit character code in the input
> file. This will not give exactly exactly the
> correct width, but almost (all unknown characters
> get the width of an 'x', I think). 
> How did you specify the characters? TeX macros
> are skipped in the size calculations, so it 
> should actually work the way you did also.
> If you send me an example, I could check it
> more carefully.
Hi Mats,
        Some of the letters aren't in latin-1 ; they are in latin-2. I
send you the same page in two variants, one with tex coding for the
special letters, the other with 7 bit replacements, no tex coding. The
difference is obvious.
        Thank you for your help.   
melody = \notes 
        \relative c {           
            \property Voice.dynamicDirection=1
            \property Voice.beamAutoEnd = #(make-moment 1 16)
            R2 | R2^\mf | 
            d16 \< d d \! d b' b b8 | 
            a16 a \> a a \! f f f8 |
            \break
%5              
            d16 \< d d \! d b' b b8 | 
            a16 a \> a a f \! f f8 | 
            d16 d d d f^\accent d d8 |
            \break
%8
            g16^\accent d d d f^\accent d d8 | 
            \property Voice.textStyle = "italic"
            g16^\accent^"ritenuto~ad~libitum" d d d a'8^\accent d, | 
            d2^\p^" pochissimo" |
            R2 |
        }

text = \lyrics {
        Ca "m\u a" -- "ta" -- sea prun -- du -- ie ier -- bi -- le se un -- du -- ie
%5
        "\^{\i}n" "b\u a" -- ta -- ia "v\^{\i}n" -- tu -- lui 
        s\^an -- ge -- le "p\u a" -- m\^an -- tu -- lui, 
        s\^an -- ge -- le "p\u a" -- m\^an -- tu -- lui
%8      
        "\^{\i}n" "b\u a" -- ta -- ia "v\^{\i}n" -- tu -- lui, 
        "\^{\i}n" "b\u a" -- ta -- ia "v\^{\i}n" -- tu -- lui2
}
espace = \lyrics {
        " "
}       

righthand = \notes \relative c'' { 
        \property Voice.beamAutoEnd = #(make-moment 1 4)
        < b4 d > < b d b'> | < b d a' > < b d f > |
        < b4 d > < b d b'> | < b d a' > < b d f > | 
%5              
        < b4 d > < b d b'> | < b d a' > < b d f > | < b2 d > ~ | 
%8      
        < b d > ~ | < b d > | < b d > | es,4( )bes' |
}    
                
lefthand = \notes \relative c {
        \property Voice.dynamicDirection=1
        \property Voice.beamAutoEnd = #(make-moment 1 4)
        < d4 \< b d, > < \! d b d, > | < d \> b d, > <\! d b d, > | 
        < d \< b d, > < \! d b d, > | < d \> b d, > <\! d b d, > | 
%5      
        < d \< b d, > < \! d b d, > | < d \> b d, > <\! d b d, > | < d2 b d, > ~ | 
%8      
        < d b d, > ~ |  < d \> b d, > | 
        [f,16 d d d] [a'8 \! d,\p] | [d' \<( c] )\! d,4 |  
}

global = \notes{
        \time 4/8;
}

realLyrics = \lyrics {
        \text
}
fakeLyrics = \lyrics {
        \espace
}       

lyricStaff = \context Lyrics = lyric <
        \realLyrics
        \fakeLyrics     
>

vocals = \notes {
        \clef bass;
        \property Voice.noAutoBeaming = "1"
        \property Staff.automaticMelismata=1
        \property Voice.dynamicDirection = \up
        \melody
}

vocalStaff = \context Staff = vocal<
        \property Staff.instrument = "synth voice"
        \global
        \vocals
>                               

treble = {
        \clef treble;
        \property Voice.beamAutoBegin=0
        \righthand
}

trebleStaff = \context Staff = treble<
        \global
        \treble
>

bass = {
        \clef bass;             
        \lefthand
}

bassStaff = \context Staff = bass<
        \global
        \bass
>

grandStaff = \context PianoStaff <
        \trebleStaff
        \bassStaff
>

\score{
        <
            \addlyrics
                \vocalStaff
                \lyricStaff
            \grandStaff
        >
        \paper {
            linewidth = 17.5\cm;
            \translator {
%               \ScoreContext
                \ScoreWithNumbers %ne met pas les nombres :-(
                minVerticalAlign = 1.0 * \staffheight;
                maxVerticalAlign = 8.0 * \staffheight;
            }
            \translator{\BarNumberingStaffContext}              
        }
%       \midi {
%               \tempo 4 = 66;
%       }
}                               
                                                                                    
melody = \notes 
        \relative c {           
            \property Voice.dynamicDirection=1
            \property Voice.beamAutoEnd = #(make-moment 1 16)
            R2 | R2^\mf | 
            d16 \< d d \! d b' b b8 | 
            a16 a \> a a \! f f f8 |
            \break
%5              
            d16 \< d d \! d b' b b8 | 
            a16 a \> a a f \! f f8 | 
            d16 d d d f^\accent d d8 |
            \break
%8
            g16^\accent d d d f^\accent d d8 | 
            \property Voice.textStyle = "italic"
            g16^\accent^"ritenuto~ad~libitum" d d d a'8^\accent d, | 
            d2^\p^" pochissimo" |
            R2 |
        }

text = \lyrics {
        Ca "ma" -- "ta" -- sea prun -- du -- ie ier -- bi -- le se un -- du -- ie
%5
        "in" "ba" -- ta -- ia "vin" -- tu -- lui 
        san -- ge -- le "pa" -- man -- tu -- lui, 
        san -- ge -- le "pa" -- man -- tu -- lui
%8      
        "in" "ba" -- ta -- ia "vin" -- tu -- lui, 
        "in" "ba" -- ta -- ia "vin" -- tu -- lui2
}
espace = \lyrics {
        " "
}       

righthand = \notes \relative c'' { 
        \property Voice.beamAutoEnd = #(make-moment 1 4)
        < b4 d > < b d b'> | < b d a' > < b d f > |
        < b4 d > < b d b'> | < b d a' > < b d f > | 
%5              
        < b4 d > < b d b'> | < b d a' > < b d f > | < b2 d > ~ | 
%8      
        < b d > ~ | < b d > | < b d > | es,4( )bes' |
}    
                
lefthand = \notes \relative c {
        \property Voice.dynamicDirection=1
        \property Voice.beamAutoEnd = #(make-moment 1 4)
        < d4 \< b d, > < \! d b d, > | < d \> b d, > <\! d b d, > | 
        < d \< b d, > < \! d b d, > | < d \> b d, > <\! d b d, > | 
%5      
        < d \< b d, > < \! d b d, > | < d \> b d, > <\! d b d, > | < d2 b d, > ~ | 
%8      
        < d b d, > ~ |  < d \> b d, > | 
        [f,16 d d d] [a'8 \! d,\p] | [d' \<( c] )\! d,4 |  
}

global = \notes{
        \time 4/8;
}

realLyrics = \lyrics {
        \text
}
fakeLyrics = \lyrics {
        \espace
}       

lyricStaff = \context Lyrics = lyric <
        \realLyrics
        \fakeLyrics     
>

vocals = \notes {
        \clef bass;
        \property Voice.noAutoBeaming = "1"
        \property Staff.automaticMelismata=1
        \property Voice.dynamicDirection = \up
        \melody
}

vocalStaff = \context Staff = vocal<
        \property Staff.instrument = "synth voice"
        \global
        \vocals
>                               

treble = {
        \clef treble;
        \property Voice.beamAutoBegin=0
        \righthand
}

trebleStaff = \context Staff = treble<
        \global
        \treble
>

bass = {
        \clef bass;             
        \lefthand
}

bassStaff = \context Staff = bass<
        \global
        \bass
>

grandStaff = \context PianoStaff <
        \trebleStaff
        \bassStaff
>

\score{
        <
            \addlyrics
                \vocalStaff
                \lyricStaff
            \grandStaff
        >
        \paper {
            linewidth = 17.5\cm;
            \translator {
%               \ScoreContext
                \ScoreWithNumbers %ne met pas les nombres :-(
                minVerticalAlign = 1.0 * \staffheight;
                maxVerticalAlign = 8.0 * \staffheight;
            }
            \translator{\BarNumberingStaffContext}              
        }
%       \midi {
%               \tempo 4 = 66;
%       }
}                               
                                                                                    

Reply via email to