From: Shamus Hammons <jlhamm@acm.org>
Date: Mon, 3 May 2021 04:30:36 +0000 (-0500)
Subject: New chart "Wishing You Were Here".
X-Git-Url: http://shamusworld.gotdns.org/cgi-bin/gitweb.cgi?p=music;a=commitdiff_plain;h=c7291ba4fa2a8851839b23562a8d0db92d594e25

New chart "Wishing You Were Here".
---

diff --git a/covers/wishing-you-were-here.ly b/covers/wishing-you-were-here.ly
new file mode 100644
index 0000000..6ad790a
--- /dev/null
+++ b/covers/wishing-you-were-here.ly
@@ -0,0 +1,713 @@
+\version "2.22.0"
+\include "../pop-chords.ly"
+\include "english.ly"
+
+% Good sizes are 16, 18, & 20
+staffSize = #18
+#(set-default-paper-size "letter")
+#(set-global-staff-size staffSize)
+#(ly:set-option (quote no-point-and-click))
+
+%{ Some useful characters: ‘ ’ “ ” – — † ‡ • … %}
+
+\header
+{
+%Let's bump up the title size and switch to the chord font. :-)
+
+	title    = \markup { \override #'(font-family . sans) \fontsize #3.5 "Wishing You Were Here" }
+	composer = \markup { \override #'(font-family . sans) \fontsize #1.3 "Chicago" }
+%	arranger = \markup { \override #'(font-family . sans) \fontsize #1.3 "arr. S. Hammons" }
+	tagline  = $(string-append "Engraved by JLH and Lilypond " (lilypond-version))
+% Let's try a chord dictionary
+	subtitle = \markup {
+		\center-column { "Dm7" \fret-diagram-terse "x;x;o;5;6;5;" } "    "
+		\center-column { "E/D" \fret-diagram-terse "x;x;o;4;5;4;" } "    "
+		\center-column { "Eb/D" \fret-diagram-terse "x;x;o;3;4;3;" } "    "
+		\center-column { "Bb" \fret-diagram-terse "x;1;3;3;3;x;" } "    "
+		\center-column { "Dm7" \fret-diagram-terse "x;x;o;2;1;1;" }
+	}
+}
+
+% Useful tweak abbreviations (hn = harmony note)
+
+hn = #(define-music-function (arg) (ly:music?)
+;; Harmony Note: Set the tweaks property of the passed in note to use a smaller font
+
+  (set! (ly:music-property arg 'tweaks)
+    (acons 'font-size -3.0 (ly:music-property arg 'tweaks))) arg)
+
+
+%
+% Song's structure
+%
+Global =
+{
+	\key d \minor
+	\override Staff.TimeSignature.style = #'numbered
+	\time 4/4
+
+	% Intro
+
+% Capo 4 version
+%	s1*0^\markup { \hspace #0.0 \raise #2.0 \bigger \bold { "Moderate pop (*** CAPO 4 ***)" } }
+
+	\once \override TextScript.padding = #2.0
+	s1*0^\markup { \large \bold { Moderate } }
+
+	\repeat volta 2
+	{
+		\mark \markup { \override #'(font-family . sans) { \box { A } } }
+		s1*7 \bar "||"   % 1-7
+	}
+	\alternative
+	{
+		{
+			s1 |   % 8
+		}
+		{
+			s1 |   % 9
+		}
+	}
+
+	\repeat volta 4
+	{
+		\mark \markup { \override #'(font-family . sans) { \box { B } } }
+		s1*7 |   % 10-16
+	}
+	\alternative
+	{
+		{
+			s1 |   % 17
+		}
+		{
+			s4 s2.^\markup{ Da Capo } \bar "||"   % 18
+		}
+		{
+			s1 |   % 19
+		}
+		{
+			s1 |   % 20
+		}
+	}
+
+	\repeat volta 2
+	{
+		\mark \markup { \override #'(font-family . sans) { \box { C } } }
+		s1*7 |   % 21-27
+	}
+	\alternative
+	{
+		{
+			s1 |   % 28
+		}
+		{
+			s1 \bar "||"   % 29
+		}
+	}
+
+	\mark \markup { \override #'(font-family . sans) { \box { D } } }
+	s1*14 | % 30-43
+
+	\repeat volta 2
+	{
+		\mark \markup { \override #'(font-family . sans) { \box { E } } }
+		s1*7 |   % 44-50
+	}
+	\alternative
+	{
+		{
+			s1 |   % 51
+		}
+		{
+			s1 |   % 52
+		}
+	}
+
+	\repeat volta 2
+	{
+		\mark \markup { \override #'(font-family . sans) { \box { F } } }
+		s1*7 |   % 53-59
+	}
+	\alternative
+	{
+		{
+			s1 |   % 60
+		}
+		{
+			s1 |   % 61
+		}
+	}
+
+	s1*6 |   % 62-67
+
+	\repeat volta 2
+	{
+		\mark \markup { \override #'(font-family . sans) { \box { G } } }
+		s1*7 |   % 68-74
+	}
+	\alternative
+	{
+		{
+			s1 |   % 75
+		}
+		{
+			s1 |   % 76
+		}
+	}
+
+	s1 \bar "|."   % 77
+}
+
+
+%
+% Lead vocal
+%
+LeadVox = \relative c'
+{
+%	\set Staff.instrument = #"Lead vox"
+	\clef G
+	\override Staff.TimeSignature.style = #'numbered
+%Hm. Needed anymore?
+%	\override Score.SpacingSpanner.average-spacing-wishes = ##f
+
+	% Intro (refrain)
+
+	r1 |   % 1
+	r1 |   % 2
+	r1 |   % 3
+	r1 |   % 4
+	r1 |   % 5
+	r1 |   % 6
+	r1 |   % 7
+
+	r1 |   % 8
+
+	r1 |   % 9
+
+	% Verse
+
+	e4 e8 e4. e8 e |   % 10
+	fs4 a8 e4. a8 a |   % 11
+	b4 c8 a8 ~ a2 |   % 12
+	r2 f'8 ( g4. ) |   % 13
+	g4 ( a bf2 ) |   % 14
+	g8 f4 e f4. |   % 15
+	f8 g4 a g f8 ( ~ |   % 16
+
+	f2 e ) |   % 17
+
+	f2.-\repeatTie r4 |   % 18
+
+	f2-\repeatTie ( e ) |   % 19
+
+	f2.-\repeatTie r4 |   % 20
+
+	% Refrain
+
+	a1 ~ |   % 21
+	a1 |   % 22
+	gs1 ~ |   % 23
+	gs1 |   % 24
+	g1 ~ |   % 25
+	g1 |   % 26
+	f1 ~ |   % 27
+
+	f1 |   % 28
+
+	r1 |   % 29
+
+	% Bridge
+
+	r2 d8 d4. |   % 30
+	e4 e8 e4. f8 d |   % 31
+	r4 a8 a e' f4 d8 ( ~ |   % 32
+	d8 c bf2. ) |   % 33
+	r2 c4 d8 bf' ~ |   % 34
+	bf4 a8 g4. f8 f ~ |   % 35
+	f4 c8 c d f4 d8 ( |   % 36
+	c2 ) r |   % 37
+	r2 d8 d4. |   % 38
+	e4 e8 e4. f8 d ~ |   % 39
+	d4 a8 a e' f4 d8 ( ~ |   % 40
+	d8 c bf2. ) |   % 41
+	r2 c8 d4 bf'8 ~ |   % 42
+	bf4 a g f8 f ~ |   % 43
+
+	% Refrain
+
+	<< { f1 } \new Voice = "v2" { \voiceTwo a1 } >> |   % 44
+	a8 a4 a a gs8 ~ |   % 45
+	gs1 |   % 46
+	r1 |   % 47
+	g1 |   % 48
+	g8 g4 g g f8 ~ |   % 49
+	f1 |   % 50
+
+	r1 |   % 51
+
+	r1 |   % 52
+
+	% Verse
+
+	e,4 e8 e4. e8 e |   % 53
+	fs4 a8 e4. a4 |   % 54
+	b4 c8 a8 ~ a2 |   % 55
+	r2 f'8 ( g4. ) |   % 56
+	g4 ( a bf2 ) |   % 57
+	g8 f4 e f4. |   % 58
+	f8 g4 a g f8 ( ~ |   % 59
+
+	f2 e ) |   % 60
+
+	f2-\repeatTie f8 ( g4. ) |   % 61
+	g4 ( a bf2 ) |   % 62
+	g8  f4 e f4. |   % 63
+	f8 g4 a g f8 ~ |   % 64
+	f2 f8 ( g4. ) |   % 65
+	g4 ( a bf2 ) |   % 66
+	g8  f4 e f4. |   % 67
+
+	% Outro
+
+	d1 ~ |   % 68
+	d1 |   % 69
+	d8 d4 d4 d4 d8 ~ |   % 70
+	d1 |   % 71
+	d1 ~ |   % 72
+	d1 |   % 73
+	d8 d4 d4 d4 d8 ~ |   % 74
+
+	d1 |   % 75
+
+	r1 |   % 76
+	r1-\fermata |   % 77
+}
+
+LeadVoxText = \lyricmode
+{
+	Sleep -- less hours and _ dream -- less nights and _ far a -- ways. _
+	Ooo ooo ooo __ _ _
+	Wish -- ing you were, wish -- ing you were here. __ _ _
+
+	_ _ _ _
+
+	Ooo __ _ Ooo __ _ Ooo __ _ Ooo __ _
+
+	And I'd like to change my life, and you know I would, __ _ _ _
+	Just to be __ _ with you to -- night, _ ba -- by if I could. __ _
+	But I've got my job to do, _ and I do it well, __ _ _ _
+	So I guess _ that's how it is. __ _
+
+	wish -- ing you were here, __ _
+	Ooo, wish -- ing you were here. __ _
+
+	On the road, it's a hea -- vy load, but I'll be by, __ _
+	Ooo ooo ooo __ _ _
+	Wish -- ing you were, wish -- ing you were here. __ _ _
+	_
+	Ooo ooo ooo __ _ _
+	Wish -- ing you were, wish -- ing you were here. __ _
+	Ooo __ _ ooo __ _ _
+	Wish -- ing you were,
+
+	Ooo __ _
+	Wish -- ing you were here __ _
+	Ooo __ _
+	Wish -- ing you were here __ _
+%{
+Sleepless hours and dreamless nights and far aways
+Ooo wishing you were, wishing you were here.
+Heaven knows and Lord, it shows, when I'm away,
+Ooo wishing you were, wishing you were here.
+
+Ooooo, ooooo, ooooo, ooooo
+Ooooo, ooooo, ooooo, ooooo
+
+Same old show in a different town, on another day,
+Ooo wishing you were, wishing you were here.
+Even though you're far away, you're on my mind,
+Ooo wishing you were, wishing you were here.
+
+Ooooo, ooooo, ooooo, ooooo
+Ooooo, ooooo, ooooo, ooooo
+
+And I'd like to change my life, and you know I would,
+Just to be with you tonight, baby if I could.
+But I've got my job to do, and I do it well,
+So I guess that's how it is.
+
+Ooooo, wishing your were here, ooooo, wishing you were here
+Ooooo, wishing your were here, ooooo, wishing you were here
+
+On the road, it's a heavy load, but I'll be by,
+Ooo, wishing your were, wishing you were here.
+Pay the price, make a sacrifice, and still I'll try.
+Ooo, wishing you were, wishing you were here.
+Ooo, wishing you were, wishing you were here.
+Ooo, wishing you were...
+
+Ooooo, wishing you were here.
+Ooooo, wishing you were here.
+
+%}
+}
+
+LeadVoxTextB = \lyricmode
+{
+	Hea -- ven knows and _ Lord, it shows, _ when I'm a -- way, _
+	_ _ _ _ _
+	_ _ _ _ _ _ _ _ _ _  _ _ _ _
+
+	_ _ _ _ _ _ _ _
+
+	_ _ _ _ _ _ _ _ _ _ _ _ _ _ _
+	_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _
+	_ _ _ _ _ _ _ _ _ _ _ _ _ _ _
+	_ _ _ _ _ _ _ _ _ _
+
+	_ _ _ _ _ _
+	_ _ _ _ _ _ _
+
+	Pay the price, make a sa -- cri -- fice, and still I'll try. __ _
+}
+
+LeadVoxTextC = \lyricmode
+{
+	Same old show in a diff -- erent town, on a -- no -- ther day,
+}
+
+LeadVoxTextD = \lyricmode
+{
+	E -- ven though you're _ far a -- way, you're _ on my mind, _
+}
+
+LeadVoxOverlap = \lyricmode
+{
+	Ooo,
+}
+
+Riffs = \relative c'
+{
+	\clef G
+%Hm. Needed anymore?
+%	\override Score.SpacingSpanner.average-spacing-wishes = ##f
+
+	% Intro
+
+	\tiny
+%	f8 a ef' g d'-\fermata r s4
+	\normalsize
+}
+
+
+%
+% Chord names
+%
+Chords = \chordmode
+{
+	% Refrain
+
+	d1:m7 |   % 1
+	s1 |   % 2
+	e1/d |   % 3
+	s1 |   % 4
+	ef1/d |   % 5
+	s1 |   % 6
+	d1:m |   % 7
+
+	s1 |   % 8
+
+	bf2 c |   % 9
+
+	% Verse
+
+	a1 |   % 10
+	d4. a8 s2 |   % 11
+	d1:m7 |   % 12
+	s1 |   % 13
+	g1:m7 |   % 14
+	c1 |   % 15
+	d1:m7 |   % 16
+
+	bf2 c |   % 17
+
+ 	d1:m7 |   % 18
+
+	bf2 c |   % 19
+
+ 	d1:m7 |   % 20
+
+	% Refrain
+
+	d1:m7 |   % 21
+	s1 |   % 22
+	e1/d |   % 23
+	s1 |   % 24
+	ef1/d |   % 25
+	s1 |   % 26
+	d1:m |   % 27
+
+	s1 |   % 28
+
+	d2:m c |   % 29
+
+	% Bridge
+
+	bf1 |   % 30
+	c1 |   % 31
+	d2:m c |   % 32
+	bf1 |   % 33
+	f1 |   % 34
+	bf1 |   % 35
+	f2 bf |   % 36
+	f1 |   % 37
+	bf1 |   % 38
+	c1 |   % 39
+	d2:m c |   % 40
+	bf1 |   % 41
+	f1 |   % 42
+	bf1 |   % 43
+
+	% Refrain
+
+	d1:m7 |   % 44
+	s1 |   % 45
+	e1/d |   % 46
+	s1 |   % 47
+	ef1/d |   % 48
+	s1 |   % 49
+	d1:m |   % 50
+
+	s1 |   % 51
+
+	bf2 c |   % 52
+
+	% Verse
+
+	a1 |   % 53
+	d4. a8 s2 |   % 54
+	d1:m7 |   % 55
+	s1 |   % 56
+	g1:m7 |   % 57
+	c1 |   % 58
+	d1:m7 |   % 59
+
+	bf2 c |   % 60
+
+ 	d1:m7 |   % 61
+	g1:m7 |   % 62
+	c1 |   % 63
+	d1:m7 |   % 64
+	s1 |   % 65
+	g1:m7 |   % 66
+	c1 |   % 67
+%	d1:m7 |   % 68
+
+	% Outro
+
+	d1:m7 |   % 69
+	s1 |   % 70
+	e1/d |   % 71
+	s1 |   % 72
+	ef1/d |   % 73
+	s1 |   % 74
+	d1:m |   % 75
+
+	s1 |   % 76
+
+	d1:m |   % 77
+	d1 |   % 78
+}
+
+
+%
+% Chord rhythms
+%
+% Use a RhythmicStaff on the chords instead of this?
+% It almost works, but not quite. Doesn't collapse chords above to single notes...
+%
+Rhythm = \relative c
+{
+%%	\set Voice.autoBeaming = ##f
+%%	\set Staff.instrument = #"Rhythm"
+	\override Staff.TimeSignature.style = #'numbered
+	\override NoteHead.style = #'slash
+
+	c4 c c c |   % 1
+	c4 c c c |   % 2
+	c4 c c c |   % 3
+	c4 c c c |   % 4
+	c4 c c c |   % 5
+	c4 c c c |   % 6
+	c4 c c c |   % 7
+
+	c4 c c c |   % 8
+
+	c4 c c c |   % 9
+
+	% Verse
+
+	c4 c c c |   % 10
+	c4 c8 c8 ~ c4 c |   % 11
+	c4 c c c |   % 12
+	c4 c c c |   % 13
+	c4 c c c |   % 14
+	c4 c c c |   % 15
+	c4 c c c |   % 16
+
+	c4 c c c |   % 17
+
+	c4 c c c |   % 18
+
+	c4 c c c |   % 19
+
+	c4 c c c |   % 20
+
+	% Refrain
+
+	c4 c c c |   % 21
+	c4 c c c |   % 22
+	c4 c c c |   % 23
+	c4 c c c |   % 24
+	c4 c c c |   % 25
+	c4 c c c |   % 26
+	c4 c c c |   % 27
+
+	c4 c c c |   % 28
+
+	c4 c c c |   % 29
+
+	% Bridge
+
+	c4 c c c |   % 30
+	c4 c c c |   % 31
+	c4 c c c |   % 32
+	c4 c c c |   % 33
+	c4 c c c |   % 34
+	c4 c c c |   % 35
+	c4 c c c |   % 36
+	c4 c c c |   % 37
+	c4 c c c |   % 38
+	c4 c c c |   % 39
+	c4 c c c |   % 40
+	c4 c c c |   % 41
+	c4 c c c |   % 42
+	c4 c c c |   % 43
+
+	% Refrain
+
+	c4 c c c |   % 44
+	c4 c c c |   % 45
+	c4 c c c |   % 46
+	c4 c c c |   % 47
+	c4 c c c |   % 48
+	c4 c c c |   % 49
+	c4 c c c |   % 50
+
+	c4 c c c |   % 51
+
+	c4 c c c |   % 52
+
+	% Verse
+
+	c4 c c c |   % 53
+	c4 c8 c ~ c4 c |   % 54
+	c4 c c c |   % 55
+	c4 c c c |   % 56
+	c4 c c c |   % 57
+	c4 c c c |   % 58
+	c4 c c c |   % 59
+
+	c4 c c c |   % 60
+
+	c4 c c c |   % 61
+	c4 c c c |   % 62
+	c4 c c c |   % 63
+	c4 c c c |   % 64
+	c4 c c c |   % 65
+	c4 c c c |   % 66
+	c4 c c c |   % 67
+%	c4 c c c |   % 68
+
+	% Outro (refrain)
+
+	c4 c c c |   % 69
+	c4 c c c |   % 70
+	c4 c c c |   % 71
+	c4 c c c |   % 72
+	c4 c c c |   % 73
+	c4 c c c |   % 74
+	c4 c c c |   % 75
+
+	c4 c c c |   % 76
+
+	c2 c |   % 77
+	c1-\fermata |   % 78
+}
+
+
+Dynamics =
+{
+%{
+	s4_\markup { \italic { Let notes ring } } s2. |   % 1
+	s4_\markup { \italic { snare pat. } } s2 |   % 1
+	s4_\markup { \italic { simile } } s2 |   % 2
+	s2.*19
+	s4_\markup { \italic { spacey } } s2 |   % 22
+	s2.*5
+	s4 s \< s \! |   % 28
+	s2.*22
+	s4_\markup { \italic { Last time } } s2 |   % 51
+%}
+}
+
+
+\score
+{
+	<<
+		\set Score.skipBars = ##t
+		\set Score.melismaBusyProperties = #'()
+
+%		\new Staff
+		<<
+			\new ChordNames \Chords
+%Capo 4 edition
+%			\new ChordNames \transpose b g \Chords
+			\new RhythmicStaff << \Rhythm \Dynamics >>
+		>>
+
+		\new Staff
+		<<
+			\Global						% The "roadmap" that everything else depends on
+			\new Voice = "lead" \LeadVox
+			\new Voice \Riffs
+			\new Lyrics \lyricsto "lead" \LeadVoxText
+			\new Lyrics \lyricsto "lead" \LeadVoxTextB
+			\new Lyrics \lyricsto "lead" \LeadVoxTextC
+			\new Lyrics \lyricsto "lead" \LeadVoxTextD
+			\new Lyrics \lyricsto "v2" \LeadVoxOverlap
+		>>
+	>>
+}
+
+
+\paper
+{
+  #(define fonts (make-pango-font-tree
+    "Times New Roman"
+    "LilyJAZZ Text"
+    "Luxi Mono"
+    (/ staffSize 20)))
+
+% Spread staves vertically across last page (default: t)
+	ragged-last-bottom = ##f
+% Don't spread staves vertically across the page (default: f)
+%	ragged-bottom = ##t
+% Allow partial line for last stave (default: f)
+%	ragged-last = ##t
+
+% To find out what's eating the space at the top...
+%	annotate-spacing = ##t
+%let's try this: [It works! Huzzah!][Nope!]
+%	obsolete-page-top-space = 0  top-system-spacing.basic-distance = #(/ obsolete-page-top-space staff-space)
+}