input/sondag-morgen/sondag-morgen.ly

   1 \version "1.5.68"
   2 \include "paper13.ly"
   3
   4 mu = {}
   5 ac = \accent
   6 su = \translator Staff = up
   7 sd = \translator Staff = down
   8 \include "sondag-morgen-lyrics.ly"
   9 \include "sondag-morgen-folded.ly"
  10
  11 \include "deutsch.ly"
  12 \header {
  13     title = "Søndag Morgen"
  14     composer = "Van Morrison (Moon Dance)\\\\Rune Zedeler 2002.06.20"
  15     piece = "Score"
  16     tagline = "\\Large{Form: Intro Vers$_1$ Vers$_2$ Omkvæd Vers$_1$ Omkvæd Omkvæd Outro  }"
  17 }
  18 \score {
  19     \notes <
  20         \property Score.automaticMelismata = ##t
  21         \property Score.TimeSignature \override #'style = #'()
  22         \context Lyrics=marks { \marks }
  23         \context Lyrics = akk \akk
  24         \context StaffGroup = melo <
  25             \context Lyrics = korlyr { "" }
  26             \context Staff=mel <
  27                 \clef "G_8"
  28                 \property Staff.instrument = #'(lines "Kor" "Lead")
  29                 \property Staff.instr = "voc"
  30                 { s1*8 \break }
  31                 \global
  32                 <
  33                     \addlyrics
  34                     \context Voice = kor <
  35                         \voiceOne
  36                         \property Voice.MultiMeasureRest \override #'transparent = ##t
  37                         \transpose c \kormel
  38                     >
  39                     \context Lyrics=korlyr \korlyr
  40                 >
  41                 <
  42                     \addlyrics
  43                     \context Voice = mel <
  44                         \voiceTwo
  45                         \transpose c \mel
  46                     >
  47                     \context Lyrics=lyr \lyr
  48                 >
  49
  50             >
  51         >
  52         \context StaffGroup = sax <
  53             \context Staff = sax <
  54                 \property Staff.instrument = #'(lines "Sop. sax" "Alt sax" "Ten. sax")
  55                 \property Staff.instr = "sax"
  56                 \clef "G"
  57                 \global
  58                 \context Voice = sop < \voiceOne \sopsax >
  59                 \context Voice = alt < \voiceFour \altsax >
  60                 \context Voice = ten < \voiceTwo \tensax >
  61             >
  62         >
  63         \context StaffGroup = akk <
  64             \context PianoStaff = pia <
  65                 \property GrandStaff.instrument = "Piano    "
  66                 \property GrandStaff.instr = "pia   "
  67                 \context Staff = up <
  68                     \clef "G"
  69                     \global
  70                     \context Voice \piar
  71                 >
  72                 \context Staff = down <
  73                     \global
  74                     \context Voice \pial
  75                 >
  76
  77             >
  78             \context TabStaff=gui <
  79                 \property Staff.instrument = "Guitar    "
  80                 \property Staff.instr = "gt    "
  81                 \context TabVoice \guitar
  82             >
  83             \context Staff = cello <
  84                 \property Staff.instrument = "Cello"
  85                 \property Staff.instr = "cel"
  86                 \clef "F"
  87                 \global
  88                 \context Voice \cello
  89             >
  90             \context Staff = bas <
  91                 \property Staff.instrument = "Bas"
  92                 \property Staff.instr = "bas"
  93
  94                 \clef "F_8"
  95                 \global
  96                 \transpose c \bas
  97             >
  98             \context Staff = drums <
  99                 \property Staff.instrument = "Trommer"
 100                 \property Staff.instr = "tr"
 101                 \clef "percussion"
 102                 \global
 103                 \apply #(drums->paper 'drums) <
 104                     \context Voice=hi { \voiceOne \drhi }
 105                     \context Voice=lo { \voiceTwo \drlo }
 106                 >
 107             >
 108         >
 109     >
 110     \paper {
 111         % linewidth = 26.5\cm
 112         % textheight = 38.0\cm
 113         linewidth = 18.8\cm
 114         indent = 1.0\cm
 115         \translator {
 116             \TabStaffContext
 117             \remove "Key_engraver"
 118             \consists "Rest_engraver"
 119         }
 120         \translator {
 121             \GrandStaffContext
 122             \accepts "TabStaff"
 123             \consists "Instrument_name_engraver"
 124         }
 125         \translator {
 126             \ScoreContext
 127             BarNumber \override #'padding = #2.0
 128         }
 129         \translator {
 130             \StaffContext
 131             minimumVerticalExtent = #'(-4.0 . 4.0)
 132             \remove "Piano_pedal_engraver"
 133         }
 134         \translator {
 135             \PianoStaffContext
 136             VerticalAlignment \override #'forced-distance = #10
 137         }
 138    }
 139
 140 }
 141
 142
 143 mu = \p
 144 ac = \f
 145 su = {}
 146 sd = {}
 147 \include "sondag-morgen-unfolded.ly"
 148 \include "deutsch.ly"
 149
 150 \score {
 151     \apply #unfold-repeats
 152     \notes <
 153         \context Staff = lead <
 154             \property Staff.instrument = "drawbar organ"
 155             \context Voice < \mel s1\ff >
 156         >
 157         \context Staff = sopsax <
 158             \property Staff.instrument = "soprano sax"
 159             \sopsax
 160         >
 161         \context Staff = altsax <
 162             \property Staff.instrument = "alto sax"
 163             \altsax
 164         >
 165         \context Staff = tensax <
 166             \property Staff.instrument = "tenor sax"
 167             \tensax
 168         >
 169         \context Staff = pia <
 170             \property Staff.instrument = "electric grand"
 171             \piar \pial
 172         >
 173         \context Staff = gt <
 174             \property Staff.instrument = "electric guitar (clean)"
 175             \guitar
 176         >
 177         \context Staff = cel <
 178             \property Staff.instrument = "cello"
 179             \cello
 180         >
 181         \context Staff = bas <
 182             \property Staff.instrument = "electric bass (finger)"
 183             < \transpose c \bas s1-\ff >
 184         >
 185         \context Staff = trom <
 186             \property Staff.instrument = "drums"
 187             \drhi \drlo
 188         >
 189
 190
 191     >
 192     \midi { \tempo 4 = 128 }
 193 }
 194