01-song1/parts/keys.ly

   1 keysIntro = {
   2   \repeat unfold 16 R1 |
   3 }
   4
   5 keysA = \relative c' {
   6   \key cis \minor
   7   \time 2/4
   8   r4 r | <e gis>4 r8 <dis fis> | r <dis fis> r r |
   9   r4 r | <e gis>4 r8 <dis fis> |
  10   \time 6/8
  11   r <dis fis> r <e gis> r r|
  12
  13   \time 2/4
  14   r4 r | <e gis>4 r8 <dis fis> | r <dis fis> r r |
  15   \time 4/4
  16   <cis e>4. <dis fis> <e gis>4 ~ | <e gis>8 <fis a>4. <e gis>4 <dis fis> |
  17 }
  18
  19 keysAExtended = \relative c' {
  20   \time 4/4
  21   <cis e>4. <dis fis> <e gis>4 ~ | <e gis>8 <fis a>4. <e gis>4 <dis fis> |
  22
  23   %% TODO: more intense!
  24   \repeat unfold 4 {
  25     <cis e>4. <dis fis> <e gis>4 ~ | <e gis>8 <fis a>4. <e gis>4 <dis fis> |
  26   }
  27 }
  28
  29 keysATransition = {
  30   \time 4/4 R1 | R1 |
  31 }
  32
  33 keysVerse = \relative c {
  34   \time 4/4
  35   \key cis \minor
  36   cis4\sustainOn gis' cis dis8 e ~ e2.. r8\sustainOff |
  37   <e, b' e fis gis>2.\arpeggio <dis b' cis dis>4\arpeggio ~ <dis b' cis dis>1 |
  38   cis4\sustainOn gis' cis dis8 e ~ e2.. r8\sustainOff |
  39   <e, b' e fis gis>2.\arpeggio <dis b' cis dis>4\arpeggio ~ <dis b' cis dis>1 |
  40   a,2 ~ a4. <a' e' b'>8 ~ <a e' b'>1 |
  41   a,4. <a' e' b'>4. b,4 ~ | b1 |
  42 }
  43
  44 keysVerseVariant = \relative c' {
  45   \time 4/4
  46   \key bes \minor
  47   <bes des f>1 ~ | <bes des f> |
  48   <as des f>2. <as c es>4 ~ | <as c es>1 |
  49   <bes des f>1 ~ | <bes des f> |
  50   <as des f>2. <as c es>4 ~ | <as c es>1 |
  51
  52   ges4 bes des <ges, bes des f>\arpeggio ~ | <ges bes des f>1 |
  53   <ges bes des>4. f'4. <as, c es>4 ~ | <as c es>1 |
  54 }
  55
  56 %% TODO
  57 keysVerseHarder = \keysVerse
  58
  59 keysNasty = \relative c' {
  60   \time 6/8
  61   \key cis \minor
  62   \repeat unfold 2 \repeat volta 2 {
  63     <gis cis e>2. ~ | <gis cis e>2.   |
  64     <a bis dis>2.   | <a bis dis fis> |
  65     <gis cis e>   ~ | <gis cis e> ~   |
  66     <gis cis e>   ~ | <gis cis e>     |
  67
  68     <gis cis e>2. ~ | <gis cis e>2.   |
  69     <a bis dis>2.   | <fis a bis dis> |
  70     <e gis cis>   ~ | <e gis cis> ~   |
  71     <e gis cis>   ~ | <e gis cis>     |
  72   }
  73
  74   <gis cis e>2. ~ | <gis cis e>     |
  75   <a bis dis>     | <a bis dis fis> |
  76   <gis cis e> ~   | <gis cis e>     |
  77
  78   <g ais cis e> | <fis gis bis dis> |
  79
  80   \key e \minor
  81   <fis g b e> ~ | <fis g b e> |
  82   <fis a c dis> |  <dis fis a c> |
  83   <e g b> ~ | <e g b> |
  84   <c dis fis a> |  <dis fis a c> |
  85
  86   <e g b> ~ | <e g b> |
  87   <e g ais cis> | <a b dis> |
  88
  89   <b e g> ~ | <b e g> |
  90   <c dis fis a> | <a c dis fis> |
  91   <b e g> ~ | <b e g> |
  92   <c dis fis a>4 r2 | r4. <c dis fis a>4. ~ | <c dis fis a>2. |
  93 }
  94
  95 keysWaltz = \relative c'' {
  96   \time 3/4
  97   r4 <g b> <e g> | r <g b> <es g> |
  98   r4 <g b> <d g> | r <g b> <cis, e g> |
  99   <c e g b>2.\arpeggio | <c e a> | <c e>2 <c e>4 |
 100   <c e g b>4. <c e a>4. | <c e>2. ~ | <c e>2. |
 101   <d fis b>2.\arpeggio | <d fis a> | <d e>2 <d fis>4 |
 102   <d fis b>4. <d fis a>4. | <cis e>4 <c fis> <b g'> |
 103   \key fis \minor
 104   <bes e gis>2. | <bes cis fis>2. | <bes cis>2 bes4 |
 105   \time 4/4
 106   <a e' gis>4.  <a cis fis>8 ~ <a cis fis>2 |
 107   <c dis gis>4. <c dis fis>8 ~ <c dis fis>2 |
 108 }
 109
 110 keysBTransition = \relative c' {
 111   \time 4/4 <e gis>4. <dis fis> <cis e>4 ~ | <cis e>8 <dis fis>4. e4 dis4 |
 112 }
 113
 114 keysOutro = \relative c' {
 115   \time 4/4
 116   \repeat unfold 3 { cis8 b, cis gis e' gis, e' gis, |}
 117   <b e gis>2 <b dis fis> |
 118   \repeat unfold 3 { cis'8 b, cis gis e' gis, e' gis, |}
 119   <e' gis b>2 <dis fis b> |
 120 }
 121
 122 keysEnd = \relative c {
 123   e8 b r b r b4. | r1 |
 124   \set PianoStaff.midiInstrument = #"choir aahs"
 125   <cis cis' e gis c>1\arpeggio ~ | <cis cis' e gis c> ~ |
 126   <cis cis' e gis c>           ~ | <cis cis' e gis c>   |
 127 }
 128
 129
 130 keyboard = \new PianoStaff <<
 131   \new Staff \relative c' {
 132     \clef "treble_8"
 133     %% Intro
 134     \time 4/4
 135     \set PianoStaff.midiInstrument = #"electric piano 2"
 136     \keysIntro
 137     \repeat volta 2 \keysA
 138     \keysAExtended
 139     \keysATransition
 140     \repeat volta 2 \keysVerse
 141     \keysVerseVariant
 142     \keysVerseHarder
 143
 144     \repeat volta 2 \keysA
 145     \keysAExtended
 146     \keysATransition
 147
 148     \keysNasty
 149     \keysWaltz
 150
 151     \repeat volta 2 \keysA
 152     \keysBTransition
 153     \repeat volta 4 \keysOutro
 154     \keysEnd
 155   }
 156 >>