diff options
-rw-r--r-- | public/index.html | 2 | ||||
-rw-r--r-- | songs/tri-yann/pelot-d-hennebont.lisp | 60 | ||||
-rw-r--r-- | src/main.lisp | 4 |
3 files changed, 65 insertions, 1 deletions
diff --git a/public/index.html b/public/index.html index 1aba3bd..6851c72 100644 --- a/public/index.html +++ b/public/index.html @@ -13,3 +13,5 @@ <a href="songs/ben-e-king/stand-by-me.html">Ben E. King – Stand by Me</a> <li> <a href="songs/graeme-allwright/petit-garcon.html">Graeme Allwright – Petit Garçon</a> + <li> + <a href="songs/tri-yann/pelot-d-hennebont.html">Try Yann – Pelot d’Hennebont</a> diff --git a/songs/tri-yann/pelot-d-hennebont.lisp b/songs/tri-yann/pelot-d-hennebont.lisp new file mode 100644 index 0000000..08662fe --- /dev/null +++ b/songs/tri-yann/pelot-d-hennebont.lisp @@ -0,0 +1,60 @@ +(song + (title "Pelot d’Hennebont") + (from "Tri Yann") + + (chords + (intro + ("Em" %)) + + (verse + ("Em / G" D "Em / G" D) + ("D / G" "D / G" "D / G" "D / G"))) + + (lyrics + (intro) + + (verse + "Ma chère maman je vous écris, + Que nous sommes entrés dans Paris. + Que je sommes déjà caporal, + Et serons bientôt général.") + + (verse + "À la bataille je combattions, + Les ennemis de la nation. + Et tous ceux qui se présentions, + À grand coups d’sabres les émondions.") + + (verse + "Le roi Louis m’a z’appelé, + C’est « sans quartier » qu’il m’a nommé. + « Sire sans quartier, c’est point mon nom », + J’lui dit « J’m’appelle Pelot d’Hennebont ».") + + (verse + "Il a quéri un biau ruban, + Et je n’sais quoi au bout d’argent. + Il dit : « Boute ça sur ton habit, + Et combats toujours l’ennemi ».") + + (verse + "Faut qu’ce soye que’qu’chose de précieux, + Pour que les autres m’appellent « monsieur ». + Et foutent lou main à lou chapiau, + Quand ils veulent conter au Pelot.") + + (interlude) + + (verse + "Ma mère si j’meurs en combattant, + J’vous enverrais ce biau ruban. + Et vous l’bouterez à votre fusiau, + En souvenir du gars Pelot.") + + (verse + "Dites à mon père à mon cousin, + À mes amis que je vais bien. + Je suis leur humble serviteur, + Pelot qui vous embrasse de coeur.") + + (outro))) diff --git a/src/main.lisp b/src/main.lisp index 8e47016..1afc4f9 100644 --- a/src/main.lisp +++ b/src/main.lisp @@ -60,7 +60,8 @@ ('intro "Intro") ('verse "Couplet") ('chorus "Refrain") - ('interlude "Interlude"))) + ('interlude "Interlude") + ('outro "Outro"))) (defun part-tags (key children) (h "div" @@ -148,3 +149,4 @@ (export-song "songs/graeme-allwright/petit-garcon.lisp") (export-song "songs/ben-e-king/stand-by-me.lisp") +(export-song "songs/tri-yann/pelot-d-hennebont.lisp") |