Shamusworld >> Repos - music/blob - you-are-my-all-in-all.ly

   1 \version "2.16.0"
   2 \include "pop-chords.ly"
   3 \include "english.ly"
   4
   5 % Good sizes are 16, 18, & 20
   6 staffSize = #18
   7 #(set-default-paper-size "letter")
   8 #(set-global-staff-size staffSize)
   9 #(ly:set-option (quote no-point-and-click))
  10
  11 \header
  12 {
  13 %Let's bump up the title size and switch to the chord font. :-)
  14
  15         title    = \markup { \override #'(font-family . sans) \fontsize #3.5 "You Are My All In All" }
  16 %       composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "" }
  17         arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. Ed Smart" }
  18         tagline  = $(string-append "Engraved by JLH and Lilypond " (lilypond-version))
  19 }
  20
  21
  22 %
  23 % Lead vocal
  24 %
  25
  26 LeadVox = \relative c'
  27 {
  28 %       \set Voice.autoBeaming = ##f
  29 %       \set Staff.instrument = #"Lead vox"
  30         \clef G
  31         \key f \major
  32         \override Staff.TimeSignature #'style = #'()
  33         \time 4/4
  34 \override Score.SpacingSpanner #'average-spacing-wishes = ##f
  35
  36         % Intro
  37
  38         s1^\markup { \hspace #0.0 \raise #2.0 { 16th note ballad } } |   % 1
  39         s1 |   % 2
  40         \time 2/4 s2 \time 4/4 |   % 3
  41         s1 \bar "||:"   % 4
  42
  43         \repeat volta 3
  44         {
  45                 % A section
  46
  47 \mark \markup { \override #'(font-family . sans) { \box { A } } }
  48
  49                 r4 f16 g a8 g g f e |   % 5
  50                 f4 f16 g a8 c, c f e |   % 6
  51                 d4 d16 e f8 f4 e |   % 7
  52                 f4. ( g16 f e2 ) |   % 8
  53
  54                 r4 f16 g a8 g g f e |   % 9
  55                 f4 f16 g a8 c, c f e |   % 10
  56                 d4 d16 e f8 f4 e |   % 11
  57                 f2. r4 \bar "||"   % 12
  58
  59                 % B section
  60
  61 \once \override Score.RehearsalMark #'self-alignment-X = #left
  62 \mark \markup { \override #'(font-family . sans) { \box { B } } \hspace #1.0 \raise #2.0 \musicglyph #"scripts.segno" }
  63
  64                 a2 g |   % 13
  65                 f4 c' a2 |   % 14
  66                 bf4 bf a g |   % 15
  67                 a4. ( bf16 a g2 ) |   % 16
  68
  69                 a2 g |   % 17
  70                 f4 c' a2 |   % 18
  71                 bf4 bf a g |   % 19
  72         }
  73         \alternative
  74         {
  75                 {
  76                         f2. r4 |   % 20
  77                 }
  78                 {
  79                         f2. r4^\markup { \hspace #-2.0 \raise #1.0 \bold { D.S. } } \bar "||"   % 21
  80                 }
  81                 {
  82                         f2. r4 \bar "||"   % 22
  83                 }
  84         }
  85
  86         % Ending
  87
  88 \mark \markup { \override #'(font-family . sans) { \box { C } } }
  89
  90         a2 g |   % 23
  91         f4 c' a2 |   % 24
  92         bf4 bf a g |   % 25
  93         f1^\fermata \bar "|."   % 26
  94 }
  95
  96 LeadVoxText = \lyricmode
  97 {
  98         You are my strength when I am weak;
  99         you are the trea -- sure that I seek,
 100         you are my all in all __ _ _ _
 101
 102         Seek -- ing you as a pre -- cious jewel;
 103         Lord to give up I’d be a fool,
 104         you are my all in all.
 105
 106         Je -- sus, Lamb of God
 107         wor -- thy is your name __ _ _ _
 108         Je -- sus, Lamb of God
 109         wor -- thy is your name.
 110
 111         name.
 112         name.
 113
 114         Je -- sus, Lamb of God
 115         wor -- thy is your name.
 116 }
 117
 118 LeadVoxTextB = \lyricmode
 119 {
 120         Tak -- ing my sin, my cross, my shame;
 121         ris -- ing a -- gain, I bless your name,
 122         you are my all in all __ _ _ _
 123
 124         When I fall down, you pick me up;
 125         when I am dry you fill my cup,
 126         you are my all in all.
 127 }
 128
 129
 130 Riffs = \relative c''
 131 {
 132         \clef G
 133         \key f \major
 134         \override Staff.TimeSignature #'style = #'()
 135         \time 4/4
 136 \override Score.SpacingSpanner #'average-spacing-wishes = ##f
 137
 138         % Intro
 139
 140         \tiny
 141         r4 f16 g a8 g g16 f ~ f e8 f16 ~ |   % 1
 142         f4 f16 g a8 c, c16 f ~ f e8 d16 ~ |   % 2
 143         \time 2/4 d4 d16 e f8 \time 4/4 |   % 3
 144         f2 e \bar "||:"   % 4
 145         \normalsize
 146 }
 147
 148
 149 %
 150 % Chord names
 151 %
 152
 153 Chords = \chordmode
 154 {
 155 %Bah, can't we set this globally?
 156 %       \popChords
 157
 158         % Intro
 159
 160         f2 c/e |   % 1
 161         d2:m f/a |   % 2
 162         \time 2/4 bf2 \time 4/4 |   % 3
 163         f2/c c |   % 4
 164
 165         \repeat volta 3
 166         {
 167                 % A section
 168
 169         f2 c/e |   % 5
 170         d2:m f/a |   % 6
 171         bf2 f4/c c |   % 7
 172         f2 c |   % 8
 173
 174         f2 c/e |   % 9
 175         d2:m f/a |   % 10
 176         g2:m7 f4/c c |   % 11
 177         bf2/f f |   % 12
 178
 179                 % B section
 180
 181         f2 c/e |   % 13
 182         d2:m f/a |   % 14
 183         bf2 f4/c c |   % 15
 184         f2 c |   % 16
 185
 186         f2 c/e |   % 17
 187         bf4/d c/e f2 |   % 18
 188         g2:m7 f4/c c |   % 19
 189
 190         }
 191         \alternative
 192         {
 193                 {
 194                         bf2/f f |   % 20
 195                 }
 196                 {
 197                         bf2/f f |   % 21
 198                 }
 199                 {
 200                         bf2/f f |   % 22
 201                 }
 202         }
 203
 204         % Ending
 205
 206         f2 c/e |   % 23
 207         bf4/d c/e f2 |   % 24
 208         g2:m7 f4/c c |   % 25
 209         bf2/f f |   % 26
 210 }
 211
 212
 213 %
 214 % Chord rhythms
 215 %
 216
 217 % Use a RhythmicStaff on the chords instead of this?
 218 % It almost works, but not quite. Doesn't collapse chords above to single notes...
 219
 220 StaffC = \relative c
 221 {
 222 %       \set Voice.autoBeaming = ##f
 223 %       \set Staff.instrument = #"Rhythm"
 224         \override Staff.TimeSignature #'style = #'()
 225         \time 4/4
 226         \override NoteHead #'style = #'slash
 227
 228         % Intro
 229
 230         c4 c c c |   % 1
 231         c4 c c c |   % 2
 232         \time 2/4 c4 c \time 4/4 |   % 3
 233         c4 c c c |   % 4
 234
 235         \repeat volta 3
 236         {
 237                 % A section
 238
 239         c4 c c c |   % 5
 240         c4 c c c |   % 6
 241         c4 c c c |   % 7
 242         c4 c c c |   % 8
 243
 244         c4 c c c |   % 9
 245         c4 c c c |   % 10
 246         c4 c c c |   % 11
 247         c4 c c c |   % 12
 248
 249                 % B section
 250
 251         c4 c c c |   % 13
 252         c4 c c c |   % 14
 253         c4 c c c |   % 15
 254         c4 c c c |   % 16
 255
 256         c4 c c c |   % 17
 257         c4 c c c |   % 18
 258         c4 c c c |   % 19
 259
 260         }
 261         \alternative
 262         {
 263                 {
 264                         c4 c c c |   % 20
 265                 }
 266                 {
 267                         c4 c c c |   % 21
 268                 }
 269                 {
 270                         c4 c c c \bar "||"   % 22
 271                 }
 272         }
 273
 274         % Ending
 275
 276         c2 c |   % 23
 277         c4 c c2 |   % 24
 278         c2 c4 c |   % 25
 279         c2 c^\fermata \bar "|."   % 26
 280 }
 281
 282
 283 Dynamics =
 284 {
 285         s4_\mf s2. |   % 1
 286         s1 |   % 2
 287         \time 2/4 s2 \time 4/4 |   % 3
 288         s1 |   % 4
 289
 290         s4_\markup { \italic { stick } } s2. |   % 5
 291
 292         s1*7
 293
 294         s4_\markup { \hspace #0.0 \raise #-1.5 \italic { 1st X stick, 2nd & 3rd X light snare } } s2. |   % 13
 295
 296         s1*8
 297
 298         s2 s4 \> s |   % 22
 299         s4_\mp s2. |   % 23
 300         s1 |   % 24
 301         s4 s_\markup { \italic rit. } s2 | % 25
 302 }
 303
 304
 305 \score
 306 {
 307         <<
 308                 <<
 309 %                       \new Staff = leadStaff { \new Voice = "lead" \LeadVox }
 310                         \new Staff = leadStaff { << \new Voice = "lead" \LeadVox \new Voice = "riffs" \Riffs >> }
 311                         \new Lyrics \lyricsto "lead" \LeadVoxText
 312                         \new Lyrics \lyricsto "lead" \LeadVoxTextB
 313                 >>
 314
 315                 \new ChoirStaff = "Rhythm"
 316                 <<
 317                         \new ChordNames = "chords" \Chords
 318                         \new RhythmicStaff = "chordRhythm" << \StaffC \Dynamics >>
 319                 >>
 320
 321                 \set Score.skipBars = ##t
 322                 \set Score.melismaBusyProperties = #'()
 323         >>
 324 }
 325
 326
 327 \paper
 328 {
 329   #(define fonts (make-pango-font-tree
 330     "Times New Roman"
 331     "DomCasual BT"
 332     "Luxi Mono"
 333     (/ staffSize 20)))
 334
 335 % Spread staves vertically across last page (default: t)
 336 %       ragged-last-bottom = ##f
 337 % Spread staves vertically across the page (default: f)
 338 %       ragged-bottom = ##t
 339 % Allow partial line for last stave (default: f)
 340         ragged-last = ##t
 341
 342 % To find out what's eating the space at the top...
 343 %       annotate-spacing = ##t
 344 %let's try this: [It works! Huzzah!]
 345         obsolete-page-top-space = 0  top-system-spacing #'basic-distance = #(/ obsolete-page-top-space staff-space)
 346 }