mutopia/J.S.Bach/pa.ly

   1 \version "1.3.146"
   2 \header {
   3   filename =  "pa.ly"
   4   title =    "Wachet auf, ruft uns die Stimme"
   5   opus =    "BWV"
   6   composer =  "Johann Sebastian Bach 1685-1750 "
   7   enteredby =  "JCN"
   8   copyright =  "public domain"
   9 }
  10
  11
  12
  13 commands = \notes {
  14   \time 4/4
  15   \property Staff.TimeSignature \override #'style = #'C
  16   \key es \major
  17   \partial 8
  18 }
  19
  20 right = \notes \relative c' {
  21   \commands
  22 %if urtekst
  23   \clef "alto"
  24 %  \clef "violin"
  25
  26 %if stable
  27 %  \property Voice."beamAutoEnd_8" = "1/4"
  28   \property Voice.autoBeamSettings \override #'(end 1 8 * *) = #(make-moment 1 4)
  29   bes8 |
  30   es16 f g8 g f as g bes, as |
  31   \repeat "volta" 2 {
  32   g'16 es f8 as, g d' es r bes |
  33   es16 f g8 g f as g bes, as|
  34   g'16 es f8 as, g d' es r bes' |
  35   bes4 as16 g f es f es d c bes8 c16 d |
  36   es f g f  as g f es g8 f r bes, |
  37   g' a4 bes8 \grace f8()es16 d es8 r c |
  38   a'8 bes4 c8 \grace f,()es16 d es8 r \grace{\slurDown [c'16( d ]}\stemBoth)es8 |
  39   d16 c bes8 bes16\prall a bes8 ~bes16 a g f es d c bes|
  40   c d es8 \grace f()es16 d es8~es16 a bes c bes a g f |
  41   bes8 f d\trill c16 bes bes es d c d8 bes|
  42   \grace a()g8. a16 a8.\prallprall g32 a bes4 r8 bes|
  43   es16 f g8 g f as g bes, as|
  44   g'16es f8 as, g d' es r bes|
  45   es16 f g8 g f as g bes, as|
  46   g'16 es f8 as , g d' es r f |
  47   g a4 bes8 \grace f()es16 d es8 r es|
  48   a bes4 c8 \grace g()f16 es f8 r4 |
  49   r r8 bes bes4 as16 g f es|
  50   f es d c bes8 c16 d es f g f as g f es
  51   }
  52   \alternative {
  53   { g8 f r4 r r8 bes,| es16 f g8 g f as g bes, as }
  54   { g8 f r4 r r8 bes | } }
  55   bes'4 as16 g f es f es d c bes8 c16 d |
  56   es f g f as g f es g8 f r bes, |
  57   g' a4 bes8 \grace {f(}) es16 d es8 r c |
  58   a' bes4 c8 \grace {f,(})es16 d es8 r es' |
  59   d16 c bes8 bes16\prall a bes8~bes16 a g f es d c bes|
  60   c d es8 es16\prall d es8~es16 a bes c bes a g f|
  61   bes8 f d\trill c16 bes bes es d c d8 bes|
  62   g8. a16 a8.\prallprall g32 a bes4 r8 d|
  63   es f4 g8 bes,16\prall as bes8 r bes'|
  64   bes4 as16 g f es f es d c bes8 c16 d|
  65   es f g f as g f es g8 f r4|
  66   r r8 g c16 d es8 es d |
  67   f es g, f es'16 c d8 f, es|
  68   b' c r g g4 f16 es d c |
  69   d c b a g8 a16 b c d es d f es d c|
  70   es8 d r g, es'fis4 g8|
  71   \grace d()c16 bes c8 r a fis' g4 a8|
  72   \grace d,() c16 bes c8 r c' bes16 a g8~g16\trill fis g8~|
  73   g16 f es d c bes a g a bes c8~c16\trill bes c8~|
  74   c16 fis g a g fis e d g8 d bes\trill a16 g |
  75   g4 r r r8 bes|
  76   es16 f g8 g f as g bes, as|
  77   g'16 es f8 as, g d' es r4|
  78   r r8 bes' bes4 as16 g f es|
  79   f es d c bes8 c16 d es f g f as g f es |
  80   g8 f r es c' d4 es8|
  81   as,16\prall g as8 r c d es4 f8|
  82   \grace bes,() as16 g as8 r f g16 f es8~es16\trill d es8~|
  83   es16 des' c bes as g f es f g as8~as16\trill g as8~|
  84   as16 d, es f es d c bes bes'8 es, g16 f es d |
  85   es as g f g8 es \grace d()c8. d16 d8. es16|
  86   es1|
  87   \bar "|."
  88 }
  89
  90 clefs = \notes{
  91   \clef "alto"
  92   \partial 8
  93   \skip 8
  94 %testin'
  95 %  \clef "violin"
  96   \skip 1
  97 %  \clef "alto"
  98   \repeat "volta" 2 { \skip 1*19 }
  99   \alternative {
 100   { \skip 1*2 }
 101   { \skip 1*1 } }
 102   \skip 1*11
 103   s4 \clef "violin"
 104   s4 s2
 105   s1
 106   s4 s8 \clef "alto" s8 s2
 107   \skip 1*12
 108   s4 r8 \clef "violin" s8 s2 \clef "alto"
 109 }
 110
 111 left = \notes \relative c {
 112   \commands
 113 %if urtekst
 114   \clef "tenor"
 115 %  \clef "bass"
 116
 117 %if stable
 118 %  \property Staff.noVoltaBraces = 1
 119 %  \property Voice."beamAutoEnd_8" = "1/4"
 120   \property Voice.autoBeamSettings \override #'(end 1 8 * *) = #(make-moment 1 4)
 121 %  \property Staff.noVoltaBraces = ##t
 122   \property Staff.VoltaBracket = \turnOff
 123   r8
 124   R1
 125   \repeat "volta" 2 {
 126   R1*11
 127   r2 es4 g |
 128   bes bes bes bes|
 129   c2 bes |
 130   r r4 bes|
 131   es bes es8 f g4|
 132   f4. es8 d4 c8.\prallprall bes32 c|
 133   bes2 r|
 134   r4 bes \grace bes8() es4 bes|
 135   }
 136   \alternative {
 137   { c g8. as32 bes as8 g f4\trill| es2 r | }
 138   { c4 g8. as32 bes as8 g f4\trill |} }
 139   es,2 r |
 140   R1*6 |
 141   r2 r4 bes'4|
 142   bes as g f\trill |
 143   es2 r|
 144   r4 bes' bes as|
 145   g f\trill es2|
 146   R1|
 147   f4 g as2\trill|
 148   g r|
 149   R1*5|
 150   r4 bes c d|
 151   es2 r|
 152   r r4 es8 f|
 153   g4 f\trill es2|
 154   R1|
 155   r4 bes es bes|
 156   c g as8 g f4\trill|
 157   es1|
 158   R1*4
 159   \bar "|."
 160 }
 161
 162 pedal = \notes \relative c, {
 163   \commands
 164 %if stable
 165 %  \property Staff.noVoltaBraces = 1
 166 %  \property Staff.noVoltaBraces = ##t
 167   \property Staff.VoltaBracket = \turnOff
 168   \clef "bass"
 169   r8 |
 170   es4 es es g
 171   \repeat "volta" 2 {
 172   as bes es, r|
 173   es es es g |
 174   as bes es, r |
 175   g c bes as |
 176   g es bes' d |
 177   es d c es|
 178   f g a f|
 179   bes a g f |
 180   es d c es|
 181   d8 bes f' f, g a bes d,|
 182   es c f4 bes8 c bes as|
 183   g f es d c4 c'|
 184   g bes es, g |
 185   as as' d, es |
 186   c d es d|
 187   c g c8 d es4~|
 188   es8 d g, a bes d, es f|
 189   bes a bes c d bes es4|
 190   bes as! g es |}
 191   \alternative {
 192   { as8 bes c4 f, bes8 as| g4 es' d es |}
 193   { as8 bes c4 f, bes8 as}}
 194   g4 c bes as |
 195   g es bes' d|
 196   es d c es|
 197   f g a f|
 198   bes a g f|
 199   es  d c es|
 200   d8 bes f' f, g a bes d,|
 201   es c f4 bes8 c bes as!|
 202   g f es d es g as bes|
 203   c d es4 bes as |
 204   g es bes'8 c d bes |
 205   es d c b c g' c bes!|
 206   as4 es f g|
 207   as8 g f e f es d c|
 208   b g g' f es4 c|
 209   g' b c bes|
 210   a c, d es|
 211   fis, d g f|
 212   es' d c bes|
 213   a c bes8 g d' d,|
 214   g es f g as g as bes|
 215   c bes c d es4 c|
 216   as bes c8 bes c d |
 217   es d es f g f g as|
 218   d, bes bes'as g4 es|
 219   bes'8 as g4 as g|
 220   f es f bes, |
 221   c as bes g|
 222   as8 g f es d4 f|
 223   bes8 c bes as g c as bes|
 224   c d es g as f bes bes,|
 225   es1
 226   \bar "|."
 227 }
 228
 229
 230
 231
 232 % these should be two separate scores...
 233 \score{
 234   \context Score <
 235    \context StaffGroup<
 236    \context PianoStaff <
 237     \context Staff = treble {
 238      \property Score.midiInstrument = "church organ"
 239      <
 240 %if urtekst
 241      \context Voice=i \clefs
 242      \context Voice=ii \right
 243      >
 244     }
 245     \context Staff = bass \left
 246    >
 247    \context Staff = pedal \pedal
 248    >
 249   >
 250
 251 \paper {
 252   %textheight = 280.0 \mm
 253   % landscape:
 254 %  textheight = 160.0 \mm
 255   orientation = "landscape"
 256   linewidth = 280.0 \mm
 257   \translator {
 258     \StaffGroupContext
 259     VerticalExtent = #'(4 . 4)
 260   }
 261   \translator {
 262     \PianoStaffContext
 263     VerticalExtent = #'(2.5 . 2.5)
 264    }
 265   }
 266   \midi {
 267    \tempo 4 = 69
 268   }
 269 }