input/standje.ly

   1 \header{
   2 filename =       "standje.ly";
   3 title =  "St\"andchen (Serenade) \"Leise flehen meine Lieder\"";
   4 opus =   "D. 957 No. 4";
   5 composer =       "Franz Schubert (1797-1828)"
   6          "Text by Ludwig Rellstab (1799-1860)";
   7 enteredby =      "JCN";
   8 copyright =      "public domain";
   9 }
  10
  11 %{
  12  Tested Features@ multivoice, accents, lyrics, chords, piano music,
  13 multiple \paper{}s in one \score
  14 %}
  15
  16 \version "0.1.8";
  17
  18 $vocal_verse1 = \melodic{
  19         \octave c';
  20         % ugh: treble/bass
  21 %       \clef treble;
  22         \clef violin;
  23         [2/3 g8( )as] g \] c'4. g8 |
  24         [2/3 f8( )g] f \] c'4 f8 r |
  25         g4.-> f8 [2/3 f( )es] d \] |
  26         es2 r4 |
  27         % ugh: a whole should be a measure
  28         %r1 |
  29         r2. |
  30         r2. |
  31         [2/3 g8( )as] g \] es'4. g8 |
  32         [2/3 f8( )g] f \] d'4. c'8 |
  33         bes4. as8 [2/3 as( )g] f \] |
  34         g2 r4 |
  35         r2. |
  36         r2. |
  37         g8. b16 es'4. d'8 |
  38         c'8. g16 es4. c8 |
  39         % [as3 2\grace( bes3 2\grace] )
  40         [2/3 as8( )g] as \] c'4. as8 |
  41         g2. |
  42         %[f3 2\grace( g] )
  43         [2/3 f8( )e] f \] as4. f8 |
  44         es!2. |
  45         g8. b16 es'4. d'8 |
  46         c'8. g16 e4. c8 |
  47         % [a3 2\grace b] )
  48         [2/3 a!8( ) gis] a \] c'4. a8 |
  49         g!2. |
  50         [2/3 d'8\f cis'] d \] f'4. b8 |
  51         c'2. |
  52         r2. |
  53         r2. |
  54 }
  55
  56 $lyric_verse1 = \lyric{
  57 % 5
  58         \[2/3 Lei-4 se8 \] fleh-4. en8 |
  59         \[2/3 mei-4 ne8 \] Lie-4 der8 _8 |
  60         Durch4. die8 \[2/3 Nacht4 zu8 \] |
  61         dir;2 _4 |
  62         _4 _ _ |
  63         _ _ _ |
  64 % 11
  65         \[2/3 In4 den8 \] stil-4. len8 |
  66         \[2/3 Hainr4 her-8 \] nie-4. der,8 |
  67         Lieb4. chen,8 \[2/3 komm4 zu8 \] |
  68         mir!2 _4 |
  69         _4 _ _ |
  70         _ _ _ |
  71 % 17
  72         Fl\"us-8. ternd16 schlan-4. ke8 |
  73         Wip-8. fel16 rau-4. schen8 |
  74         \[2/3 In4 des8 \] Mon-4. des8 |
  75         Licht;2. |
  76         _4 _ _ |
  77         _4 _ _ |
  78 % 23
  79         Des8. Ver-16 r\"a-4. ters8 |
  80         feind-8. lich16 Lau-4. schen8 |
  81         \[2/3 F\"urch-4 te,8 \] Hol-4. de,8 |
  82         nicht,2. |
  83         \[2/3 f\"urch-4 te,8 \] Hol-4. de,8 |
  84         nicht.2. |
  85         _4 _ _
  86         _ _ _
  87 }
  88
  89 $treble_intro = \melodic{
  90         \octave c';
  91         \clef violin;
  92         % ugh: i'd like to type this!
  93         %r8 [<'g-. c-.> <c-. es-.> <'g-. c-.> <c-. es-.> <'g-. c-.>] |
  94         r8 <['g-. c-.> <c-. es-.> <'g-. c-.> <c-. es-.> <'g-. c-.]> |
  95         r8 <['as-. c-.> <c-. es-.> <'as-. c-.> <c-. es-.> <'as-. c-.]> |
  96         r8 <['as-. c-.> <c-. d-.> <'as-. c-.> <c-. d-.> <'as-. c-.]> |
  97         r8 <['g-. 'b-.> <'b-. d-.> <'g-. 'b-.> <'b-. d-.> <'g-. 'b-.]> |
  98
  99 }
 100
 101 $treble_verse1 = \melodic{
 102         \octave c';
 103         \clef violin;
 104         r8 <['g c> <c es> <'g c> <c es> <'g c]> |
 105         r8 <['f c> <c d> <'f c> <c d> <'f c]> |
 106         r8 <['f 'g 'b> <'g 'b d> <'f 'g 'b> <'g 'b d> <'f 'g 'b]> |
 107         r8 <['es 'g c> <'g c es> <'es 'g c> <'g c es> <'es 'g c]> |
 108         <g'4.( b> <)f'8 d'> <[2/3 f' d'> <es' c'> <d' b]1/1> |
 109         <c'2. e'> |
 110         r8 <['g c> <c es> <'g c> <c es> <'g c]> |
 111         r8 <['f c> <c d> <'f c> <c d> <'f c]> |
 112         r8 <['f 'as 'bes> <'as 'bes d> <'f 'g 'bes> <'g 'bes d> <'f 'g 'bes]> |
 113         r8 <['es 'g 'bes> <'g 'bes es> <'es 'g 'bes> <'g 'bes es]>
 114         <{ es'( | )bes4. as8}{ c'( | )d4.( )f8 } >
 115         < [2/3 f as> <es g> <d f]1/1> |
 116         <es2. g> |
 117         r8 <['f 'g> <'g 'b> <'f 'g> <'g 'b> <'f 'g]> |
 118         r8 <['es 'g> <'g c> <'es 'g> <'g c> <'es 'g]> |
 119         r8\pp <['es 'as c> <'as c es> <'es 'as c> <'as c es> <'es 'as c]> |
 120         r8 <['es 'g 'bes> <'g 'bes 'es> <'es 'g 'bes> <'g 'bes 'es> <'es 'g 'bes]> |
 121         % [as3 2\grace( bes )
 122         [2/3 as8(( g )as]1/1 c'4.-> ) as8 |
 123         g2. |
 124         r8 <['f 'g> <'g 'b> <'f 'g> <'g 'b> <'f 'g]> |
 125         r8 <['e 'g> <'g c> <'e 'g> <'g c> <'e 'g]> |
 126         r8 <['f 'a c> <'a c f> <'f 'a c> <'a c f> <'f 'a c]> |
 127         r8 <['e 'g c> <'g c e> <'e 'g c> <'g c e> <'e 'g c]> |
 128         <{[2/3 f'8\f( e f']1/1 a'4. )f'8 } {\[2/3 f e f \] a4. f8 } > |
 129         <e2 e'> r4 |
 130 %       <{as!2\mf( [c'8. )as16]} {f2 as8( )f}> |
 131         as!2\mf( [c'8. )as16] |
 132         <e4. g> <[e8-.( g-.> <e8-. g-.> <)e8-. g-.]> |
 133 }
 134
 135 $bass_intro = \melodic{
 136         \octave c;
 137         \clef bass;
 138         <'c2 c> r4 |
 139         <''as2 'as> r4 |
 140         <''f2 'f> r4 |
 141         <''g2 g> r4 |
 142 }
 143
 144 $bass_verse1 = \melodic{
 145         \octave c;
 146         \clef bass;
 147         <'c2 c> r4 |
 148         <'as2 as> r4 |
 149         <'g2 g> r4 |
 150         <'c2 c> r4 |
 151         <'g8 g> <[g' d''> <d'' f''> <g' d''> <d'' f''> <g' d'']> |
 152         <'c2 c> r4 |
 153         <'c2 c> r4 |
 154         <'c2 c> r4 |
 155         <'c2 c> r4 |
 156         <'c2 c> r4 |
 157         <'c2 c> r4 |
 158         <'c2 c> r4 |
 159         <'c2 c> r4 |
 160         <'c2 c> r4 |
 161         <'c2 c> r4 |
 162         <'c2 c> r4 |
 163         <'c2 c> r4 |
 164         <'c2 c> r4 |
 165         <'c2 c> r4 |
 166         <'c2 c> r4 |
 167         <'c2 c> r4 |
 168         <'c2 c> r4 |
 169         <'c2 c> r4 |
 170         <'c2 c> r4 |
 171 }
 172
 173
 174 global= \melodic {\meter 3 /4; \key bes es as; }
 175
 176
 177 \score{
 178         \melodic<
 179                 \type Lyrics {
 180                         \meter 3 /4; \skip 4 * 12; \$lyric_verse1
 181                 }
 182                 \type Staff { <
 183                         \global
 184                         { \skip 4 * 12; \$vocal_verse1 }
 185                 > }
 186
 187                 % i want a (grand) staff!!!
 188
 189                 \type Grandstaff <
 190                         <
 191                                 \global
 192                                 { \$treble_intro \$treble_verse1 }
 193                         >
 194                         <
 195                                 \global
 196                                 { \$bass_intro \$bass_verse1 }
 197                         >
 198                 >
 199         >
 200         \paper{
 201                 % how does this work?
 202                 % previously we had the clear 'ideal whole note space' setting?
 203                 arithmetic_multiplier = 6.\pt;
 204                 % ugh: the *first* (intro) line may only have four measures...
 205                 gourlay_maxmeasures = 4.;
 206         }
 207 }
 208