initial support for automatic transpositions between Staff and Tablature Staff with lilypond

lilypond/10_sous_dans_ma_poche-1.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 2.5\cm}
 
+\new \songbookstaff
 {
   \relative c'
   {

lilypond/10_sous_dans_ma_poche-2.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 4\cm}
 
+\new \songbookstaff
 {
   \relative c'
   {

lilypond/A_l_aventure_compagnons.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 5.6\cm}
 
+\new \songbookstaff
 {
   \key ees \major
   \time 2/4

lilypond/Chanson_pour_Pierrot.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 2.4\cm}
 
+\new \songbookstaff
 {
   \key fis \minor
   \relative c'

lilypond/Cupidon_s_en_fout.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 3.6\cm}
 
+\new \songbookstaff
 {
   \key a \minor
   \time 2/4

lilypond/Dans_la_tete.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 2.4\cm}
 
+\new \songbookstaff
 {
   \relative c''
   {

lilypond/Droit_devant-1.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 2.4\cm}
 
+\new \songbookstaff
 {
   \key d \minor
   \relative c''

lilypond/Droit_devant-2.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 1.1\cm}
 
+\new \songbookstaff
 {
   \key d \minor
   \relative c''

lilypond/Education_sentimentale.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 2.5\cm}
 
+\new \songbookstaff
 {
   \key c \major
   \time 3/4

lilypond/Entre_deux_taxis.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 2.4\cm}
 
+\new \songbookstaff
 {
   \key c \major
   \time 4/4

lilypond/Et_si_je_t_aime.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 5.2\cm}
 
+\new \songbookstaff
 {
   \relative c'''
   {

lilypond/Etoiles_filantes-1.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 1.1\cm}
 
+\new \songbookstaff
 {
   \relative c'
   {

lilypond/Etoiles_filantes-2.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 2.3\cm}
 
+\new \songbookstaff
 {
   \relative c''
   {

lilypond/Fairytale_of_New_York.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 2.8\cm}
 
+\new \songbookstaff
 {
   \key d \major
   \time 2/4

lilypond/Fuck_you.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 1.1\cm}
 
+\new \songbookstaff
 {
   \key c \major
   \time 4/4

lilypond/Geste_heroique-2.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 2.4\cm}
 
+\new \songbookstaff
 {
   \relative c''
   {

lilypond/Heart_of_gold.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 3.6\cm}
 
+\new \songbookstaff
 {
   \key g \major
   \time 2/4

lilypond/Jessica.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 1.2\cm}
 
+\new \songbookstaff
 {
   \key c \major
   \time 2/4

lilypond/Keep_on_the_sunny_side.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 3.6\cm}
 
+\new \songbookstaff
 {
   \key bes \major
   \time 2/4

lilypond/Kiss_the_children.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 2.4\cm}
 
+\new \songbookstaff
 {
   \key c \minor
   \time 6/8

lilypond/L_harmonica.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 5.0\cm}
 
+\new \songbookstaff
 {
   \key a \minor
   \time 2/4

lilypond/La_biere_du_donjon.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 1.1\cm}
 
+\new \songbookstaff
 {
   \relative c''
   {

lilypond/La_blanche.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 2.3\cm}
 
+\new \songbookstaff
 {
   \key d \major
   \relative c''

lilypond/La_compagnie_du_chien_rugissant.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 1.1\cm}
 
+\new \songbookstaff
 {
   \relative c''
   {

lilypond/La_cumbia_del_mole.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 2.5\cm}
 
+\new \songbookstaff
 {
   \key e \minor
   \time 2/2

lilypond/La_danse_des_esquimaux.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 2.3\cm}
 
+\new \songbookstaff
 {
   \key e \major
   \time 2/4

lilypond/La_declaration.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 1.1\cm}
 
+\new \songbookstaff
 {
   \key e \minor
   \time 4/4

lilypond/La_fiancee_de_l_eau.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 3.7\cm}
 
+\new \songbookstaff
 {
   \key d \minor
   \time 6/8

lilypond/La_jument_de_Michao.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 13.7\cm}
 
+\new \songbookstaff
 {
   \key a \minor
   \relative c''

lilypond/La_premiere_fois.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 2.3\cm}
 
+\new \songbookstaff
 {
   \key ees \major
   \time 6/8

lilypond/La_reine.ly

@@ -2,6 +2,7 @@
 \paper{paper-height = 8.8\cm}
 
 
+\new \songbookstaff
 {
   \key e \minor
   \time 2/2

lilypond/La_sorciere_Grabouilla.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 6.1\cm}
 
+\new \songbookstaff
 {
   \key e \minor
   \time 2/4

lilypond/La_tribu_de_Dana.ly

@@ -6,6 +6,7 @@
   paper-height = 1.4\cm
 }
 
+\new \songbookstaff
 {
   \key c \minor
   \time 2/4

lilypond/La_vie_d_aventurier.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 2.4\cm}
 
+\new \songbookstaff
 {
   \key a \minor
   \partial 8 e'8	

lilypond/Le_cafe_des_jours_heureux.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 2.3\cm}
 
+\new \songbookstaff
 {
   \relative c'
   {

lilypond/Le_joueur_de_pipeau.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 1.1\cm}
 
+\new \songbookstaff
 {
   \key d \minor
   \relative c''

lilypond/Le_laride_du_poulet.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 2.4\cm}
 
+\new \songbookstaff
 {
   \key a \minor
   \time 2/4

lilypond/Le_moustique.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 2.4\cm}
 
+\new \songbookstaff
 {
   \relative c''
   {

lilypond/Le_p_tit_gars.ly

@@ -4,6 +4,8 @@
   line-width   = 14.5\cm
   paper-width  = 15\cm
 }
+
+\new \songbookstaff
 {
   \relative c''
   {

lilypond/Le_rat_de_l_opera-1.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 6.0\cm}
 
+\new \songbookstaff
 {
   \key a \major
   \time 3/8

lilypond/Le_rat_de_l_opera-2.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 3.8\cm}
 
+\new \songbookstaff
 {
   \key a \major
   \time 3/8

lilypond/Le_vent_nous_portera.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 2.6\cm}
 
+\new \songbookstaff
 {
   \key e \minor
   \time 2/4

lilypond/Lea.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 2.4\cm}
 
+\new \songbookstaff
 {
   \key a \minor
   \time 2/4

lilypond/Les_hommes_que_j_aime.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 2.4\cm}
 
+\new \songbookstaff
 {
   \relative c''
   {

lilypond/Les_mains_froides.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 2.3\cm}
 
+\new \songbookstaff
 {
   \relative c''
   {

lilypond/Les_souliers_de_Lady_Fae-1.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 2.4\cm}
 
+\new \songbookstaff
 {
   \key e \minor
   \time 6/8

lilypond/Les_souliers_de_Lady_Fae-2.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 3.6\cm}
 
+\new \songbookstaff
 {
   \key a \minor
   \time 6/8

lilypond/Les_souliers_rouges.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 3.6\cm}
 
+\new \songbookstaff
 {
   \key g \major
   \time 2/4

lilypond/Lino.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 1.4\cm}
 
+\new \songbookstaff
 {
   \key d \minor
   \time 4/4

lilypond/Ma_gonzesse.ly

@@ -1,5 +1,7 @@
 \include "header"
 \paper{paper-height = 2.4\cm}
+
+\new \songbookstaff
 {
   \key c \major
   \time 4/4

lilypond/Mamadou_avait_mal_aux_dents.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 5.0\cm}
 
+\new \songbookstaff
 {
   \key c \major
   \time 2/4

lilypond/Marchand_de_couleurs.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 2.4\cm}
 
+\new \songbookstaff
 {
   \key a \minor
   \time 12/8

lilypond/Mrs_McGrath.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 2.4\cm}
 
+\new \songbookstaff
 {
   \key d \minor
   \time 6/8

lilypond/Noel_en_Mordor.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 2.4\cm}
 
+\new \songbookstaff
 {
   \key c \minor
   \time 2/4

lilypond/Notre_monde.ly

@@ -1,7 +1,7 @@
 \include "header"
 \paper{paper-height = 2.4\cm}
 
-
+\new \songbookstaff
 {
   \key e \minor
   \time 4/4

lilypond/Nuit_humide_1.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 4.0\cm}
 
+\new \songbookstaff
 {
   \key e \minor
   \time 2/4

lilypond/Nuit_humide_2.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 4.0\cm}
 
+\new \songbookstaff
 {
   \key e \minor
   \time 4/4

lilypond/One_more_cup_of_coffee.ly

@@ -6,6 +6,7 @@
   paper-height = 1.5\cm
 }
 
+\new \songbookstaff
 {
   \key a \minor
   \time 2/4

lilypond/Petit_Pierrot.ly

@@ -3,6 +3,7 @@
   paper-height = 2.6\cm
 }
 
+\new \songbookstaff
 {
   \relative c''
   {

lilypond/Rue_de_Paname.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 3.6\cm}
 
+\new \songbookstaff
 {
   \key bes \major
   \time 6/8

lilypond/Rue_de_Paname_acc.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 3.6\cm}
 
+\new \songbookstaff
 {
   \key bes \major
   \time 6/8

lilypond/Rue_du_temps.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 1.1\cm}
 
+\new \songbookstaff
 {
   \key d \minor
   \time 6/8

lilypond/Sad_Lisa.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 5.0\cm}
 
+\new \songbookstaff
 {
   \key e \minor
   \time 4/4

lilypond/Sad_robot.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 2.4\cm}
 
+\new \songbookstaff
 {
   \key d \minor
   \time 2/4

lilypond/Sainte_Cecile.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 5.0\cm}
 
+\new \songbookstaff
 {
   \key d \minor
   \time 2/4

lilypond/Saturnin.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 3.8\cm}
 
+\new \songbookstaff
 {
   \relative c''
   {

lilypond/Souleve_ta_jupe.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 5.0\cm}
 
+\new \songbookstaff
 {
   \key d \minor
   \time 4/4

lilypond/The_boxer.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 2.4\cm}
 
+\new \songbookstaff
 {
   \key c \major
   \time 4/4

lilypond/The_ring_of_fire.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 2.3\cm}
 
+\new \songbookstaff
 {
   \key g \major
   \relative c''

lilypond/Tom_Sawyer_1.ly

@@ -3,6 +3,7 @@
   paper-height = 1.1\cm
 }
 
+\new \songbookstaff
 {
   \key c \major
   \time 2/4
@@ -11,4 +12,3 @@
     e,4 c g'2 a4 c8. d16 e8 c4 g8 a4 c8. d16 e8 c d4 c2
   }
 }
-

lilypond/Tom_Sawyer_2.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 3.8\cm}
 
+\new \songbookstaff
 {
   \key c \major
   \time 2/4

lilypond/Ton_invitation_1.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 1.1\cm}
 
+\new \songbookstaff
 {
   \relative c''
   {

lilypond/Ton_invitation_2.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 3.8\cm}
 
+\new \songbookstaff
 {
   \relative c''
   {

lilypond/V_la_l_bon_vent.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 2.5\cm}
 
+\new \songbookstaff
 {
   \relative c'
   {

lilypond/Vanity.ly

@@ -1,6 +1,7 @@
 \include "header"
 \paper{paper-height = 1.1\cm}
 
+\new \songbookstaff
 {
   \key a \minor
   \time 2/4

lilypond/header

@@ -1,3 +1,4 @@
+#(use-modules (guile-user))
 \version "2.14.2"
 
 \paper

makefile

@@ -42,7 +42,8 @@ endif
 
 
 LATEX=pdflatex $(LATEX_OPTIONS)
-
+STAFF = "Staff"
+#STAFF = "TabStaff"
 ############################################################
 ### Targets
 
@@ -87,7 +88,7 @@ $(PDF): %.pdf: %.tex %.aux
 	$(MAKE_SONGBOOK) -s $< -d -o $@
 
 %.pdf: %.ly
-	@$(LILYPOND) --format=pdf --output=$(@:%.pdf=%) $<
+	@$(LILYPOND) --format=pdf -e '(define-public songbookstaff $(STAFF))' --output=$(@:%.pdf=%) $<
 
 $(CHORDS): $(CHORDS_SRC)
 	$(MAKE_CHORDS) -o $@