aboutsummaryrefslogtreecommitdiff
path: root/songs
diff options
context:
space:
mode:
Diffstat (limited to 'songs')
-rw-r--r--songs/ben-e-king/stand-by-me.lisp5
-rw-r--r--songs/graeme-allwright/petit-garcon.lisp9
-rw-r--r--songs/tri-yann/pelot-d-hennebont.lisp5
3 files changed, 11 insertions, 8 deletions
diff --git a/songs/ben-e-king/stand-by-me.lisp b/songs/ben-e-king/stand-by-me.lisp
index c3537a5..36eca86 100644
--- a/songs/ben-e-king/stand-by-me.lisp
+++ b/songs/ben-e-king/stand-by-me.lisp
@@ -1,11 +1,12 @@
(song
(title "Stand by Me")
(from "Ben E. King")
+ (tonality "G")
(chords
(all
- (A % "F♯m" %)
- (D E A %)))
+ (G % "Em" %)
+ (C D G %)))
(lyrics
(intro)
diff --git a/songs/graeme-allwright/petit-garcon.lisp b/songs/graeme-allwright/petit-garcon.lisp
index bd6e3bf..23a6ca6 100644
--- a/songs/graeme-allwright/petit-garcon.lisp
+++ b/songs/graeme-allwright/petit-garcon.lisp
@@ -1,15 +1,16 @@
(song
(title "Petit Garçon")
(from "Graeme Allwright")
+ (tonality C)
(chords
(verse
- (G D C D7)
- ("G / G7" "C / C-" "G / D7" G))
+ (C G F G7)
+ ((C C7) (F F-) (C G7) C))
(chorus
- (D7 % C G)
- ("Em" "Em / A7" "A7 / D7" D7)))
+ (G7 % F C)
+ ("Am" ("Am" D7) (D7 G7) G7)))
(lyrics
(intro)
diff --git a/songs/tri-yann/pelot-d-hennebont.lisp b/songs/tri-yann/pelot-d-hennebont.lisp
index 08662fe..ac4eafa 100644
--- a/songs/tri-yann/pelot-d-hennebont.lisp
+++ b/songs/tri-yann/pelot-d-hennebont.lisp
@@ -1,14 +1,15 @@
(song
(title "Pelot d’Hennebont")
(from "Tri Yann")
+ (tonality "Em")
(chords
(intro
("Em" %))
(verse
- ("Em / G" D "Em / G" D)
- ("D / G" "D / G" "D / G" "D / G")))
+ (("Em" G) D ("Em" G) D)
+ ((D "Em") (D "Em") (D "Em") (D "Em"))))
(lyrics
(intro)