mutopia/Hymns/diademata.ly

   1 \header {
   2   filename = "diademata.ly";
   3   enteredby = "Peter Chubb";
   4   composer = "Sir G. J. Elvey";
   5   date = "1868";
   6   title = "Diademata";
   7   metre = "6 6. 8 6. D";
   8 }
   9
  10 \version "1.1.52";
  11
  12 sop=\notes \transpose c''{
  13         ees2  ees4 ees4 g2 g2 |  c'1.
  14         c'2 | bes2 ees aes g |  f1.
  15         f2 | g bes c' bes |  a g4( )f  bes2
  16         ees'2 | d' ees' c' c' |  bes1.
  17         bes2 | bes g f ees |  c'1.
  18         c'2 | c' a g f |  d'1.
  19         d'2 | ees'2. d'4 c'2 bes |  aes f g
  20         bes2 | aes g f f | ees\breve
  21
  22 }
  23
  24 alt=\notes \transpose c''{
  25         bes,2 bes,4 bes,4 ees2 ees2 |  ees1.
  26         ees2 | ees ees d ees |  d1.
  27         d2 | ees f ees g |  ees c f
  28         ees2 | f g c f |  d1.
  29         d2 | ees ees d ees |  ees1.
  30         e2 | f f ees ees |  d1.
  31         f2 | ees ees ees ees |  ees d ees
  32         ees | ees ees ees d | ees\breve
  33 }
  34
  35
  36 ten=\notes \transpose c' {
  37         g2  g4 g4 g2 g2 |  aes1.
  38         aes2 | bes c' aes bes |  bes1.
  39         bes2 | bes bes g g  |  c' a bes
  40         a2 | bes bes bes a |  bes1.
  41         bes2 | bes bes aes bes |  c'1.
  42         bes2 | a c' bes c' |  bes1.
  43         bes2 | bes bes aes bes |  c' bes bes
  44         bes c' bes bes2. aes4 | g\breve
  45 }
  46
  47 bass=\notes \transpose c' {
  48         ees2 ees4 ees4 c2 c2 |  aes,1.
  49         aes2 | g aes f ees |  bes,1.
  50         bes,2 | ees d c ees |  f ees d
  51         c2 bes, ees f f |  bes,1.
  52         aes2 | g ees f g |  aes1.
  53         g2 | f f g a |  bes1.
  54         aes2 | g g  aes g | f bes ees
  55         g,2 | aes, ees bes, bes, | ees\breve
  56 }
  57
  58 global = \notes{
  59         \time 4/2;
  60         \key ees;
  61         \skip 2*4; \skip 1.; \bar "||";
  62         \skip 2; \skip 2*4; \skip 1.; \bar "||";\break
  63         \skip 2; \skip 2*12;\skip 1.; \bar "||";\break
  64         \skip 2; \skip 2*4; \skip 1.; \bar "||";
  65         \skip 2; \skip 2*4; \skip 1.; \bar "||";\break
  66         \skip 2; \skip 2*12;\skip 1.; \bar "||";
  67 }
  68
  69 $upper_staff = \context Staff = upper {
  70         \clef "treble";
  71         \context Staff <
  72                 \global
  73                 { \voiceone \sop }
  74                 { \voicetwo \alt }
  75         >
  76 }
  77
  78 $lower_staff = \context Staff = lower {
  79         \clef "bass";
  80         \context Staff <
  81                 \global
  82                 { \voiceone \ten }
  83                 { \voicetwo \bass }
  84         >
  85 }
  86
  87 \score{
  88         \context ChoirStaff\notes       <
  89                 \$upper_staff
  90                 \$lower_staff
  91         >
  92         \paper {
  93                 indent = 0.0\mm;
  94                 linewidth= 140.0\mm;
  95                 gourlay_maxmeasures = 6.0;
  96                 \translator{
  97                         \StaffContext
  98                         \remove "Time_signature_engraver";
  99                 }
 100         }
 101 }