summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--Master/texmf-dist/doc/latex/leadsheets/README43
-rw-r--r--Master/texmf-dist/doc/latex/leadsheets/leadsheets_en.pdfbin0 -> 823201 bytes
-rw-r--r--Master/texmf-dist/doc/latex/leadsheets/leadsheets_en.tex1897
-rw-r--r--Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.chordnames.code.tex193
-rw-r--r--Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.chords.code.tex189
-rw-r--r--Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.musejazz.code.tex259
-rw-r--r--Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.musicsymbols.code.tex104
-rw-r--r--Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.properties.code.tex167
-rw-r--r--Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.shorthands.code.tex40
-rw-r--r--Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.songs.code.tex631
-rw-r--r--Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.templates.code.tex87
-rw-r--r--Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.translations.code.tex45
-rw-r--r--Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.transposing.code.tex211
-rw-r--r--Master/texmf-dist/tex/latex/leadsheets/leadsheets.sty171
-rwxr-xr-xMaster/tlpkg/bin/tlpkg-ctan-check5
-rwxr-xr-xMaster/tlpkg/libexec/ctan2tds1
-rw-r--r--Master/tlpkg/tlpsrc/collection-music.tlpsrc1
-rw-r--r--Master/tlpkg/tlpsrc/leadsheets.tlpsrc0
18 files changed, 4042 insertions, 2 deletions
diff --git a/Master/texmf-dist/doc/latex/leadsheets/README b/Master/texmf-dist/doc/latex/leadsheets/README
new file mode 100644
index 00000000000..458f562b3e8
--- /dev/null
+++ b/Master/texmf-dist/doc/latex/leadsheets/README
@@ -0,0 +1,43 @@
+--------------------------------------------------------------------------
+the LEADSHEETS package v0.1 2015/01/11
+
+ typesetting leadsheets and songbooks
+
+--------------------------------------------------------------------------
+Clemens Niederberger
+Web: https://github.com/cgnieder/leadsheets/
+E-Mail: contact@mychemistry.eu
+--------------------------------------------------------------------------
+Copyright 2014-2015 Clemens Niederberger
+
+This work may be distributed and/or modified under the
+conditions of the LaTeX Project Public License, either version 1.3
+of this license or (at your option) any later version.
+The latest version of this license is in
+ http://www.latex-project.org/lppl.txt
+and version 1.3 or later is part of all distributions of LaTeX
+version 2005/12/01 or later.
+
+This work has the LPPL maintenance status `maintained'.
+
+The Current Maintainer of this work is Clemens Niederberger.
+--------------------------------------------------------------------------
+The leadsheets bundle consists of the following files
+ - leadsheets.sty
+ - libraries -- they all follow the naming scheme
+ leadsheets.library.<name>.code.tex:
+ * chordnames
+ * chords
+ * musejazz
+ * musicsymbols
+ * properties
+ * songs
+ * templates
+ * translations
+ * transposing
+ - leadsheets_en.tex
+ - leadsheets_en.pdf
+--------------------------------------------------------------------------
+If you have any ideas, questions, suggestions or bugs to report, please
+feel free to contact me.
+--------------------------------------------------------------------------
diff --git a/Master/texmf-dist/doc/latex/leadsheets/leadsheets_en.pdf b/Master/texmf-dist/doc/latex/leadsheets/leadsheets_en.pdf
new file mode 100644
index 00000000000..69af371ca47
--- /dev/null
+++ b/Master/texmf-dist/doc/latex/leadsheets/leadsheets_en.pdf
Binary files differ
diff --git a/Master/texmf-dist/doc/latex/leadsheets/leadsheets_en.tex b/Master/texmf-dist/doc/latex/leadsheets/leadsheets_en.tex
new file mode 100644
index 00000000000..118320aa61e
--- /dev/null
+++ b/Master/texmf-dist/doc/latex/leadsheets/leadsheets_en.tex
@@ -0,0 +1,1897 @@
+% !arara: pdflatex: { shell: on }
+% !arara: biber
+% arara: pdflatex
+% arara: pdflatex
+\documentclass[load-preamble+]{cnltx-doc}
+\usepackage{leadsheets}
+\setcnltx{
+ package = leadsheets ,
+ info = Typesetting leadsheets and songbooks ,
+ authors = Clemens Niederberger ,
+ email = contact@mychemistry.eu ,
+ url = https://github.com/cgnieder/leadsheets/ ,
+ add-cmds = {
+ chord , chordname ,
+ definesongtitletemplate ,
+ defineversetypetemplate ,
+ expandcode ,
+ ifobeylines ,
+ ifsongmeasuring ,
+ ifsongpropertiesequal ,
+ ifsongproperty ,
+ ifversenamed ,
+ ifversenumbered ,
+ ifversestarred ,
+ newversetype ,
+ printsongpropertylist ,
+ setchordnames ,
+ setleadsheets ,
+ songproperty ,
+ useleadsheetslibraries ,
+ useleadsheetslibrary ,
+ verseafterlabel ,
+ verselabel ,
+ verselabelformat ,
+ versename ,
+ versenumber ,
+ writechord
+ } ,
+ add-silent-cmds = {
+ @itemdepth ,
+ endmdframed ,
+ mdframed ,
+ newfontfamily,
+ musejazz
+ } ,
+ add-envs = {
+ arraybackslash ,
+ bridge ,
+ chorus , chorus* ,
+ flushleft ,
+ flushright ,
+ info ,
+ interlude ,
+ intro , intro* ,
+ outro , outro *
+ solo , solo* ,
+ song ,
+ verse
+ } ,
+ index-setup = { othercode=\footnotesize, level=\section , noclearpage } ,
+ makeindex-setup = { columns=3, columnsep=1em }
+}
+
+\defbibheading{bibliography}{\section{References}}
+\addbibresource{\jobname.bib}
+
+\usepackage{filecontents}
+\begin{filecontents}{\jobname.bib}
+@book{book:realbook,
+ author = {Various} ,
+ title = {The Real Book} ,
+ volume = {I} ,
+ subtitle = {C Edition} ,
+ publisher = {Hal Leonard Publishing Corporation} ,
+ isbn = {978-0634060380} ,
+ date = {2000-01-01} ,
+ edition = {6th edition}
+}
+@book{book:newrealbook,
+ author = {Various} ,
+ title = {The New Real Book} ,
+ volume = {I} ,
+ subtitle = {C Edition} ,
+ publisher = {Ama Verlag} ,
+ isbn = {978-0961470142} ,
+ date = {2009-02-12} ,
+ edition = {1st edition}
+}
+\end{filecontents}
+
+\usepackage{booktabs}
+
+\newidxcmd\library{\code{#1}}[ (library)]
+\AtEndPreamble{%
+ \pdfstringdefDisableCommands{%
+ \def\library*#1{``#1''}%
+ }%
+}
+\newrobustcmd*\musicsymbols{\library{musicsymbols}}
+\newrobustcmd*\chordnames{\library{chordnames}}
+\newrobustcmd*\musejazz{\library{musejazz}}
+
+\setchordnames{format=\libertineLF}
+
+\makeatletter
+\colorlet{property}{cnltxgreen}
+\newenvironment{properties}
+ {%
+ \def\prop{\@cnltx@option@item\propval}%
+ \cnltxlist
+ }
+ {\endcnltxlist}
+
+\newrobustcmd*\propval{\@ifstar{\cnltx@prop@star}{\cnltx@prop@nostar}}
+
+\newrobustcmd*\cnltx@prop@star{%
+ \cnltx@ifdash
+ {\cnltx@prop@aux*\meta}
+ {\cnltx@prop@aux*\marg}%
+}
+\newrobustcmd*\cnltx@prop@nostar{%
+ \cnltx@ifdash
+ {\cnltx@prop@aux{}\meta}
+ {\cnltx@prop@aux{}\marg}%
+}
+\newcommand*\cnltx@prop@aux[4]{%
+ \code{\property#1{#3}\cnltx@isvalue#2{#4}}%
+}
+\makeatother
+
+\newidxcmd\property{\code{\textcolor{property}{#1}}}
+
+\newrobustcmd*\symarg[1]{\textcolor{argument}{\code{#1}}}
+
+\newidxcmd\titletemplate{\textit{\sffamily#1}}[\ (songtitle template)]
+\newidxcmd\versetemplate{\textit{\sffamily#1}}[\ (verse-type template)]
+\newidxcmd\shortcut{\code{#1}}[ (shortcut)]
+\newidxcmd\pkgopt{\code{#1}}[ (package option)]
+\newnote*\packageoption[1]{Package option: \pkgopt{#1}}
+
+\newrobustcmd*\barsymbol{|}
+
+\AfterPackage{hyperref}{%
+\pdfstringdefDisableCommands{%
+ \def\property#1{#1}%
+}}
+
+\renewcommand*\dictumauthorformat[1]{#1}
+\renewcommand*\raggeddictumtext{}
+
+\begin{document}
+
+\part{About the Package}
+\dictum[Tom Waits]{%
+ I like beautiful melodies telling me terrible things.%
+}
+
+\section{License and Requirements}
+
+\license
+
+\leadsheets{} requires the bundles \bnd{l3kernel}~\cite{bnd:l3kernel} and
+\bnd{l3packages}~\cite{bnd:l3packages} to be available. It also needs the
+package \pkg{translations}~\cite{pkg:translations}.
+
+\section{Background}
+
+Over the years I repeatedly wanted to typeset simple leadsheets of songs, \ie,
+song lyrics and the corresponding chords\footnote{I also have had the need (or
+ let's say: wish) to typeset leadsheets in the style of the
+ \citetitle{book:realbook} -- but this is a task where other software than
+ \LaTeX{} usually is far easier.}. This is not too hard with standard
+\LaTeX{} commands and environments but it is not very convenient\ldots{} so
+looking for existing packages is the logical next step and I found two very
+promising packages: \pkg{songs}~\cite{pkg:songs} and
+\pkg{songbook}~\cite{pkg:songbook}. However, both were note \emph{quite} what
+I wanted. Just a bit too inflexible in the wrong places, needing tweaking
+here and there, and so on. On the other hand I had quite some code lying on
+my hard drive with various attempts of typesetting leadsheets. This package
+is now the attempt to have a clean, documented and customisable version of my
+code\footnote{Plus new things!}.
+
+\section{The Structure of the Package}
+\leadsheets{} is a modular package and consists of several
+libraries\footnote{This did seem like a good idea for maintenance when I first
+ came up with it. Now I'm not so sure any more but I am way too lazy to
+ change it back. So here we are\ldots}. If you just say
+\begin{sourcecode}
+ \usepackage{leadsheets}
+\end{sourcecode}
+then the \library{songs} library is loaded\footnote{Which currently means that
+ \emph{all} libraries are loaded as the \library{songs} library needs them.}.
+If you want to ensure that \emph{every} library is loaded\packageoption{full}
+so you don't have to think about it any more you can use
+\begin{sourcecode}
+ \usepackage[full]{leadsheets}
+\end{sourcecode}
+If you instead use\packageoption{minimal}
+\begin{sourcecode}
+ \usepackage[minimal]{leadsheets}
+\end{sourcecode}
+then \emph{no} libraries are loaded. In this case you have to load the
+libraries yourself in order to use the package.
+\begin{commands}
+ \command{useleadsheetslibraries}[\marg{comma list of libraries}]
+ With this command one or several of \leadsheets' libraries can be loaded.
+ \command{useleadsheetslibrary}[\marg{library}]
+ With this command one of \leadsheets' libraries can be loaded.
+\end{commands}
+The libraries are divided into two parts: libraries to be loaded by users and
+auxiliary libraries loaded by other libraries but not to be loaded directly by
+users.
+
+The user-libraries are the following ones:
+\begin{description}
+ \item[\library{musicsymbols}] \packageoption{musicsymbols}This library makes
+ the music symbol font provided by MusiX\TeX{} available as text font. It
+ is described in part~\ref{part:musicsymbols-library}.
+ \item[\library{chordnames}] \packageoption{chordnames}This library defines a
+ few macros for typesetting of chord symbols. It is described in
+ part~\ref{part:chordnames-library}. It also loads the
+ \library{musicsymbols}library.
+ \item[\library{musejazz}] \packageoption{musejazz}extends the \chordnames\
+ library to use MuseScore's \enquote{MuseJazz} font, see
+ section~\ref{sec:musejazz-libr}. It loads the \library{chordnames}
+ library.
+ \item[\library{songs}] \packageoption{songs}This is the main library. It
+ defines everything necessary for the typesetting of the leadsheets. It
+ currently loads \emph{all other libraries}, \ie, user libraries \emph{and}
+ internal libraries. This library is described in
+ part~\ref{part:leadsheets-library}.
+\end{description}
+Those libraries can also be loaded as a package option. If you say
+\begin{sourcecode}
+ \usepackage[musicsymbols]{leadsheets}
+\end{sourcecode}
+then \emph{only} the \library{musicsymbols} library is loaded. Saying
+\begin{sourcecode}
+ \usepackage[songs]{leadsheets}
+\end{sourcecode}
+is the same as using the package \emph{without} any options. ``Without any''
+also means that neither \library{musicsymbols}, \library{chordnames} nor
+\library{songs} has been given as class option!
+
+There is also a number of auxiliary libraries which are all needed by
+the \library{songs} library. The libraries are usually not described in
+sections of their own but as part of the \library{songs} library. However,
+the following list gives hints to where some of the concepts are explained:
+\begin{description}
+ \item[\library{properties}] This is an auxiliary library not meant to be
+ loaded directly by users. It defines the necessary macros for song
+ properties. See section~\ref{sec:song-properties} for more details on the
+ concept.
+ \item[\library{transposing}] This is an auxiliary library not meant to be
+ loaded directly by users. It defines a transposing mechanism for chord
+ symbols. See section~\ref{sec:transposing} for further details.
+ \item[\library{chords}] This is an auxiliary library not meant to be loaded
+ directly by users. It defines the necessary macros for printing the
+ chords in songs as well as the mechanism of remembering and recalling
+ chord sequences of verses.
+ \item[\library{templates}] This is an auxiliary library not meant to be
+ loaded directly by users. It defines the necessary macros for
+ \leadsheets' template mechanism. See section~\ref{sec:templates} for
+ details on the concept.
+ \item[\library{translations}] This is an auxiliary library not meant to be
+ loaded directly by users. It provides a few translations for a number of
+ printed strings. See section~\ref{sec:internationalization} for more
+ information.
+\end{description}
+
+\part{The \library*{musicsymbols} Library}\label{part:musicsymbols-library}
+\dictum[Victor Hugo]{%
+ Music expresses that which cannot be said and on which it is impossible to
+ be silent.%
+}
+\vspace*{\baselineskip}\csname @afterheading\endcsname
+
+The \musicsymbols{} library is a very small library that makes the music
+symbol font provided by MusiX\TeX{} available as text font and then uses it to
+define a number of symbols. This redefines the macros \cs{sharp}, \cs{flat}
+and \cs{natural}. All defined symbols are listed in
+table~\ref{tab:musicsymbols}.
+
+If you want to use the library standalone then you can say:
+\begin{sourcecode}
+ \usepackage[minimal]{leadsheets}
+ \useleadsheetslibraries{musicsymbols}
+\end{sourcecode}
+
+\musicsymbols{} defines three further commands, namely \cs{musix},
+\cs{textmusix} -- a font switch and a text font command -- and
+\cs{musicsymbol}. Those commands are meant for internal use only which is why
+they're not explained here.
+
+\begin{table}[htbp]
+ \centering
+ \newcommand*\showsymbol[1]{\cs{#1}&\csuse{#1}}
+ \caption{Symbols defined by \musicsymbols.}
+ \begin{tabular}{llll}
+ \toprule
+ \bfseries Command & \bfseries Symbol &
+ \bfseries Command & \bfseries Symbol \\
+ \midrule
+ \showsymbol{sharp} & \showsymbol{flat} \\
+ \showsymbol{doublesharp} & \showsymbol{doubleflat} \\
+ \showsymbol{natural} \\
+ \midrule
+ \showsymbol{trebleclef} & \showsymbol{bassclef} \\
+ \showsymbol{altoclef} \\
+ \midrule
+ \showsymbol{allabreve} & \showsymbol{meterC} \\
+ \midrule
+ \showsymbol{wholerest} & \showsymbol{halfrest} \\
+ \showsymbol{quarterrest} & \showsymbol{eighthrest} \\
+ \showsymbol{sixteenthrest} \\
+ \bottomrule
+ \end{tabular}
+ \label{tab:musicsymbols}
+\end{table}
+
+\musicsymbols{} also defines a number of macros for denoting bars. Those
+macros are listed in table~\ref{tab:bar-symbols}.
+
+\begin{table}[htbp]
+ \centering
+ \newcommand*\showsymbol[1]{\cs{#1}&\csuse{#1}}
+ \caption{Bar symbols.}
+ \begin{tabular}{llll}
+ \toprule
+ \bfseries Macro & \bfseries Symbol &
+ \bfseries Macro & \bfseries Symbol \\
+ \midrule
+ \showsymbol{normalbar} & \showsymbol{leftrepeat} \\
+ \showsymbol{rightrepeat} & \showsymbol{leftrightrepeat} \\
+ \showsymbol{doublebar} & \showsymbol{stopbar} \\
+ \bottomrule
+ \end{tabular}
+ \label{tab:bar-symbols}
+\end{table}
+
+There are three macros that can be redefined to adjust the appearance of those
+bars:
+\begin{commands}
+ \command{normalbarwidth}\Default{.02em}
+ The thickness of a bar rule as used in \cs{normalbar}.
+ \command{thickbarwidth}\Default{.15em}
+ The thickness of the thick bar rules as used for example in
+ \cs{leftrepeat} or \cs{stopbar}.
+ \command{interbarwidth}\Default{.1em}
+ The distance between two bar rules as in \cs{doublebar} or \cs{stopbar}.
+\end{commands}
+
+\clearpage
+\part{The \library*{chordnames} Library (and the \library*{musejazz} Library)}\label{part:chordnames-library}
+\dictum[Wes Montgomery]{%
+ I never practice my guitar -- from time to time I just open the case and
+ throw in a piece of raw meat.%
+}
+
+\section{The \cs*{chordname} Command}
+
+\chordnames{} provides the command \cs{chordname}\marg{chord} for convenient
+typesetting of chords:
+
+\begin{example}[side-by-side]
+ \chordname{Bb7(#9)} \chordname{Bbb6}
+ \chordname{C#7(b9)} \chordname{C##13}
+\end{example}
+
+\begin{commands}
+ \command{chordname}[\marg{chord}]
+ Typesetting chords. Inside the argument every \code{\#} will be replaced
+ by $\sharp$ and every \code{b} is replaced with $\flat$. Numerals and
+ parentheses are typeset as superscripts. Everything between parentheses
+ is always a superscript: \verbcode+\chordname{F#7(#11)}+
+ \chordname{F#7(#11)}.
+\end{commands}
+
+There are several token lists that are treated specially inside \cs{chordname}:
+\begin{labeling}[--]{xxxxx}
+ \item[\code{\^{}}] This token is replaced by \cs*{textsuperscript}.
+ \item[\code{ma}] The symbol for major chords. Per default this is
+ empty. \verbcode+\chordname{Gma}+ \chordname{Gma}.
+ \item[\code{mi}] The symbol for minor chords. Per default this is
+ \code{m}. \verbcode+\chordname{Gmi}+ \chordname{Gmi}.
+ \item[\code{o}] The symbol for diminished chords. Per default this is
+ \code{\cs*{textsuperscript}\Marg{o}}. \verbcode+\chordname{Go}+
+ \chordname{Go}.
+ \item[\code{+}] The symbol for augmented chords. Per default this is
+ \code{\cs*{textsuperscript}\Marg{+}}. \verbcode!\chordname{G+}!
+ \chordname{G+}.
+ \item[\code{/o}] The symbol for half diminished chords. Per default
+ this is \code{\cs*{textsuperscript}\Marg{\cs*{o}\Marg{}}}.
+ \verbcode+\chordname{G/o}+ \chordname{G/o}.
+ \item[\code{\#}] The \enquote{sharp} symbol. Per default this is
+ \cs{sharp}. \verbcode+\chordname{F#}+ \chordname{F#}.
+ \item[\code{\#\#}] The \enquote{double sharp} symbol. Per default this is
+ \cs{doublesharp}. \verbcode+\chordname{F##}+ \chordname{F##}.
+ \item[\code{b}] The \enquote{flat} symbol. Per default this is
+ \cs{flat}. \verbcode+\chordname{Eb}+ \chordname{Eb}.
+ \item[\code{bb}] The \enquote{double flat} symbol. Per default this is
+ \cs{doubleflat}. \verbcode+\chordname{Ebb}+ \chordname{Ebb}.
+ \item[\code{b\#}] Cancelling flat/sharp combination: this is removed.
+ \item[\code{\#b}] Cancelling sharp/flat combination: this is removed.
+ \item[\code{add}] This is superscripted: \verbcode+\chordname{Gadd9}+
+ \chordname{Gadd9}.
+ \item[\code{sus}] This is superscripted: \verbcode+\chordname{Gsus4}+
+ \chordname{Gsus4}.
+ \item[\code{dim}] This is superscripted: \verbcode+\chordname{Gdim5}+
+ \chordname{Gdim5}.
+ \item[\code{maj7}] This is superscripted: \verbcode+\chordname{Gmaj7}+
+ \chordname{Gmaj7}.
+ \item[\code{maj9}] This is superscripted: \verbcode+\chordname{Gmaj9}+
+ \chordname{Gmaj9}.
+\end{labeling}
+
+How these token lists are treated depends on optional settings:
+
+\begin{example}
+ \setchordnames{
+ major-seven = $\Delta$ ,
+ major-nine = $\Delta$\textsuperscript{9}
+ }
+ \chordname{Gmaj7} \chordname{Gmaj9}
+ \chordname{G^6} \chordname{G6}
+ \chordname{G7^#5}
+\end{example}
+
+If you want to use the library standalone then you can say:
+\begin{sourcecode}
+ \usepackage[minimal]{leadsheets}
+ \useleadsheetslibraries{chordnames}
+\end{sourcecode}
+This also loads the \musicsymbols{} library.
+
+\section{Options}
+
+Options are set with the command
+\begin{commands}
+ \command{setchordnames}[\marg{options}]
+ where \meta{options} is a comma separated list of keyval options.
+\end{commands}
+Actually there's a second possibility: options can also be set with the
+command \cs{setleadsheets} (see section~\ref{sec:options}) if they're preceded
+by \code{chordnames/} (including the slash).
+
+The options allow detailed customization of how chords are printed. It
+doesn't change the input syntax.
+
+\begin{options}
+ \keyval{format}{code}\Default
+ Code inserted before a chord within the same group. Can be used for
+ special formatting of the chords, with \cs*{sffamily}, say.
+ \keyval{sharp}{code}\Default{\cs{sharp}}
+ The sharp symbol.
+ \keyval{flat}{code}\Default{\cs{flat}}
+ The flat symbol.
+ \keyval{double-sharp}{code}\Default{\cs{doublesharp}}
+ The double sharp symbol.
+ \keyval{double-flat}{code}\Default{\cs{doubleflat}}
+ The double flat symbol.
+ \keyval{aug}{code}\Default{+}
+ The augmented symbol.
+ \keyval{half-dim}{code}\Default{\cs*{o}\Marg{}}
+ The half-diminished symbol.
+ \keyval{full-dim}{code}\Default{o}
+ The diminished symbol.
+ \keyval{dim}{code}\Default{\cs*{textsuperscript}\Marg{dim}}
+ The token list \code{dim}.
+ \keyval{add}{code}\Default{\cs*{textsuperscript}\Marg{add}}
+ The token list \code{add}.
+ \keyval{sus}{code}\Default{\cs*{textsuperscript}\Marg{sus}}
+ The token list \code{sus}.
+ \keyval{major}{code}\Default
+ The token list \code{ma}.
+ \keyval{minor}{code}\Default{m}
+ The token list \code{mi}.
+ \keyval{major-seven}{code}\Default{\cs*{textsuperscript}\Marg{maj7}}
+ The token list \code{maj7}.
+ \keyval{major-nine}{code}\Default{\cs*{textsuperscript}\Marg{maj9}}
+ The token list \code{maj9}.
+\end{options}
+
+There are two further options which concern the different notations of the
+pitches \chordname{B} and \chordname{Bb} in German (and a few other European
+countries) and English.
+\begin{options}
+ \keychoice{input-notation}{literal,german,english}\Default{literal}
+ If set to \code{german} B should be input as \code{H} and B~flat as
+ \code{B}. If set to \code{american} B should be input as \code{B} and
+ B~flat as \code{Bb}.
+ \keychoice{output-notation}{literal,german,english}\Default{literal}
+ \setchordnames{output-notation=german}If set to \code{german} B is output
+ as \chordname{B} and B-flat as \chordname{Bb}.
+\end{options}
+Setting one option to a value other than \code{literal} implicitly sets the
+other one to \code{english} except the other option already has been set.
+This is shown in the example below. Setting on option to \code{literal} again
+also sets the other option to \code{literal}. This also resets the options.
+Earlier settings are forgotten. What does that mean? Here is an exercise:
+which options are active at each step and at the end?
+\begin{sourcecode}
+ 1. \setchordnames{ input-notation = german }
+ 2. \setchordnames{ output-notation = german , input-notation = english }
+ 3. \setchordnames{ input-notation = german }
+ 4. \setchordnames{ output-notation = english , input-notation = literal }
+ 5. \setchordnames{ output-notation = german }
+\end{sourcecode}
+Here's the solution:
+\begin{enumerate}
+ \item \keyis{input-notation}{german} and \keyis{output-notation}{english}
+ \item \keyis{input-notation}{english} and \keyis{output-notation}{german}
+ \item \keyis{input-notation}{german} and \keyis{output-notation}{german}
+ \item \keyis{input-notation}{literal} and \keyis{output-notation}{literal}
+ \item \keyis{input-notation}{german} and \keyis{output-notation}{english}
+\end{enumerate}
+
+The following example shows the effects of different input and output
+notations.
+\begin{example}
+ input and output literal:\par
+ \chordname{Bb} \chordname{B} \chordname{B#}\par
+ \chordname{B} \chordname{H} \chordname{H#}\par
+ \medskip
+
+ \setchordnames{input-notation=german}
+ input German and output English:\par
+ \chordname{Bb} \chordname{B} \chordname{B#}\par
+ \chordname{B} \chordname{H} \chordname{H#}\par
+ \medskip
+
+ \setchordnames{output-notation=german}
+ input and output German:\par
+ \chordname{Bb} \chordname{B} \chordname{B#}\par
+ \chordname{B} \chordname{H} \chordname{H#}\par
+
+ \medskip
+ \setchordnames{input-notation=english}
+ input English and output German:\par
+ \chordname{Bb} \chordname{B} \chordname{B#}\par
+ \chordname{B} \chordname{H} \chordname{H#}\par
+\end{example}
+
+\section{The \library*{musejazz} Library}\label{sec:musejazz-libr}
+
+The \musejazz\ library extends the \chordnames\ library to use
+MuseScore's\footnote{\url{http://musescore.com/}} font \enquote{MuseJazz} for
+the chord symbols. The library contains the two lines which explains why it
+requires \LuaLaTeX\ or \XeLaTeX. Well, and the font, obviously.
+
+\begin{sourcecode}
+ \RequirePackage{fontspec}
+ \newfontfamily\musejazz{MuseJazz}
+\end{sourcecode}
+
+Here is a small example of it's usage and the outcome:
+
+\begin{example}[compile,program=lualatex,max-pages=1,add-frame=false]
+ % compile with LuaLaTeX or XeLaTeX
+ \documentclass[margin=4mm]{standalone}
+ \usepackage{leadsheets}
+ \useleadsheetslibrary{musejazz}
+ \begin{document}
+ \Huge\chordname{Bb7(#9)}\space\chordname{F##9}
+ \end{document}
+\end{example}
+
+\clearpage
+\part{The \library*{songs} Library}\label{part:leadsheets-library}
+\dictum[Jeff Beck]{%
+ I don't care about the rules. If I don't break the rules at least ten
+ times every song then I'm not doing my job.%
+}
+
+\section{Background}
+
+The \leadsheets{} package allows for easy creation of leadsheets but it also
+can be used to create complete songbooks. The basic idea is that songs are
+typeset in the \env{song} environment. Each song gets a number of properties
+(see section~\ref{sec:song-properties}) that determine how the title of the
+song is typeset. For the typesetting of the titles a template mechansim is
+used (see section~\ref{sec:title-templates}). Songs can also be tagged. The
+tags then allow to typeset only songs matching a list of tags that is
+specified via an option.
+
+\begin{figure}
+ \centering
+ \includegraphics[width=.9\linewidth]{liederbuechlein.jpg}
+ \caption{Even before officially publishing this bundle I used it for
+ typesetting a small songbook!}
+ \label{fig:liederbuch}
+\end{figure}
+
+\section{The \env*{song} Environment}
+
+\begin{environments}
+ \environment{song}[\oarg{options}\marg{properties}]
+ The main environment used to typeset songs. It has a mandatory argument
+ where the song's properties are set
+ (\cf\ section~\ref{sec:song-properties}). It also has an optional
+ argument for setting options specific to the song.
+\end{environments}
+
+\subsection{A First Example}
+First let's take a look at an example:
+
+\begin{example}[
+ compile,
+ graphics={trim={2cm 18cm 2cm 2cm},clip},
+ add-sourcecode-options={literate=}]
+ \documentclass{article}
+ \usepackage{leadsheets}
+ \begin{document}
+
+ \begin{song}{title={Mary Had A Little Lamb}, music={Stevie Ray Vaughan},
+ lyrics={traditional}, tags={srv,blues}}
+ \begin{verse}
+ Mary had a little lamb \\
+ Its fleece was white as snow, yea \\
+ Everywhere the child went \\
+ The little lamb was sure to go, yea
+ \end{verse}
+ \begin{verse}
+ He followed her to school one day \\
+ And broke the teacher's rule \\
+ What a time did they have \\
+ That day at school
+ \end{verse}
+ \end{song}
+
+ \end{document}
+\end{example}
+
+Per default the songtitle simply is a \cs{section}\sarg{} without any other
+additions. This is the songtitle template \titletemplate{minimal}, see
+section~\ref{sec:title-templates} for more details on those templates and how
+to create your own.
+
+\subsection{Using the \env*{song} Environment}
+
+Inside the \env{song} environment a number of additional environments are used
+to specify the different parts of a song. They all are basically the same
+kind of environment, namely an \env*{itemize} environment internally where the
+only \cs*{item} has the name of the environment as option. The \env{verse}
+environment is a little bit different since verses can be numbered. If they
+are then each usage of \env{verse} inside \env{song} will step a vers number
+and print it (as option to the internal \cs*{item}).
+
+\begin{environments}
+ \environment{verse}[\oarg{options}]
+ An environment for specifying the verses of a song.
+ \environment{chorus}[\oarg{options}]
+ An environment for specifying the chorus of a song.\\
+ This is the same as \beginenv*\Marg{verse}\Oarg{type=chorus,\meta{options}}.
+ \environment{intro}[\oarg{options}]
+ An environment for specifying the intro of a song.\\
+ This is the same as \beginenv*\Marg{verse}\Oarg{type=intro,\meta{options}}.
+ \environment{interlude}[\oarg{options}]
+ An environment for specifying an interlude of a song.\\
+ This is the same as \beginenv*\Marg{verse}\Oarg{type=interlude,\meta{options}}.
+ \environment{bridge}[\oarg{bridge}]
+ An environment for specifying a bridge of a song.\\
+ This is the same as \beginenv*\Marg{verse}\Oarg{type=bridge,\meta{options}}.
+\end{environments}
+
+These environments and their options are described in more detail in
+sections~\ref{sec:envverse-environment} and~\ref{sec:other-envverse-like}.
+
+\subsection{Options}\label{sec:options}
+
+The options to the \env{song} environment are the same as the general options
+of \leadsheets. This means you can set the following options either local to
+a song or global for the whole document with this command:
+
+\begin{commands}
+ \command{setleadsheets}[\marg{options}]
+ Setup command for \leadsheets.
+\end{commands}
+
+Although I used the word \enquote{global} above \emph{all options are local to
+ the current scope}!
+
+\begin{options}
+ \keyval{title-template}{template name}\Default{minimal}
+ The songtitle template, see section~\ref{sec:title-templates} for
+ details.
+ \keyval{chord-cs}{cs}\Default{\cs*{chordname}}
+ The command that is used to parse the chords. See
+ section~\ref{sec:placing-chords} for details. \meta{cs} needs to be a
+ command that takes a mandatory argument.
+ \keyval{song-format}{\TeX{} code}\Default
+ \meta{\TeX{} code} is inserted \emph{before} the song title at the
+ beginning of the \env{song} environment.
+ \keyval{text-format}{\TeX{} code}\Default
+ \meta{\TeX{} code} is inserted \emph{after} the song title at the
+ beginning of the \env{song} environment.
+ % \keybool{numbered}\Default{false}
+ % Determines wether verses are numbered or not.
+ \keyval{print-tags}{list of tags}
+ A comma separated list of tags. When specified a song will only be printed
+ if it is tagged with at least one of the tags in \meta{list of tags}.
+ \keybool{obey-lines}\Default{false}
+ An experimental option. Use at your own risk! If set to \code{true} then
+ inside the \env{verse} like environments end-of-lines will be obeyed and
+ start a new line. This comes with a price when using chords, see
+ section~\ref{sec:placing-chords:caveat}.
+ \keybool{bar-shortcuts}\Default{false}
+ Makes the characters \shortcut{:} and \shortcut{\barsymbol} active inside
+ the \env{song} environment. See sections~\ref{sec:special-characters}
+ and~\ref{sec:typesetting-bars} for more details.
+\end{options}
+
+\subsection{Song Properties}\label{sec:song-properties}
+
+Songs can have a number of properties which basically are used in songtitle
+templates (see section~\ref{sec:title-templates}). One specific property,
+\property{tags}, plays a different role, though.
+
+\begin{properties}
+ \prop{title}{title}
+ This is the main title of the song.
+ \prop{subtitle}{subtitle}
+ A subtitle.
+ \prop{short-title}{short song title}
+ A short title (may be useful in a template that writes the titles in
+ \cs*{section}s for a version to be used in the table of contents).
+ \prop{sort-title}{song title}
+ If not set explicitly this property holds the same value as
+ \property{title}.
+ \prop{sort-short-title}{short song title}
+ If not set explicitly this property holds the same value as
+ \property{short-title}.
+ \prop{composer}{composer}
+ The composer of the song. As of now this accepts an arbitrary entry but
+ maybe this will not be supported any more when indexing will be
+ implemented. No promises.
+ \prop{sort-composer}{composer}
+ If not set explicitly this property holds the same value as
+ \property{composer}.
+ \prop{lyrics}{writer}
+ Whoever wrote the lyrics if different from the composer. As of now this
+ accepts an arbitrary entry but maybe this will not be supported any more
+ when indexing will be implemented. No promises.
+ \prop{sort-lyrics}{writer}
+ If not set explicitly this property holds the same value as
+ \property{writer}.
+ \prop{arr}{arranger}
+ Whoever arranged the song. As of now this accepts an arbitrary entry but
+ maybe this will not be supported any more when indexing will be
+ implemented. No promises.
+ \prop{sort-arr}{arranger}
+ If not set explicitly this property holds the same value as
+ \property{arr}.
+ \prop{band}{band}
+ The band who plays or played the song.
+ \prop{sort-band}{band}
+ If not set explicitly this property holds the same value as
+ \property{band}.
+ \prop{interpret}{interpret}
+ The interpret of the song. As of now this accepts an arbitrary entry but
+ maybe this will not be supported any more when indexing will be
+ implemented. No promises.
+ \prop{sort-interpret}{interpret}
+ If not set explicitly this property holds the same value as
+ \property{interpret}.
+ \prop{genre}{genre}
+ The genre of the song.
+ \prop{key}{key}
+ The key of the song. This property is used for transposing and must have
+ a specific format then, see section~\ref{sec:transposing}.
+ \prop{capo}{fret}
+ This property is used for transposing and for the \cs{capo} macro, see
+ sections~\ref{sec:capo-information} and~\ref{sec:transposing} .
+ \prop{tempo}{tempo}
+ The tempo of the song.
+ \prop{tags}{tags}
+ A comma separated list of tags. Those tags play a role for the option
+ \option{print-tags}. When that option is used a song is only printed if
+ it has at least one of the tags specified in the option.
+\end{properties}
+
+There are three more properties, \property{counter}, \property{ID} and
+\property{height} that cannot be set but are set automatically for each song.
+The \property{counter} simply holds the number of the current song starting
+from \code{1} for the first song. The \property{ID} currently always ia
+\code{song\meta{counter}} where \meta{counter} is the current
+\property{counter} value. The property \property{height} holds the height of
+the typeset song in pt. The height is determined by placing the body of the
+respective \env{song} environment in a vertical box and measuring the height
+and depth of the box. This is done in a measuring phase that can be tested in
+a songtitle template definition, see section~\ref{sec:title-templates} for
+details. \emph{ This is important since the property \property{height} is not
+available in the measuring phase but only afterwards!}
+
+In principle all properties can get list of entries where items are separated
+with \code{\visualizespaces{ and }}. Of course this doesn't make sense for
+each property -- a song does only have one title. But a song can very well
+have more than one composer: think of the Beatles where most songs were
+written by Paul McCartney and John Lennon\footnote{This is not quite true:
+ most songs were mostly written either by Paul or John but legally usually
+ both are the composers.}.
+
+It is possibly to define further such properties. For details see
+section~\ref{sec:own-templates}.
+
+\subsection{Special Characters}\label{sec:special-characters}
+Inside the \env{song} environment several characters don't have their usual
+catecory codes:
+\begin{labeling}[--]{xxxxx}
+ \item[\shortcut{\textasciicircum}] category code 13 (active). It is a
+ shortcut for the \cs{chord} command.
+ \item[\shortcut{\_}] category code 13 (active). It is a shortcut for the
+ \cs{writechord} command.
+ \item[\shortcut{\barsymbol}] category code 13 (active). Used for
+ typesetting bars.
+ \item[\shortcut{:}] category code 13 (active). Used for typesetting bars.
+ \item[\code{\#}] category code 12 (other). Used for chord names.
+\end{labeling}
+
+Actually the characters \shortcut{\barsymbol} and \shortcut{:} are \emph{not}
+changed per default. In order to do that you have to use the option
+\option{bar-shortcuts}.
+
+For details on the usage of the characters \shortcut{\barsymbol} and
+\shortcut{:} see section~\ref{sec:typesetting-bars}. The usage of chords is
+explained in section~\ref{sec:placing-chords}.
+
+\subsection{Capo Information}\label{sec:capo-information}
+When you set the \property{capo} property the macro \cs{capo} writes
+\begin{center}
+ \GetTranslation{leadsheets/capo}: IV.~\GetTranslation{leadsheets/fret}
+\end{center}
+What it writes \emph{exactly} depends on a few settings: the \property{capo}
+property obviously, which determines the number that is printed. The
+translations for the \enquote{capo} and \enquote{fret} strings (see
+section~\ref{sec:internationalization} for details) and the setting of the
+following option:
+\begin{options}
+ \keychoice{capo-nr-format}{arabic,roman,Roman}\Default{Roman}
+ The format of the number printed by the \cs{capo} macro.
+ \keyval{capo-nr}{code}\Default{\#1.}
+ The code to print the number. In the code refer to the number with
+ \code{\#1}.
+\end{options}
+
+\section{The \env*{verse} Environment}\label{sec:envverse-environment}
+
+\begin{environments}
+ \environment{verse}[\oarg{options}]
+ An environment for specifying the verses of a song.
+ \environment{verse*}[\oarg{options}]
+ The same as the \env{verse} environment but will always be unnumbered
+ regardless of any option settings.
+\end{environments}
+
+\begin{example}[
+ compile,
+ graphics={trim={2cm 18cm 2cm 2cm},clip},
+ add-sourcecode-options={literate=}]
+ \documentclass{article}
+ \usepackage{leadsheets}
+ \setleadsheets{verse/numbered=true}
+ \begin{document}
+
+ \begin{song}{title=Foo}
+ \begin{verse}
+ Lorem ipsum dolor sit amet, consetetur sadipscing elitr,\\
+ sed diam nonumy eirmod tempor invidunt ut labore et dolore\\
+ magna aliquyam erat, sed diam voluptua.
+ \end{verse}
+ \begin{verse*}
+ Lorem ipsum dolor sit amet, consetetur sadipscing elitr,\\
+ sed diam nonumy eirmod tempor invidunt ut labore et dolore\\
+ magna aliquyam erat, sed diam voluptua.
+ \end{verse*}
+ \begin{verse}
+ Lorem ipsum dolor sit amet, consetetur sadipscing elitr,\\
+ sed diam nonumy eirmod tempor invidunt ut labore et dolore\\
+ magna aliquyam erat, sed diam voluptua.
+ \end{verse}
+ \end{song}
+
+ \end{document}
+\end{example}
+
+\subsection{Options}\label{sec:verses-options}
+
+The \env{verse} environment and all related environments have the following
+option:
+
+\begin{options}
+ \keyval{format}{code}\Default
+ \meta{code} is inserted at the beginning of the environment and can thus
+ be used to add formatting, \eg, \keyis{format}{\cs*{itshape}}.
+ \keyval{label-format}{code}\Default
+ The same for the environment labels.
+\end{options}
+
+This can be used either locally, \ie, as option to the corresponding
+environment, or for all environments of the same type using the setup command
+using the following syntax:
+
+\begin{center}
+ \cs{setleadsheets}\Marg{\meta{env name}/format = \meta{code}}
+\end{center}
+
+\begin{example}
+ \begin{verse}[format=\itshape]
+ Lorem ipsum dolor sit amet, consetetur sadipscing elitr,\\
+ sed diam nonumy eirmod tempor invidunt ut labore et dolore\\
+ magna aliquyam erat, sed diam voluptua.
+ \end{verse}
+\end{example}
+
+It is also possible so set the formatting for all related environments at
+once:
+\begin{options}
+ \keyval{verses-format}{code}\Default
+ Sets the format for all \env{verse} like environments.
+ \keyval{verses-label-format}{code}\Default
+ Sets the label format for all \env{verse} like environments.
+\end{options}
+Both options are overwritten if the options for a specific environment are
+set. That is, if you want all environments to have italic shape except for
+choruses, then you could do
+\begin{sourcecode}
+ \setleadsheets{
+ verses-format = \itshape ,
+ chorus/format =
+ }
+\end{sourcecode}
+
+\section{Placing Chords}\label{sec:placing-chords}
+
+\subsection{The Commands}
+Inside the \env{song} environment the characters \shortcut{\textasciicircum}
+and \code{\_} are active characters\footnote{There are more characters with a
+ special function, see
+ section~\ref{sec:special-characters}}. \shortcut{\textasciicircum} is a
+shortcut for the command \cs{chord}, \shortcut{\_} is a shortcut for
+\cs{writechord}. Those commands have the following functions:
+
+\begin{commands}
+ \command{chord}[\sarg\symarg{-}\marg{chord}\meta{text}\visiblespace]
+ Places \meta{chord} centered above \meta{text}. The starred version
+ gobbles the trailing space while the unstarred version does not. Like the
+ star the dash is optional. It sets the option \option{smash-next-chord}
+ to \code{true}. \meta{text} may be empty but the trailing space
+ \emph{must} be there. If \meta{text} is empty then the chord is place
+ above some horizontal space which can be set with the option
+ \option{empty-chord-dim}.
+ \command{writechord}[\marg{chord}]
+ This command transforms the chord according to the options
+ \option{transpose} and \option{enharmonic} before printing it. This
+ command can/should be used for placing chords inline or for typesetting
+ the \property{key} property in a template. The command is used by
+ \cs{chord} for the actual printing.
+\end{commands}
+
+\begin{example}[side-by-side]
+ Text \chord{E7}text \chord*{B7}lon ger text
+\end{example}
+
+\subsection{Usage}
+Note that per default the width of a chord is not ignored:
+\begin{example}[side-by-side]
+ text \chord{Gbmi7(b5)}text text
+\end{example}
+However, there is an option which sets the width of a chord to zero:
+\begin{options}
+ \keybool{smash-chords}\Default{false}
+ If set to true the width of the chords set with \cs{chord} is set to
+ zero.
+ \keybool{smash-next-chord}\Default{false}
+ If set to true the width of the next chord set with \cs{chord} is set to
+ zero.
+\end{options}
+\begin{example}[side-by-side]
+ \setleadsheets{smash-next-chord=true}
+ text \chord{Gbmi7(b5)}text text \par
+ text \chord{Gbmi7(b5)}text text \par
+ \setleadsheets{smash-chords=true}
+ text \chord{Gbmi7(b5)}text text \par
+ text \chord{Gbmi7(b5)}text text
+\end{example}
+
+Before we forget -- there are more options:
+\begin{options}
+ \keyval{empty-chord-dim}{dim}\Default{1em}
+ The horizontal space that is inserted if the \meta{text} argument of
+ \cs{chord} is empty.
+ \keyval{align-chords}{col}\Default{c}
+ Determines how a chord is aligned with respect to the word it is placed
+ above of. Valid input is any valid \env*{tabular} column identifier.
+ \keybool{print-chords}\Default{true}
+ If set to false \cs{chord} won't print the chord but will do nothing
+ instead. This options does not affect \cs{writechord}.
+\end{options}
+
+While \cs{chord} is available in the whole document the
+\code{\textasciicircum} syntax is -- as mentioned before -- only available
+inside of the \env{song} environment.
+
+\begin{example}[
+ compile,
+ graphics={trim={2cm 16cm 2cm 4cm},clip},
+ add-sourcecode-options={literate=}]
+ \documentclass{article}
+ \usepackage{leadsheets}
+ \begin{document}
+
+ \begin{song}{title={Mary Had A Little Lamb}, music={Stevie Ray Vaughan},
+ lyrics={traditional}, tags={srv,blues}}
+ \begin{verse}
+ ^{E7} Mary had a little lamb ^{A7} \\
+ Its fleece was white as ^{E7}snow, yea \\
+ Everywhere the child ^{B7}went ^{A7} \\
+ The little lamb was sure to ^{E7}go, yea
+ \end{verse}
+ \begin{verse}
+ ^{E7} He followed her to school one day ^{A7} \\
+ And broke the teacher's ^{E7}rule \\
+ What a time did they ^{B7}have ^{A7} \\
+ That day at ^{E7}school
+ \end{verse}
+ \end{song}
+
+ \end{document}
+\end{example}
+
+You've probably noticed: chords are printed with \cs{chordname} in the default
+setting. You can change this with the option \option{chord-cs}. If you do
+then keep in mind that the input syntax will also change.
+
+\subsection{Caveat}\label{sec:placing-chords:caveat}
+
+If you use \keyis{obey-lines}{true} you have to be careful when you place
+chords. If you place a chord over the last word in a line
+\begin{sourcecode}
+ ^{F#mi} You've been ^*{B}run nin', ^*{E}hid in' much too ^{A}long.
+\end{sourcecode}
+then the end of line that is used as the mandatory space argument for
+\cs{chord} may not be recognized as an end of line. Even worse: at the end of
+a \env{verse} like environment this may cause non-obvious errors. So if
+you're getting in trouble in these cases you should always insert an explicit
+space, \eg. by one of the following methods:
+\begin{sourcecode}
+ ^{F#mi} You've been ^*{B}run nin', ^*{E}hid in' much too ^{A}long. {}
+ ^{F#mi} You've been ^*{B}run nin', ^*{E}hid in' much too ^{A}long. \empty
+ ^{F#mi} You've been ^*{B}run nin', ^*{E}hid in' much too ^{A}long. \relax
+\end{sourcecode}
+
+\subsection{Remembering Chords}\label{sec:remembering-chords}
+\leadsheets{} has the option
+\begin{options}
+ \keybool{remember-chords}\Default{false}
+ If set to \code{true} the chords in the \emph{first} appearance of a
+ \env{verse} like environment are remembered. In the next appearances of
+ said environment the shortcut \shortcut{\textasciicircum} has changed its
+ meaning and inserts a chord automatically.
+\end{options}
+
+Let's take at look at an example to see what this means:
+\begin{example}
+ \definesongtitletemplate{empty}{}
+ \begin{song}[verse/numbered,remember-chords,title-template=empty]{title=foobar}
+ \begin{verse}
+ ^{G}Lorem ipsum ^{C}dolor sit ^{E7}amet, consetetur ^{Bb7(b5)}sadipscing
+ \end{verse}
+ \begin{verse}
+ ^Lorem ipsum ^dolor sit ^amet, consetetur ^sadipscing
+ \end{verse}
+ \end{song}
+\end{example}
+In this example the chords used in the first \env{verse} environment have been
+remembered and in the second \env{verse} environment the
+\shortcut{\textasciicircum} shortcut inserted the corresponding chords in the
+order they had been specified the first time. It is important when using this
+that you don't use the \shortcut{\textasciicircum} shortcut in subsequent
+environments more often than the first time. It will produce an error
+otherwise. You can use it less, of course.
+
+The \shortcut{\textasciicircum} shortcut still has the \emph{the same} syntax
+as \cs{chord} with one exception: it lacks the mandatory argument
+\meta{chord} (since it's obviously not needed). It has the optional \sarg{}
+and \code{-}, though, as well as the mandatory space (\visiblespace)!
+
+Each \env{verse} like environment (see section~\ref{sec:other-envverse-like}
+for more information) is treated uniquely by this mechansim:
+
+\begin{example}
+ \definesongtitletemplate{empty}{}
+ \begin{song}[verse/numbered,remember-chords,title-template=empty]{title=foobar}
+ \begin{verse}
+ ^{G}Lorem ipsum ^{C}dolor sit ^{E7}amet, consetetur ^{Bb7(b5)}sadipscing
+ \end{verse}
+ \begin{chorus}
+ ^{F}Lorem ipsum ^{Gmi}dolor sit amet, consetetur ^{C7}sadipscing
+ \end{chorus}
+ \begin{verse}
+ ^Lorem ipsum ^dolor sit ^amet, consetetur ^sadipscing
+ \end{verse}
+ \begin{chorus}
+ ^Lorem ipsum ^dolor sit amet, consetetur ^sadipscing
+ \end{chorus}
+ \end{song}
+\end{example}
+
+This is important: \env{verse} and \env{verse*} are treated as two different
+environments, the same holds for all starred \env{verse} like environments!
+If you want to recall the chords of a different type of environment, then you
+can use the option \option{recall-chords}:
+
+\begin{example}
+ \definesongtitletemplate{empty}{}
+ \begin{song}[verse/numbered,remember-chords,title-template=empty]{title=foobar}
+ \begin{verse}
+ ^{G}Lorem ipsum ^{C}dolor sit ^{E7}amet, consetetur ^{Bb7(b5)}sadipscing
+ \end{verse}
+ \begin{chorus}
+ ^{F}Lorem ipsum ^{Gmi}dolor sit amet, consetetur ^{C7}sadipscing
+ \end{chorus}
+ \begin{verse}
+ ^Lorem ipsum ^dolor sit ^amet, consetetur ^sadipscing
+ \end{verse}
+ \begin{chorus}[recall-chords=verse]
+ ^Lorem ipsum ^dolor sit amet, consetetur ^sadipscing
+ \end{chorus}
+ \end{song}
+\end{example}
+
+\section{Transposing}\label{sec:transposing}
+Provided a song has the property \property{key} \emph{and} the key is given as
+one of the twelve \enquote{usual} keys, \ie, one of the keys given in
+table~\ref{tab:key-signatures}, the chords of a song can be transposed.
+
+\begin{options}
+ \keyval{transpose}{number}
+ Transposes the chords of a song by \meta{number} of semitones.
+ \meta{number} can be a negative number, then the chords are transposed
+ down.
+ \keychoice{enharmonic}{sharp,flat}
+ Suppose you transpose a song in the key of \chordname{E} down a semitone.
+ \leadsheets{} will then transpose to the key of \chordname{Eb}. It always
+ chooses the key whose signature has less accidentals. You can force a
+ variant, though, by using this option. With \keyis{enharmonic}{sharp}
+ \leadsheets{} would have chosen \chordname{D#} instead of \chordname{Eb}.
+ \keybool{transpose-capo}
+ When this is set to true chords are transposed down on semitone per capo
+ fret.
+\end{options}
+
+The transposing mechanism relies on the \chordnames{} input syntax which means
+that if you change \option{chord-cs} horrible things may happen. \emph{So
+ don't change \option{chord-cs} and use \option{transpose} at the same time!}
+
+\begin{table}[htbp]
+ \centering
+ \catcode`\#=12
+ \catcode`\!=6
+ \def\showsignature!1{\chordname{!1}&\code{!1}}%
+ \caption{Allowed keys for the \property{key} property.}
+ \begin{tabular}{*{12}{l}}
+ \toprule
+ \bfseries Key & \bfseries Input &
+ \bfseries Key & \bfseries Input &
+ \bfseries Key & \bfseries Input &
+ \bfseries Key & \bfseries Input &
+ \bfseries Key & \bfseries Input &
+ \bfseries Key & \bfseries Input \\
+ \midrule
+ \showsignature{C} && &
+ \showsignature{Cma} && &
+ \showsignature{Ami} \\
+ \cmidrule(lr){1-4} \cmidrule(lr){5-8} \cmidrule(lr){9-12}
+ \showsignature{G} & \showsignature{F} &
+ \showsignature{Gma} & \showsignature{Fma} &
+ \showsignature{Emi} & \showsignature{Dmi} \\
+ \showsignature{D} & \showsignature{Bb} &
+ \showsignature{Dma} & \showsignature{Bbma} &
+ \showsignature{Bmi} & \showsignature{Gmi} \\
+ \showsignature{A} & \showsignature{Eb} &
+ \showsignature{Ama} & \showsignature{Ebma} &
+ \showsignature{F#mi} & \showsignature{Cmi} \\
+ \showsignature{E} & \showsignature{Ab} &
+ \showsignature{Ema} & \showsignature{Abma} &
+ \showsignature{C#mi} & \showsignature{Fmi} \\
+ \showsignature{B} & \showsignature{Db} &
+ \showsignature{Bma} & \showsignature{Dbma} &
+ \showsignature{G#mi} & \showsignature{Fbmi} \\
+ \showsignature{F#} & \showsignature{Gb} &
+ \showsignature{F#ma} & \showsignature{Gbma} &
+ \showsignature{D#mi} & \showsignature{Ebmi} \\
+ \bottomrule
+ \end{tabular}
+ \label{tab:key-signatures}
+\end{table}
+
+\begin{example}[
+ compile,
+ graphics={trim={2cm 16cm 2cm 4cm},clip},
+ add-sourcecode-options={literate=}]
+ \documentclass{article}
+ \usepackage{leadsheets}
+ \begin{document}
+
+ \begin{song}[transpose=2]{title={Mary Had A Little Lamb}, music={Stevie Ray
+ Vaughan}, lyrics={traditional}, tags={srv,blues},key=E}
+ \begin{verse}
+ ^{E7} Mary had a little lamb ^{A7} \\
+ Its fleece was white as ^{E7}snow, yea \\
+ Everywhere the child ^{B7}went ^{A7} \\
+ The little lamb was sure to ^{E7}go, yea
+ \end{verse}
+ \begin{verse}
+ ^{E7} He followed her to school one day ^{A7} \\
+ And broke the teacher's ^{E7}rule \\
+ What a time did they ^{B7}have ^{A7} \\
+ That day at ^{E7}school
+ \end{verse}
+ \end{song}
+
+ \end{document}
+\end{example}
+
+\section{Other \env*{verse}-like Environments}\label{sec:other-envverse-like}
+Songs can have lots of different kinds of parts: verses, choruses, bridges,
+intros, outros, and so on. Typographically they're all more or less the same,
+at least for the purpose of this package. This means we'd ideally have
+environments for all of these parts with a distinct name in order to get a
+clean source. At the same time these environments should all behave basically
+the same. This is what the environments described in the following sections
+are for.
+
+\subsection{Available Environments}\label{sec:avail-envir}
+
+\begin{environments}
+ \environment{chorus}[\oarg{options}]
+ An environment for specifying the chorus of a song.
+ \environment{chorus*}[\oarg{options}]
+ The same as \env{chorus} but does not display the label.
+ \environment{intro}[\oarg{options}]
+ An environment for specifying the intro of a song.
+ \environment{intro*}[\oarg{options}]
+ The same as \env{intro} but does not display the label.
+ \environment{interlude}[\oarg{options}]
+ An environment for specifying an interlude of a song.
+ \environment{bridge}[\oarg{bridge}]
+ An environment for specifying a bridge of a song.
+ \environment{info}[\oarg{options}]
+ An environment for specifying arbitrary information. This environment has
+ no label.
+ \environment{solo}[\oarg{options}]
+ An environment for specifying a solo to a song.
+ \environment{solo*}[\oarg{options}]
+ The same as \env{solo} but does not display the label.
+\end{environments}
+
+\subsection{Own \env*{verse}-like Environments}
+All environments mentioned in the previous section were defined with this
+command:
+\begin{commands}
+ \command{newversetype}[\sarg\marg{environment name}\oarg{default options}]
+ This defines an environment \meta{environment name}. This environment
+ uses the verse-type template \versetemplate{itemize} (see
+ section~\ref{sec:verse-type-templates}) unless specified differently in
+ the \meta{default options}. The starred version defines an environment
+ which hides the displayed name. More precisely: the macro \cs{verselabel}
+ that is used in verse-type template definitions prints nothing in an
+ environment defined with \cs{newversetype}\sarg.
+
+ This also defines a translation string (see
+ section~\ref{sec:internationalization}) \code{leadsheets/\meta{environment
+ name}} with both an empty translation fallback and English translation
+ unless specified differently with the \option{name} option.
+
+ At last this defines a new counter \meta{environment name} and sets
+ \cs*{the\meta{environment name}} to \code{\cs*{arabic}\Marg{environment
+ name}.}.
+\end{commands}
+
+As mentioned before in section~\ref{sec:verses-options} all environments
+defined this way have the options \option{format} and \option{label-format}.
+They have more options. Here's a complete list:
+\begin{options}
+ \keyval{format}{code}\Default
+ \meta{code} is inserted at the beginning of the environment and can thus
+ be used to add formatting, \eg, \keyis{format}{\cs*{itshape}}.
+ \keyval{label-format}{code}\Default
+ The same for the environment labels.
+ \keyval{after-label}{code}\Default{:}
+ \meta{code} is inserted in the label after the label text.
+ \keyval{name}{name}\Default
+ The translation fallback and English translation of the environment. This
+ should only be used with \cs{newversetype}. Later changes should be made
+ with \cs{DeclareTranslation} (see section~\ref{sec:internationalization}).
+ \keyval{template}{template}\Default{itemize}
+ The verse-type template used for the environment, see
+ section~\ref{sec:verse-type-templates} for details.
+ \keybool{numbered}\Default{false}
+ If set to \code{true} \cs{verselabel} (used in verse-type template
+ definitions, see section~\ref{sec:verse-type-templates}) adds a number
+ after the name.
+ \keybool{named}\Default{true}
+ If set to \code{true} \cs{verselabel} (used in verse-type template
+ definitions, see section~\ref{sec:verse-type-templates}) prints the name
+ of the current environment (as determined by the translation of the
+ corresponding string, see also section~\ref{sec:internationalization}).
+ \keyval{recall-chords}{environment}
+ An option to be used with the \option{remember-chords} mechanism, see
+ section~\ref{sec:remembering-chords} for an example.
+\end{options}
+
+There are also a number of general options for setting the defaults of some
+options for all environments:
+\begin{options}
+ \keyval{verses-format}{code}\Default
+ Sets the format for all \env{verse} like environments.
+ \keyval{verses-label-format}{code}\Default
+ Sets the label format for all \env{verse} like environments.
+ \keyval{verses-after-label}{code}\Default{:}
+ Defeault \meta{code} that is inserted in the label after the label text of
+ \env{verse} like environments.
+\end{options}
+This options only determine the formatting of an environment if the
+corresponding options of the environment hasn't been set.
+
+Let's summarize: the label text of these environments is built of three items
+in the following order:
+\begin{enumerate}
+ \item The \meta{code} set with the corresponding \option{label-format} option.
+ \item The label text as defined as second argument to \cs{newversetype} or
+ as declared through the corresponding translation.
+ \item The \meta{code} set with the corresponding \option{after-label} option.
+\end{enumerate}
+
+\begin{example}
+ \newversetype{foo}{Foo}
+ \setleadsheets{
+ foo/label-format = \bfseries ,
+ foo/after-label = ~$\Rightarrow$
+ }
+ \begin{foo}
+ Lorem ipsum dolor sit amet, consetetur sadipscing elitr,\\
+ sed diam nonumy eirmod tempor invidunt ut labore et dolore\\
+ magna aliquyam erat, sed diam voluptua.
+ \end{foo}
+\end{example}
+
+And just to give you some more examples here is how some of the existing
+environments are defined:
+\begin{sourcecode}
+ \newversetype{verse}[ name=Verse, named=false, after-label= ]
+ \newversetype*{verse*}
+ \newversetype{chorus}[ name=Chorus ]
+ \newversetype*{chorus*}
+\end{sourcecode}
+
+\section{Typesetting Bars}\label{sec:typesetting-bars}
+
+Sometimes it can be useful to typeset the chord scheme of a song. Then one
+should be able to indicate start and beginnings of bars, maybe indicate
+repeats and so on. While this is obviously possible with the macros provided
+by the \musicsymbols{} package listed in table~\ref{tab:bar-symbols} it may be
+more convenient to have a shorter syntax. This is why inside the \env{song}
+environment some characters can be made (or are) active (see
+section~\ref{sec:special-characters}). For the typesetting of bars this are
+the characters \shortcut{:} nor \shortcut{\barsymbol}. Per default they are
+not active, though. If you want to use the shortcut syntax you have to use
+the option \option{bar-shortcuts}. Here's a short example that emulates the
+behaviour by setting the characters active explicitly:
+
+\begin{example}[add-sourcecode-options={literate=}]
+ \catcode`|=\active
+ \catcode`:=\active
+ |: repeat | this :|: and | this :| \par
+ | this | part | ends | here || \par
+ | the | song | is over | now |||
+\end{example}
+
+All possibly combinations that have a special definition are shown in the
+example above. The replacements that are done internally are these:
+\begin{labeling}[--]{xxxxx}
+ \item[\shortcut{\barsymbol}] \cs{normalbar}\cs*{space} (the space is there
+ because otherwise it eats following spaces which would be annoying)
+ \item[\code{|:}] \cs{leftrepeat}
+ \item[\code{:|}] \cs{rightrepeat}
+ \item[\code{:|:}] \cs{leftrightrepeat}
+ \item[\code{||}] \cs{doublebar}
+ \item[\code{|||}] \cs{stopbar}
+\end{labeling}
+
+\section{Templates}\label{sec:templates}
+\subsection{Title Templates}\label{sec:title-templates}
+
+\subsubsection{Background}
+The titles of songs set with the \env{song} environment are displayed
+according to the chosen title template. It is chosen through the option
+\option{title-template} which can be set with \cs{setleadsheets} or as option
+to a specific \env{song} environment. \leadsheets{} provides few predefined
+templates and an easy mechansim to define own templates.
+
+\subsubsection{Existing Templates}
+
+Currently \leadsheets{} provides two templates:
+\begin{description}
+ \item[\titletemplate{minimal}] This only typesettes the song title in a
+ \cs{section}\sarg.
+ \item[\titletemplate{tabular}] This typesets the song title in a
+ \cs{section} and prints some song properties in a \env*{tabular} below it.
+ This template needs the \pkg{array}~\cite{pkg:array} package loaded.
+\end{description}
+
+\subsubsection{Own Templates}\label{sec:own-templates}
+The principle is pretty straight forward: templates are defined with the
+following command:
+\begin{commands}
+ \command{definesongtitletemplate}[\marg{name}\marg{code}]
+ This defines the template \meta{name}.
+\end{commands}
+Inside of \meta{code} any code can be used. The idea is that you use the
+commands presented below to insert song properties where you want them.
+
+First there are two commands related to defining new properties:
+\begin{commands}
+ \command{definesongproperty}[\marg{property}]
+ Defines a new property \meta{property}. All existing properties have been
+ defined this way. The command can only be used in the preamble.
+ \command{copysongproperty}[\marg{from}\marg{to}]
+ Copies the values of property \meta{from} to property \meta{to} if
+ property \meta{to} has not been set but property \meta{from} has been.
+ For example all \code{sort-\meta{property}} properties have been treated
+ this way so they have the \meta{property} value as fallback.
+ The command can only be used in the preamble.
+\end{commands}
+
+Then there are a number of commands related to retrieving and using the values
+of properties. All these commands only make sense inside a title template
+definition (see section~\ref{sec:title-templates}). Some of the commands are
+expandable which means they can be used in an \cs*{edef} like context, \ie,
+they are also suitable for writing the property values to the table of
+contents or other auxiliary files.
+\begin{commands}
+ \expandable\command{songproperty}[\marg{property}]
+ Retrieves property \meta{property}.
+ \command{printsongpropertylist}[\oarg{code}\marg{property}\marg{between
+ two}\marg{between more}\marg{between last two}]\Default{\cs*{@firstofone}}
+ Prints a property list \meta{property} separated with \meta{between two}
+ if the list contains only two items and separated with \meta{between more}
+ and \meta{between last two} if the list contains more than two items.
+ \meta{code} is placed directly in front of each item and items are
+ surrounded with braces which means that the last token in \meta{code} may
+ be a macro with a mandatory argument.
+ \command{usesongpropertylist}[\oarg{code}\marg{property}\marg{between}]%
+ \Default{\cs*{@firstofone}}
+ Like \cs{printsongpropertylist} but separates items with \meta{between}
+ regardless of the length of the list.
+ \expandable\command{forsongpropertylist}[\marg{property}\marg{code}]
+ Places all items of the property list \meta{property} in the input stream,
+ each item preceded with \meta{code}. Items are surrounded with braces
+ which means that the last token in \meta{code} may be a macro with a
+ mandatory argument.
+ \expandable\command{ifsongproperty}[\marg{property}\marg{true}\marg{false}]
+ Checks if property \meta{property} has been set.
+ \command{ifsongpropertiesequal}[\marg{property 1}\marg{property
+ 2}\marg{true}\marg{false}]
+ Checks if properties \meta{property 1} and \meta{property 2} have been set
+ to the same value.
+ \expandable\command{ifsongmeasuring}[\marg{true}\marg{false}]
+ \leadsheets{} measures the height of a song body before it typesets it and
+ it can be necessary in a template to know if the measuring phase is active
+ or not. For example the song property \property{height} should only be
+ used if \emph{not} in the measuring phase: it's value get's determined
+ there and is not yet available.
+ \command{expandcode}[\marg{code}]
+ Exhaustively expands \meta{code}. Experienced users won't need this. It
+ is essentially
+
+ \cs*{begingroup}\cs*{edef}\cs*{x}\Marg{\cs*{endgroup}\meta{code}}\cs*{x}.
+
+ (More precisely it is a wrapper for the expl3 function \cs*{use:x}.) This
+ means that any \code{\#} needs to doubled. Inside the argument of this
+ commands non-robust macros that should not be expanded need to be prefixed
+ with \cs*{noexpand}.
+\end{commands}
+
+With the right template definition you can index composers, interprets, song
+titles, \ldots{} You can write tables of contents for properties such as song
+titles, and so on, and so on. \leadsheets{} does not do this for you and it
+may require some experience to create templates which do all this.
+
+\subsubsection{Examples}
+In order to give you an idea on how to use songtitle templates I'll show you
+how the existing ones are defined and one new definition.
+
+\paragraph{The \titletemplate*{minimal} template}
+This is quite short and self-explaining.
+
+\begin{sourcecode}
+ \definesongtitletemplate{minimal}{\section*{\songproperty{title}}}
+\end{sourcecode}
+
+\paragraph{A custom template}
+Now let's see an example for a newly defined template. It's nearly as simple
+as the \titletemplate{minimal} template.
+
+\begin{example}[
+ compile,
+ graphics={trim={2cm 18cm 2cm 2cm},clip},
+ add-sourcecode-options={literate=}]
+ \documentclass{article}
+ \usepackage{leadsheets}
+ \definesongtitletemplate{custom}{
+ \ifsongmeasuring
+ {\section*}
+ {\section}{%
+ \songproperty{title}%
+ \ifsongproperty{music}
+ { (music by \printsongpropertylist{music}{ \& }{, }{ \& })}
+ {}%
+ }
+ }
+ \setleadsheets{title-template = custom}
+ \begin{document}
+
+ \begin{song}{title={Mary Had A Little Lamb}, music={Stevie Ray Vaughan},
+ lyrics={traditional}, tags={srv,blues}}
+ \begin{verse}
+ Mary had a little lamb \\
+ Its fleece was white as snow, yea \\
+ Everywhere the child went \\
+ The little lamb was sure to go, yea
+ \end{verse}
+ \begin{verse}
+ He followed her to school one day \\
+ And broke the teacher's rule \\
+ What a time did they have \\
+ That day at school
+ \end{verse}
+ \end{song}
+
+ \end{document}
+\end{example}
+
+\paragraph{The \titletemplate*{tabular} template}
+This one is a lot more advanced and demonstrates various of the available
+commands.
+
+\begin{sourcecode}
+ \definesongtitletemplate{tabular}{
+ \ifsongmeasuring
+ {\section*}
+ {\section}%
+ {\songproperty{title}}
+ \begingroup\footnotesize
+ \begin{tabular}{
+ @{}
+ >{\raggedright\arraybackslash}p{.5\linewidth}
+ @{}
+ >{\raggedleft\arraybackslash}p{.5\linewidth}
+ @{}
+ }
+ \ifsongproperty{interpret}
+ {\GetTranslation{leadsheets/interpret}}
+ {}%
+ \ifsongproperty{composer}
+ {%
+ &
+ \GetTranslation{leadsheets/composer}: %
+ \printsongpropertylist{composer}{ \& }{, }{ \& }
+ \ifsongproperty{lyrics}
+ {
+ \\ &
+ \GetTranslation{leadsheets/lyrics}: %
+ \printsongpropertylist{lyrics}{ \& }{, }{ \& }
+ }
+ {}%
+ }
+ {}%
+ \ifsongproperty{interpret}{\\}{\ifsongproperty{composer}{\\}{}}%
+ \ifsongproperty{genre}
+ {& Genre: \songproperty{genre} \\}
+ {}%
+ \ifsongproperty{tempo}
+ {& Tempo: \songproperty{tempo} \\}
+ {}%
+ \ifsongproperty{key}
+ {%
+ & \setchordnames{
+ major = -\GetTranslation{leadsheets/major} ,
+ minor = -\GetTranslation{leadsheets/minor}
+ }%
+ \GetTranslation{leadsheets/key}: %
+ \expandcode{\writechord{\songproperty{key}}} \\%
+ }
+ {}%
+ \end{tabular}
+ \par\endgroup
+ }
+\end{sourcecode}
+
+A song using the \titletemplate{tabular} template:
+
+\begin{example}[
+ compile,
+ graphics={trim={2cm 18cm 2cm 2cm},clip},
+ add-sourcecode-options={literate=}]
+ \documentclass{article}
+ \usepackage{leadsheets}
+ \usepackage{array}
+ \setleadsheets{title-template = tabular}
+ \begin{document}
+
+ \begin{song}{title={Mary Had A Little Lamb}, interpret={Stevie Ray Vaughan},
+ genre={blues}, tags={srv,blues},key=E}
+ \begin{verse}
+ ^{E7} Mary had a little lamb ^{A7} \\
+ Its fleece was white as ^{E7}snow, yea \\
+ Everywhere the child ^{B7}went ^{A7} \\
+ The little lamb was sure to ^{E7}go, yea
+ \end{verse}
+ \begin{verse}
+ ^{E7} He followed her to school one day ^{A7} \\
+ And broke the teacher's ^{E7}rule \\
+ What a time did they ^{B7}have ^{A7} \\
+ That day at ^{E7}school
+ \end{verse}
+ \end{song}
+
+ \end{document}
+\end{example}
+
+\subsection{Verse-type Templates}\label{sec:verse-type-templates}
+\subsubsection{Background}
+Similar to the songtitles also the \env{verse} like environments are typeset
+using templates. Defining them is just as easy as for the song titles.
+
+\subsubsection{Existing Templates}
+Currently \leadsheets{} provides only one template:
+\begin{description}
+ \item[\versetemplate{itemize}] Uses an \env*{itemize} environment for
+ typesetting the corresponding environment.
+\end{description}
+
+\subsubsection{Own Templates}
+Own templates can be defined using these commands:
+\begin{commands}
+ \command{defineversetypetemplate}[\marg{name}\marg{begin code}\marg{end code}]
+ This defines the template \meta{name}.
+ \command{verselabel}
+ Used inside \cs{defineversetypetemplate}. This determines where the label
+ of the environment using the template will be displayed.
+ \command{verselabelformat}
+ Used inside \cs{defineversetypetemplate}. The format of the current
+ environment as set with the corresponding \option{format} option.
+ \command{verseafterlabel}
+ Used inside \cs{defineversetypetemplate}. The format of the current
+ environment as set with the corresponding \option{after-label} option.
+ \command{versename}
+ Used inside \cs{defineversetypetemplate}. This prints the name of the
+ current environment.
+ \command{versenumber}
+ Used inside \cs{defineversetypetemplate}. Expands to the
+ \cs*{the\meta{environment}} command for the current environment.
+ \command{ifversestarred}[\marg{true}\marg{false}]
+ Can be used inside \cs{defineversetypetemplate} for checking if the
+ current environment was defined by the starred version of
+ \cs{newversetype}.
+ \command{ifversenumbered}[\marg{true}\marg{false}]
+ Can be used inside \cs{defineversetypetemplate} for checking if for the
+ current environment the option \option{numbered} is true or false.
+ \command{ifversenamed}[\marg{true}\marg{false}]
+ Can be used inside \cs{defineversetypetemplate} for checking if for the
+ current environment the option \option{named} is true or false.
+ \command{ifobeylines}[\marg{true}\marg{false}]
+ Checks if for the current song the option \option{obey-lines} is true or
+ false.
+\end{commands}
+Since with \cs{defineversetypetemplate} you define a template for an
+environment it has two argument for code: one for code at the beginning of the
+environment and one for code at the end. The command \cs{verselabel}
+internally uses the conditionals. Its definition is equivalent to the
+following:
+
+\begin{sourcecode}
+ \newcommand*\verselabel{%
+ \ifversestarred
+ {}
+ {%
+ \verselabelformat
+ \ifversenamed
+ {%
+ \versename
+ \ifversenumbered{ }{}%
+ }
+ {}%
+ \ifversenumbered
+ {\versenumber}
+ {}%
+ \verseafterlabel
+ }%
+ }
+\end{sourcecode}
+
+\subsubsection{Examples}
+In order to give you an idea on how to use verse-type templates I'll show you
+how the existing ones are defined and a few new definitions.
+
+\paragraph{The \versetemplate*{itemize} template}
+This is how the \versetemplate{itemize} is defined.
+\begin{sourcecode}
+ \makeatletter
+ \defineversetypetemplate{itemize}
+ {%
+ \itemize
+ \@itemdepth=0
+ \ifobeylines
+ {%
+ \setlength{\parskip}{0pt}%
+ \setleadsheets{ obey-lines-parskip = \parsep }%
+ }
+ {}%
+ \item[{\verselabel}]%
+ }
+ {\enditemize}
+ \makeatother
+\end{sourcecode}
+The most interesting part is probably the \cs{ifobeylines} part. When the
+option \option{obey-lines} is set to true an end of a line inserts a \cs*{par}
+token. So in order not to get a vertical skip after every line the template
+sets \cs*{parskip} to zero. With \keyis{obey-lines}{true} an empty line also
+inserts a \cs*{par} token but it also inserts a vertical space according to
+the value set with \option{obey-lines-parskip}. This option can only be set
+in a verse-type template definition (which is why it isn't documented
+elsewhere). All \env{verse} like environments initialize the length to the
+current value of \cs*{parskip} \emph{before} the template code is inserted.
+
+\paragraph{A \versetemplate*{flushleft} template}
+An example for a template \versetemplate*{flushleft} that typesets the label
+in the margin:
+\begin{example}
+ \defineversetypetemplate{flushleft}
+ {%
+ \noindent\llap{\verselabel\space}%
+ \flushleft
+ \unskip
+ \vspace*{-\baselineskip}
+ \ifobeylines{\setlength\parskip{0pt}}{\vspace*{-\parskip}}%
+ }
+ {\endflushleft}
+ \begin{chorus}[template=flushleft]
+ Lorem ipsum dolor sit amet, consetetur sadipscing elitr, \\
+ sed diam nonumy eirmod tempor invidunt ut labore et dolore \\
+ magna aliquyam erat, sed diam voluptua.
+
+ Lorem ipsum dolor sit amet, consetetur sadipscing elitr, \\
+ sed diam nonumy eirmod tempor invidunt ut labore et dolore \\
+ magna aliquyam erat, sed diam voluptua.
+ \end{chorus}
+\end{example}
+
+\paragraph{A \versetemplate*{flushright} template}
+An example for a template \versetemplate*{flushright} that typesets the label
+in the margin:
+\begin{example}
+ \defineversetypetemplate{flushright}
+ {%
+ \noindent\llap{\verselabel\space}%
+ \flushright
+ \unskip
+ \vspace*{-\baselineskip}
+ \ifobeylines{\setlength\parskip{0pt}}{\vspace*{-\parskip}}%
+ }
+ {\endflushright}
+ \begin{chorus}[template=flushright]
+ Lorem ipsum dolor sit amet, consetetur sadipscing elitr, \\
+ sed diam nonumy eirmod tempor invidunt ut labore et dolore \\
+ magna aliquyam erat, sed diam voluptua.
+
+ Lorem ipsum dolor sit amet, consetetur sadipscing elitr, \\
+ sed diam nonumy eirmod tempor invidunt ut labore et dolore \\
+ magna aliquyam erat, sed diam voluptua.
+ \end{chorus}
+\end{example}
+
+As you can see it's not entirely easy to define a template that suits both
+songs with and without \keyis{obey-lines}{true}. Personally I would forget
+about that option and not care about it at all in my templates.
+
+\paragraph{A \versetemplate*{framed} template}
+Last but not least an example using the \pkg{mdframed}
+package~\cite{pkg:mdframed} -- just to show you that everything is possible.
+The example adapts one of the examples of \pkg{mdframed}'s manual.
+\begin{example}
+ \defineversetypetemplate{framed}
+ {%
+ \expandcode{%
+ \noexpand\mdframed[
+ \ifversestarred{}{%
+ frametitle={%
+ \noexpand\tikz[baseline=(current bounding box.east),outer sep=0pt]
+ \noexpand\node[anchor=east,rectangle,fill=blue!20]
+ {\noexpand\strut\noexpand\verselabel};
+ }%
+ },
+ roundcorner = 5pt ,
+ linecolor = blue!20 ,
+ linewidth = 2pt,
+ topline = true,
+ frametitleaboveskip = \dimexpr-\ht\strutbox\relax ,
+ ]%
+ }%
+ \ifobeylines{\setlength\parskip{0pt}}{}%
+ }
+ {%
+ \endmdframed
+ \addvspace{\baselineskip}%
+ }
+ \begin{chorus}[template=framed]
+ Lorem ipsum dolor sit amet, consetetur sadipscing elitr, \\
+ sed diam nonumy eirmod tempor invidunt ut labore et dolore \\
+ magna aliquyam erat, sed diam voluptua.
+
+ Lorem ipsum dolor sit amet, consetetur sadipscing elitr, \\
+ sed diam nonumy eirmod tempor invidunt ut labore et dolore \\
+ magna aliquyam erat, sed diam voluptua.
+ \end{chorus}
+\end{example}
+
+\section{Internationalization}\label{sec:internationalization}
+
+Th environments described in sections~\ref{sec:envverse-environment}
+and~\ref{sec:other-envverse-like} as well as a few other words used in
+\leadsheets{} are translated with the help of the \pkg{translations}
+package~\cite{pkg:translations}. All predefined and available translation
+strings are listed in table~\ref{tab:translations}. You can change those
+translations or add translations for other languages with this command:
+\begin{commands}
+ \command*{DeclareTranslation}[\marg{language}\marg{string}\marg{translation}]
+ The command provided by the \pkg{translations} package for translating
+ strings.
+\end{commands}
+Those translations can be used for example in song title templates (see
+section~\ref{sec:title-templates}). One of the strings listed in
+table~\ref{tab:translations} is a little different: the string
+\code{leadsheets/interpret} is declared as
+\begin{sourcecode}
+ \DeclareTranslation{English}{leadsheets/interpret}
+ {as interpreted by \printsongpropertylist{interpret}{ \& }{, }{ \& }}
+ \DeclareTranslation{German}{leadsheets/interpret}
+ {wie von \printsongpropertylist{interpret}{ \& }{, }{ \& } interpretiert}
+\end{sourcecode}
+which means it uses the song property \property{interpret}. As a consequence
+it only really can be used inside a \env{song} environment. In other cases as
+for example in table~\ref{tab:translations} the property part expands to
+nothing (but the spaces around it are of course there). Also keep in mind
+that \cs{printsongpropertylist} is not expandable.
+
+\begin{table}[htbp]
+ \centering
+ \caption{Predefined translation strings.}
+ \newcommand*\showtranslation[1]{%
+ \texttt{leadsheets/#1} &
+ \GetTranslationFor{English}{leadsheets/#1} &
+ \GetTranslationFor{German}{leadsheets/#1}
+ }
+ \begin{tabular}{lll}
+ \toprule
+ \bfseries String & \bfseries English & \bfseries German \\
+ \midrule
+ \showtranslation{major} \\
+ \showtranslation{minor} \\
+ \showtranslation{chorus} \\
+ \showtranslation{verse} \\
+ \showtranslation{composer} \\
+ \showtranslation{lyrics} \\
+ \showtranslation{key} \\
+ \showtranslation{capo} \\
+ \showtranslation{fret} \\
+ \showtranslation{interpret} \\
+ \showtranslation{intro} \\
+ \showtranslation{interlude} \\
+ \showtranslation{bridge} \\
+ \showtranslation{solo} \\
+ \bottomrule
+ \end{tabular}
+ \label{tab:translations}
+\end{table}
+
+\clearpage
+\part{Appendix}
+\dictum[Thelonious Monk]{%
+ Talking about music is like dancing about architecture.%
+}
+\appendix
+
+\end{document}
diff --git a/Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.chordnames.code.tex b/Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.chordnames.code.tex
new file mode 100644
index 00000000000..0843dcddfa0
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.chordnames.code.tex
@@ -0,0 +1,193 @@
+\LeadsheetsExplLibrary{chordnames}
+ {2014/08/10 typesetting chord names with easy syntax}
+
+\leadsheets_load_library:n {musicsymbols}
+
+\bool_new:N \l__leadsheets_output_notation_german_bool
+\bool_new:N \l__leadsheets_input_notation_german_bool
+\bool_new:N \l__leadsheets_notation_literal_bool
+\bool_set_true:N \l__leadsheets_notation_literal_bool
+
+\tl_new:N \l__leadsheets_chord_tl
+\tl_new:N \l__leadsheets_tension_tl
+\tl_new:N \l__leadsheets_format_tl
+
+\cs_new_protected:Npn \leadsheets_tension_sym:Nn #1#2
+ { \tl_replace_all:Nnn #1 {#2} { \textsuperscript{#2} } }
+
+\cs_new_protected:Npn \leadsheets_chord_sym:Nnn #1#2#3
+ { \tl_replace_all:Nnn #1 {#2} {#3} }
+
+\tl_new:N \l__leadsheets_sharp_tl
+\tl_new:N \l__leadsheets_flat_tl
+\tl_new:N \l__leadsheets_doublesharp_tl
+\tl_new:N \l__leadsheets_doubleflat_tl
+\tl_new:N \l__leadsheets_full_dim_tl
+\tl_new:N \l__leadsheets_half_dim_tl
+\tl_new:N \l__leadsheets_aug_tl
+\tl_new:N \l__leadsheets_major_tl
+\tl_new:N \l__leadsheets_minor_tl
+\tl_new:N \l__leadsheets_sus_tl
+\tl_new:N \l__leadsheets_dim_tl
+\tl_new:N \l__leadsheets_add_tl
+\tl_new:N \l__leadsheets_major_seven_tl
+
+\tl_set:Nn \l__leadsheets_sharp_tl {\sharp}
+\tl_set:Nn \l__leadsheets_flat_tl {\flat}
+\tl_set:Nn \l__leadsheets_doublesharp_tl {\doublesharp}
+\tl_set:Nn \l__leadsheets_doubleflat_tl {\doubleflat}
+\tl_set:Nn \l__leadsheets_half_dim_tl {\o{}}
+\tl_set:Nn \l__leadsheets_full_dim_tl {o}
+\tl_set:Nn \l__leadsheets_aug_tl {+}
+\tl_set:Nn \l__leadsheets_major_tl {}
+\tl_set:Nn \l__leadsheets_minor_tl {m}
+\tl_set:Nn \l__leadsheets_sus_tl {\textsuperscript{sus}}
+\tl_set:Nn \l__leadsheets_dim_tl {\textsuperscript{dim}}
+\tl_set:Nn \l__leadsheets_add_tl {\textsuperscript{add}}
+\tl_set:Nn \l__leadsheets_major_seven_tl {\textsuperscript{maj7}}
+\tl_set:Nn \l__leadsheets_major_nine_tl {\textsuperscript{maj9}}
+
+\group_begin:
+% for convenient input of sharps:
+\char_set_catcode_other:N \#
+% because ^ is active in the song environment:
+\char_set_catcode_active:N \^
+% # is other so we need another parameter character:
+\char_set_catcode_parameter:N \!
+
+\cs_gset_protected:Npn \leadsheets_chord:
+ {
+ \group_begin:
+ \tl_use:N \l__leadsheets_format_tl
+ \char_set_catcode_other:N \#
+ \char_set_catcode_active:N \^
+ \leadsheets_chord_aux:n
+ }
+
+\cs_gset_protected:Npn \leadsheets_chord_aux:n !1
+ {
+ \tl_set:Nn \l__leadsheets_chord_tl {!1}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {maj7}
+ {\l__leadsheets_major_seven_tl}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {maj9}
+ {\l__leadsheets_major_nine_tl}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {sus}
+ {\l__leadsheets_sus_tl}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {^} {\textsuperscript}
+ \bool_if:NF \l__leadsheets_notation_literal_bool
+ {
+ % convert to English to German input:
+ \bool_if:NT \l__leadsheets_input_notation_german_bool
+ {
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {B} {@@@}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {H} {B}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {@@@} {Bb}
+ }
+ % convert to English to German output:
+ \bool_if:NT \l__leadsheets_output_notation_german_bool
+ {
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {Bb} {@@@}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {B} {H}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {@@@} {B}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {B#} {H}
+ }
+ }
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {#b} {}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {b#} {}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {##}
+ {\l__leadsheets_doublesharp_tl}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {bb}
+ {\l__leadsheets_doubleflat_tl}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {#} {\l__leadsheets_sharp_tl}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {b} {\l__leadsheets_flat_tl}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {dim} {\l__leadsheets_dim_tl}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {add} {\l__leadsheets_add_tl}
+ \leadsheets_tension_sym:Nn \l__leadsheets_chord_tl {0}
+ \leadsheets_tension_sym:Nn \l__leadsheets_chord_tl {1}
+ \leadsheets_tension_sym:Nn \l__leadsheets_chord_tl {2}
+ \leadsheets_tension_sym:Nn \l__leadsheets_chord_tl {3}
+ \leadsheets_tension_sym:Nn \l__leadsheets_chord_tl {4}
+ \leadsheets_tension_sym:Nn \l__leadsheets_chord_tl {5}
+ \leadsheets_tension_sym:Nn \l__leadsheets_chord_tl {6}
+ \leadsheets_tension_sym:Nn \l__leadsheets_chord_tl {7}
+ \leadsheets_tension_sym:Nn \l__leadsheets_chord_tl {8}
+ \leadsheets_tension_sym:Nn \l__leadsheets_chord_tl {9}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {/o}
+ {\textsuperscript{\l__leadsheets_half_dim_tl}}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {o}
+ {\textsuperscript{\l__leadsheets_full_dim_tl}}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {+}
+ {\textsuperscript{\l__leadsheets_aug_tl}}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {(}
+ { \leadsheets_tension:w( }
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {mi}
+ {\l__leadsheets_minor_tl}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {ma}
+ {\l__leadsheets_major_tl}
+ \tl_replace_all:Nnn \l__leadsheets_chord_tl
+ {\textsuperscript\textsuperscript}
+ {\textsuperscript}
+ \tl_use:N \l__leadsheets_chord_tl
+ \group_end:
+ }
+
+\group_end:
+
+\cs_new_protected:Npn \leadsheets_tension:w (#1)
+ {
+ \group_begin:
+ \tl_set:Nn \l__leadsheets_tension_tl {#1}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_tension_tl
+ {\textsuperscript}
+ {\use:n}
+ \textsuperscript { ( \tl_use:N \l__leadsheets_tension_tl ) }
+ \group_end:
+ }
+
+\keys_define:nn {leadsheets/chordnames}
+ {
+ format .tl_set:N = \l__leadsheets_format_tl ,
+ sharp .tl_set:N = \l__leadsheets_sharp_tl ,
+ flat .tl_set:N = \l__leadsheets_flat_tl ,
+ double-sharp .tl_set:N = \l__leadsheets_doublesharp_tl ,
+ double-flat .tl_set:N = \l__leadsheets_doubleflat_tl ,
+ half-dim .tl_set:N = \l__leadsheets_half_dim_tl ,
+ full-dim .tl_set:N = \l__leadsheets_full_dim_tl ,
+ aug .tl_set:N = \l__leadsheets_aug_tl ,
+ major .tl_set:N = \l__leadsheets_major_tl ,
+ minor .tl_set:N = \l__leadsheets_minor_tl ,
+ sus .tl_set:N = \l__leadsheets_sus_tl ,
+ add .tl_set:N = \l__leadsheets_add_tl ,
+ dim .tl_set:N = \l__leadsheets_dim_tl ,
+ major-seven .tl_set:N = \l__leadsheets_major_seven_tl ,
+ major-nine .tl_set:N = \l__leadsheets_major_nine_tl ,
+ output-notation .choice: ,
+ output-notation/literal .code:n =
+ \bool_set_false:N \l__leadsheets_input_notation_german_bool
+ \bool_set_false:N \l__leadsheets_output_notation_german_bool
+ \bool_set_true:N \l__leadsheets_notation_literal_bool ,
+ output-notation/german .code:n =
+ \bool_set_true:N \l__leadsheets_output_notation_german_bool
+ \bool_set_false:N \l__leadsheets_notation_literal_bool ,
+ output-notation/english .code:n =
+ \bool_set_false:N \l__leadsheets_output_notation_german_bool
+ \bool_set_false:N \l__leadsheets_notation_literal_bool ,
+ input-notation .choice: ,
+ input-notation/literal .code:n =
+ \bool_set_false:N \l__leadsheets_input_notation_german_bool
+ \bool_set_false:N \l__leadsheets_output_notation_german_bool
+ \bool_set_true:N \l__leadsheets_notation_literal_bool ,
+ input-notation/german .code:n =
+ \bool_set_true:N \l__leadsheets_input_notation_german_bool
+ \bool_set_false:N \l__leadsheets_notation_literal_bool ,
+ input-notation/english .code:n =
+ \bool_set_false:N \l__leadsheets_input_notation_german_bool
+ \bool_set_false:N \l__leadsheets_notation_literal_bool
+ }
+
+\NewDocumentCommand \setchordnames {m}
+ { \keys_set:nn {leadsheets/chordnames} {#1} }
+
+\NewDocumentCommand \chordname {} { \leadsheets_chord: }
+
+\endinput
diff --git a/Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.chords.code.tex b/Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.chords.code.tex
new file mode 100644
index 00000000000..0dce4372717
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.chords.code.tex
@@ -0,0 +1,189 @@
+\LeadsheetsExplLibrary{chords}{2014/08/10 printing chords}
+
+\msg_new:nnn {leadsheets} {no-chords}
+ { No~ more~ chords~ left~ for~ verse~ type~ `#1'~ \msg_line_context: }
+
+\tl_new:N \l__leadsheets_current_chord_tl
+\tl_new:N \l__leadsheets_chord_stack_alignment_tl
+\tl_set:Nn \l__leadsheets_chord_stack_alignment_tl {c}
+
+\bool_new:N \l__leadsheets_smash_chords_bool
+\bool_new:N \g__leadsheets_smash_next_chord_bool
+\bool_new:N \l__leadsheets_chord_gobble_after_bool
+\bool_new:N \l__leadsheets_record_chords_bool
+\bool_new:N \l__leadsheets_chord_print_bool
+\bool_set_true:N \l__leadsheets_chord_print_bool
+
+\prop_new:N \g__leadsheets_chords_sequences_prop
+
+\seq_new:N \l__leadsheets_chords_sequences_seq
+
+\dim_new:N \l__leadsheets_empty_chord_dim
+\dim_set:Nn \l__leadsheets_empty_chord_dim {1em}
+
+\cs_new:Npn \leadsheets_chord_print:n #1 {#1}
+\cs_generate_variant:Nn \leadsheets_chord_print:n {V}
+
+\cs_new_protected:Npn \leadsheets_chord:nnn #1#2#3
+ {
+ \leadsheets_if_record_chords:T
+ { \seq_put_right:Nn \l__leadsheets_chords_sequences_seq { {#3} } }
+ \leadsheets_set_chord:nnn
+ {#1}
+ {#2}
+ { \leadsheets_chord_write:n {#3} }
+ }
+
+\cs_new_protected:Npn \leadsheets_set_chord:nnn #1#2#3
+ {
+ \bool_if:NTF #1
+ { \bool_set_true:N \l__leadsheets_chord_gobble_after_bool }
+ { \bool_set_false:N \l__leadsheets_chord_gobble_after_bool }
+ \bool_if:NT #2
+ { \bool_set_true:N \g__leadsheets_smash_next_chord_bool }
+ \__leadsheets_set_chord:nwn {#3}
+ }
+
+\cs_new_protected:Npn \__leadsheets_set_chord:nwn #1#2~#3
+ {
+ \leadsheets_place_above:Vnn
+ \l__leadsheets_chord_stack_alignment_tl
+ {#1}
+ {
+ \tl_if_blank:nTF {#2}
+ {\skip_horizontal:N \l__leadsheets_empty_chord_dim}
+ {#2}
+ }
+ \tl_if_blank:nF {#3}
+ { \bool_if:NF \l__leadsheets_chord_gobble_after_bool {\c_space_tl} }
+ #3
+ }
+
+\cs_new_protected:Npn \leadsheets_chord_write:n #1
+ {
+% \bool_if:NT \l__leadsheets_chord_print_bool
+% {
+ \tl_set:Nn \l__leadsheets_current_chord_tl {#1}
+ \bool_if:nT
+ {
+ \leadsheets_if_property_p:Vn \l_leadsheets_current_song_id_tl {key}
+ &&
+ ( \l__leadsheets_transpose_bool || \l__leadsheets_transpose_capo_bool )
+ }
+ {
+ \leadsheets_transpose:xVN
+ { \leadsheets_get_property:Vn \l_leadsheets_current_song_id_tl {key} }
+ \l__leadsheets_transpose_steps_int
+ \l__leadsheets_current_chord_tl
+ }
+ \bool_if:nTF
+ {
+ ! \leadsheets_if_property_p:Vn \l_leadsheets_current_song_id_tl {key}
+ &&
+ ( \l__leadsheets_transpose_bool || \l__leadsheets_transpose_capo_bool )
+ }
+ {
+ \msg_warning:nnV {leadsheets}
+ {transpose-key}
+ \l_leadsheets_current_song_id_tl
+ }
+ \leadsheets_chord_print:V \l__leadsheets_current_chord_tl
+% }
+ }
+\cs_generate_variant:Nn \leadsheets_chord_write:n { V }
+
+\cs_new_protected:Npn \leadsheets_place_above:nnn #1#2#3
+ {
+ \bool_if:NTF \l__leadsheets_chord_print_bool
+ {
+ \group_begin:
+ \leadsheets_ignore_lines:
+ \bool_if:NT \g__leadsheets_smash_next_chord_bool
+ {
+ \bool_set_true:N \l__leadsheets_smash_chords_bool
+ \bool_gset_false:N \g__leadsheets_smash_next_chord_bool
+ }
+ \linespread{1} \selectfont
+ \begin{tabular} [b] {@{}#1@{}}
+ \bool_if:NTF \l__leadsheets_smash_chords_bool
+ {\makebox[0pt][c]{#2}}
+ {#2} \\
+ #3
+ \end{tabular}
+ \group_end:
+ }
+ {#3}
+ }
+\cs_generate_variant:Nn \leadsheets_place_above:nnn { V }
+
+\keys_define:nn {leadsheets}
+ {
+ smash-chords .bool_set:N = \l__leadsheets_smash_chords_bool ,
+ smash-next-chord .bool_set:N = \g__leadsheets_smash_next_chord_bool ,
+ empty-chord-dim .dim_set:N = \l__leadsheets_empty_chord_dim ,
+ remember-chords .bool_set:N = \l__leadsheets_record_chords_bool ,
+ align-chords .tl_set:N = \l__leadsheets_chord_stack_alignment_tl ,
+ chord-cs .code:n =
+ \cs_set_protected:Npn \leadsheets_chord_print:n {#1} ,
+ chord-cs .initial:n = \chordname ,
+ print-chords .bool_set:N = \l__leadsheets_chord_print_bool
+ }
+
+\NewDocumentCommand \chord {st-m} { \leadsheets_chord:nnn {#1} {#2} {#3} }
+
+\NewDocumentCommand \writechord {m}
+ { \leadsheets_chord_write:n {#1} }
+
+% --------------------------------------------------------------------------
+% record changes for a verse and automatically print them in the next:
+\prg_new_conditional:Npnn \leadsheets_if_record_chords: {T,F,TF}
+ {
+ \bool_if:nTF
+ {
+ \l__leadsheets_record_chords_bool &&
+ ! \prop_if_in_p:NV
+ \g__leadsheets_chords_sequences_prop
+ \l_leadsheets_verse_type_tl &&
+ !\l__leadsheets_measuring_bool
+ }
+ { \prg_return_true: }
+ { \prg_return_false: }
+ }
+
+\prg_new_conditional:Npnn \leadsheets_if_recall_chords: {T,F,TF}
+ {
+ \bool_if:nTF
+ {
+ \l__leadsheets_record_chords_bool &&
+ \prop_if_in_p:NV
+ \g__leadsheets_chords_sequences_prop
+ \l_leadsheets_verse_type_tl
+ &&
+ !\l__leadsheets_measuring_bool
+ }
+ { \prg_return_true: }
+ { \prg_return_false: }
+ }
+
+\cs_new:Npn \leadsheets_remember_or_recall_chords:w
+ {
+ \leadsheets_if_recall_chords:TF
+ { \__leadsheets_recall_chord:w }
+ { \chord }
+ }
+
+\cs_new_protected:Npn \leadsheets_recall_chord:nn #1#2
+ {
+ \seq_pop_left:NNF \l__leadsheets_chords_sequences_seq
+ \l__leadsheets_tmpa_tl
+ { \msg_error:nnV {leadsheets} {no-chords} \l_leadsheets_verse_type_tl }
+ \leadsheets_set_chord:nnn
+ {#1}
+ {#2}
+ { \leadsheets_chord_write:V \l__leadsheets_tmpa_tl }
+ }
+
+\NewDocumentCommand \__leadsheets_recall_chord:w {st-}
+ { \leadsheets_recall_chord:nn {#1} {#2} }
+
+\endinput
diff --git a/Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.musejazz.code.tex b/Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.musejazz.code.tex
new file mode 100644
index 00000000000..f329453c8d6
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.musejazz.code.tex
@@ -0,0 +1,259 @@
+\LeadsheetsExplLibrary{musejazz}
+ {2014/08/10 using MuseScore's MuseJazz font for chordnames}
+
+\leadsheets_load_library:n {chordnames}
+
+\msg_new:nnnn { leadsheets } { wrong-engine }
+ {
+ the~ `musejazz'~ library~ needs~ either~ to~ be~ run~ with~ XeLaTeX~ or~
+ with~ LuaLaTeX.
+ }
+ {
+ the~ `musejazz'~ library~ needs~ either~ to~ be~ run~ with~ XeLaTeX~ or~
+ with~ LuaLaTeX.~ Since~ you're~ using~ something~ different~ I~ will~
+ abort!
+ }
+
+\bool_if:nF { \xetex_if_engine_p: || \luatex_if_engine_p: }
+ { \msg_error:nn {leadsheets} {wrong-engine} \tex_endinput:D }
+
+\RequirePackage {fontspec}
+
+\newfontfamily \musejazz {MuseJazz}
+
+\cs_new_protected:Npn \leadsheets_char:Nn #1#2
+ { \cs_set:Npx #1 { \tex_char:D "#2 \scan_stop: } }
+
+
+% give names to the chararacters of the MuseJazz fonts by using their unicode
+% point:
+
+% \leadsheets_char:Nn \leadsheets_quarter: {2669} % viertel
+% \leadsheets_char:Nn \leadsheets_eigth: {266A} % achtel
+\leadsheets_char:Nn \leadsheets_flat: {266D} % b
+\leadsheets_char:Nn \leadsheets_natural: {266E} % auflösung
+\leadsheets_char:Nn \leadsheets_sharp: {266F} % #
+
+% \leadsheets_char:Nn \leadsheets_sharp: {E10C} % #
+% \leadsheets_char:Nn \leadsheets_flat: {E10D} % b
+% \leadsheets_char:Nn \leadsheets_natural: {E10E} % auflösung
+\leadsheets_char:Nn \leadsheets_segno: {E167} % segno
+\leadsheets_char:Nn \leadsheets_coda: {E168} % coda
+
+% \leadsheets_char:Nn \leadsheets_segno: {E177} % segno
+% \leadsheets_char:Nn \leadsheets_coda: {E178} % coda
+
+\leadsheets_char:Nn \leadsheets_major: {E180} % ma
+\leadsheets_char:Nn \leadsheets_minor: {E181} % mi
+\leadsheets_char:Nn \leadsheets_tension_eleven: {E182} % ^11
+\leadsheets_char:Nn \leadsheets_tension_thirteen: {E183} % ^13
+\leadsheets_char:Nn \leadsheets_tension_dim: {E184} % ^dim
+\leadsheets_char:Nn \leadsheets_sus: {E185} % sus
+\leadsheets_char:Nn \leadsheets_tension_aug_symbol: {E186} % ^+
+\leadsheets_char:Nn \leadsheets_tension_dim_symbol: {E187} % ^o
+\leadsheets_char:Nn \leadsheets_tension_flat: {E188} % ^b
+\leadsheets_char:Nn \leadsheets_tension_sharp: {E189} % ^#
+\leadsheets_char:Nn \leadsheets_major_seven: {E18A} % Delta
+\leadsheets_char:Nn \leadsheets_tension_add: {E18B} % ^add
+\leadsheets_char:Nn \leadsheets_tension_add_eleven: {E18C} % ^(add 11)
+\leadsheets_char:Nn \leadsheets_sus_four: {E18D} % sus4
+\leadsheets_char:Nn \leadsheets_dim_symbol: {E18E} % o
+\leadsheets_char:Nn \leadsheets_half_dim_symbol: {E18F} % ø
+
+\leadsheets_char:Nn \leadsheets_tension_zero: {E190} % ^0
+\leadsheets_char:Nn \leadsheets_tension_one: {E191} % ^1
+\leadsheets_char:Nn \leadsheets_tension_two: {E192} % ^2
+\leadsheets_char:Nn \leadsheets_tension_three: {E193} % ^3
+\leadsheets_char:Nn \leadsheets_tension_four: {E194} % ^4
+\leadsheets_char:Nn \leadsheets_tension_five: {E195} % ^5
+\leadsheets_char:Nn \leadsheets_tension_six: {E196} % ^6
+\leadsheets_char:Nn \leadsheets_tension_seven: {E197} % ^7
+\leadsheets_char:Nn \leadsheets_tension_eight: {E198} % ^8
+\leadsheets_char:Nn \leadsheets_tension_nine: {E199} % ^9
+
+\leadsheets_char:Nn \leadsheets_do: {E201} % Do
+\leadsheets_char:Nn \leadsheets_re: {E202} % Re
+\leadsheets_char:Nn \leadsheets_mi: {E203} % Mi
+\leadsheets_char:Nn \leadsheets_fa: {E204} % Fa
+\leadsheets_char:Nn \leadsheets_sol: {E205} % Sol
+\leadsheets_char:Nn \leadsheets_la: {E206} % La
+\leadsheets_char:Nn \leadsheets_si: {E207} % Si
+\leadsheets_char:Nn \leadsheets_ut: {E208} % Ut
+\leadsheets_char:Nn \leadsheets_so: {E209} % So
+\leadsheets_char:Nn \leadsheets_ti: {E20A} % Ti
+
+% \leadsheets_char:Nn \leadsheets_segno: {1D10B} % segno
+% \leadsheets_char:Nn \leadsheets_coda: {1D10C} % coda
+\leadsheets_char:Nn \leadsheets_whole: {1D15D} % ganze
+\leadsheets_char:Nn \leadsheets_half: {1D15E} % halbe
+\leadsheets_char:Nn \leadsheets_quarter: {1D15F} % viertel
+\leadsheets_char:Nn \leadsheets_eighth: {1D160} % achtel
+\leadsheets_char:Nn \leadsheets_sixteenth: {1D161} % sechzenhtel
+\leadsheets_char:Nn \leadsheets_dot: {1D16D} % punkt
+
+\RenewDocumentCommand \flat {} { \leadsheets_flat: }
+\RenewDocumentCommand \sharp {} { \leadsheets_sharp: }
+\RenewDocumentCommand \natural {} { \leadsheets_natural: }
+\NewDocumentCommand \segno {} { \leadsheets_segno: }
+\NewDocumentCommand \coda {} { \leadsheets_coda: }
+\RenewDocumentCommand \dim {} { \leadsheets_dim_symbol: }
+\NewDocumentCommand \halfdim {} { \leadsheets_half_dim_symbol: }
+\NewDocumentCommand \wholenote {} { \leadsheets_whole: }
+\NewDocumentCommand \halfnote {} { \leadsheets_half: }
+\NewDocumentCommand \quarternote {} { \leadsheets_quarter: }
+\NewDocumentCommand \eigthnote {} { \leadsheets_eighth: }
+\NewDocumentCommand \sixteenthnote {} { \leadsheets_sixteenth: }
+\NewDocumentCommand \musicdot {} { \leadsheets_dot: }
+
+\tl_set:Nn \l__leadsheets_sharp_tl {\leadsheets_sharp:}
+\tl_set:Nn \l__leadsheets_flat_tl {\leadsheets_flat:}
+\tl_set:Nn \l__leadsheets_doublesharp_tl {\doublesharp}
+\tl_set:Nn \l__leadsheets_doubleflat_tl {\doubleflat}
+\tl_set:Nn \l__leadsheets_half_dim_tl {\leadsheets_half_dim_symbol:}
+\tl_set:Nn \l__leadsheets_full_dim_tl {\leadsheets_dim_symbol:}
+\tl_set:Nn \l__leadsheets_aug_tl {\leadsheets_tension_aug_symbol:}
+\tl_set:Nn \l__leadsheets_major_tl {\leadsheets_major:}
+\tl_set:Nn \l__leadsheets_minor_tl {\leadsheets_minor:}
+\tl_set:Nn \l__leadsheets_sus_tl {\leadsheets_sus:}
+\tl_set:Nn \l__leadsheets_dim_tl {\leadsheets_tension_dim:}
+\tl_set:Nn \l__leadsheets_add_tl {\leadsheets_tension_add:}
+\tl_set:Nn \l__leadsheets_major_seven_tl {\leadsheets_major_seven:}
+\tl_set:Nn \l__leadsheets_major_nine_tl {\leadsheets_major_seven:\leadsheets_tension_nine:}
+
+\group_begin:
+% for convenient input of sharps:
+\char_set_catcode_other:N \#
+% because ^ is active in the song environment:
+\char_set_catcode_active:N \^
+% # is other so we need another parameter character:
+\char_set_catcode_parameter:N \!
+
+\cs_gset_protected:Npn \leadsheets_chord:
+ {
+ \group_begin:
+ \tl_use:N \l__leadsheets_format_tl
+ \musejazz
+ \char_set_catcode_other:N \#
+ \char_set_catcode_active:N \^
+ \leadsheets_chord_aux:n
+ }
+
+\cs_gset_protected:Npn \leadsheets_chord_aux:n !1
+ {
+ \tl_set:Nn \l__leadsheets_chord_tl {!1}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {maj7}
+ {\l__leadsheets_major_seven_tl}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {maj9}
+ {\l__leadsheets_major_nine_tl}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {sus4}
+ {\leadsheets_sus_four:}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {sus}
+ {\l__leadsheets_sus_tl}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {^} {\textsuperscript}
+ \bool_if:NF \l__leadsheets_notation_literal_bool
+ {
+ % convert to English to German input:
+ \bool_if:NT \l__leadsheets_input_notation_german_bool
+ {
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {B} {@@@}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {H} {B}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {@@@} {Bb}
+ }
+ % convert to English to German output:
+ \bool_if:NT \l__leadsheets_output_notation_german_bool
+ {
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {Bb} {@@@}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {B} {H}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {@@@} {B}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {B#} {H}
+ }
+ }
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {#b} {}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {b#} {}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {##}
+ {\l__leadsheets_doublesharp_tl}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {bb}
+ {\l__leadsheets_doubleflat_tl}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {#} {\l__leadsheets_sharp_tl}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {b} {\l__leadsheets_flat_tl}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {dim} {\l__leadsheets_dim_tl}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {add} {\l__leadsheets_add_tl}
+ % those need to be taken care of:
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {11} {\leadsheets_tension_eleven:}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {13} {\leadsheets_tension_thirteen:}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {0} {\leadsheets_tension_zero:}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {1} {\leadsheets_tension_one:}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {2} {\leadsheets_tension_two:}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {3} {\leadsheets_tension_three:}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {4} {\leadsheets_tension_four:}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {5} {\leadsheets_tension_five:}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {6} {\leadsheets_tension_six:}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {7} {\leadsheets_tension_seven:}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {8} {\leadsheets_tension_eight:}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {9} {\leadsheets_tension_nine:}
+ % as do those:
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {/o}
+ {\l__leadsheets_half_dim_tl}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {o}
+ {\l__leadsheets_full_dim_tl}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {+}
+ {\l__leadsheets_aug_tl}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {(}
+ { \leadsheets_tension:w( }
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {mi}
+ {\l__leadsheets_minor_tl}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_chord_tl {ma}
+ {\l__leadsheets_major_tl}
+ \tl_replace_all:Nnn \l__leadsheets_chord_tl
+ {\textsuperscript\textsuperscript}
+ {\textsuperscript}
+ \tl_replace_all:Nnn \l__leadsheets_chord_tl
+ {\textsuperscript}
+ {\leadsheets_chord_tension:n}
+ \tl_use:N \l__leadsheets_chord_tl
+ \group_end:
+ }
+
+\group_end:
+
+\cs_new:Npn \leadsheets_chord_tension:n #1
+ {
+ \group_begin:
+ \tl_set:Nn \l__leadsheets_tension_tl {#1}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_tension_tl
+ {\textsuperscript}
+ {\use:n}
+ \tl_set:Nn \l__leadsheets_sharp_tl {\leadsheets_tension_sharp:}
+ \tl_set:Nn \l__leadsheets_flat_tl {\leadsheets_tension_flat:}
+ \l__leadsheets_tension_tl
+ \group_end:
+ }
+
+\cs_set_protected:Npn \leadsheets_tension:w (#1)
+ {
+ \group_begin:
+ \tl_set:Nn \l__leadsheets_tension_tl {#1}
+ \leadsheets_chord_sym:Nnn \l__leadsheets_tension_tl
+ {\textsuperscript}
+ {\use:n}
+ \tl_set:Nn \l__leadsheets_sharp_tl {\leadsheets_tension_sharp:}
+ \tl_set:Nn \l__leadsheets_flat_tl {\leadsheets_tension_flat:}
+ \textsuperscript {(}
+ \l__leadsheets_tension_tl
+ \textsuperscript {)}
+ % \textsuperscript { ( \tl_use:N \l__leadsheets_tension_tl ) }
+ \group_end:
+ }
+
+\cs_new_protected:Npn \mjc_tension:w (#1)
+ {
+ \group_begin:
+ \tl_set:Nn \l__leadsheets_sharp_tl {\leadsheets_tension_sharp:}
+ \tl_set:Nn \l__leadsheets_flat_tl {\leadsheets_tension_flat:}
+ \textsuperscript {(}
+ #1
+ \textsuperscript {)}
+ \group_end:
+ }
+
+\tex_endinput:D
diff --git a/Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.musicsymbols.code.tex b/Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.musicsymbols.code.tex
new file mode 100644
index 00000000000..82a515786a3
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.musicsymbols.code.tex
@@ -0,0 +1,104 @@
+\LeadsheetsLibrary{musicsymbols}{2014/08/10 musical symbols}
+\RequirePackage{etoolbox}
+
+% define a LaTeX font that uses the `musix' font from MusiXTeX:
+\DeclareFontFamily{U}{musix}{}%
+\DeclareFontShape{U}{musix}{m}{n}{%
+ <-12> musix11
+ <12-15> musix13
+ <15-18> musix16
+ <18-23> musix20
+ <23-> musix29
+}{}%
+
+% a font switch command:
+\newrobustcmd*\musix{\usefont{U}{musix}{m}{n}\selectfont}
+% a text font command:
+\DeclareTextFontCommand{\textmusix}{\musix}
+
+% the `symbol' command: raises the symnol since most symbols are too low for
+% use in normal text:
+\newrobustcmd*\musicsymbol[2][0pt]{%
+ \raisebox{\dimexpr.5ex+(#1)\relax}{\textmusix{#2}}%
+}
+
+% define the symbol
+\renewrobustcmd*\sharp {\musicsymbol[.2ex]{4}\kern-.06em}
+\renewrobustcmd*\flat {\kern-.05em\musicsymbol{2}\kern-.06em}
+\renewrobustcmd*\natural {\musicsymbol{6}\kern-.06em}
+\newrobustcmd*\doublesharp {\musicsymbol{5}\kern-.05em}
+\newrobustcmd*\doubleflat {\kern-.05em\musicsymbol{3}\kern-.06em}
+\newrobustcmd*\trebleclef {\musicsymbol{H}}
+\newrobustcmd*\bassclef {\musicsymbol{J}}
+\newrobustcmd*\altoclef {\musicsymbol{K}}
+\newrobustcmd*\allabreve {\kern-.15em\musicsymbol{R}}
+\newrobustcmd*\meterC {\kern-.15em\musicsymbol{S}}
+\newrobustcmd*\wholerest {\musicsymbol{<}}
+\newrobustcmd*\halfrest {\musicsymbol{=}}
+\newrobustcmd*\quarterrest {\musicsymbol[-1ex]{>}\kern.25em}
+\newrobustcmd*\eighthrest {\musicsymbol[-1ex]{?}\kern.33em}
+\newrobustcmd*\sixteenthrest {\musicsymbol[-1ex]{@}\kern.33em}
+
+\newcommand*\leadsheets@size{\f@size pt}
+\newlength\leadsheets@barheight
+
+\newrobustcmd*\genericbar[1]{%
+ \setlength\leadsheets@barheight\leadsheets@size
+ \rule[-.2\leadsheets@barheight]{#1}{\leadsheets@barheight}%
+}
+
+\newcommand*\normalbarwidth{.02em}
+\newcommand*\thickbarwidth{.15em}
+\newcommand*\interbarwidth{.1em}
+
+\newrobustcmd*\leadsheets@thickbar{%
+ \genericbar{\thickbarwidth}%
+}
+
+\newrobustcmd*\leadsheets@repeatcolon{%
+ \leavevmode
+ \setlength\leadsheets@barheight\leadsheets@size
+ \raise.1\leadsheets@barheight\hbox{:}%
+}
+
+\newrobustcmd*\leadsheets@interbar{\kern\interbarwidth\relax}
+
+\newrobustcmd*\normalbar{%
+ \genericbar{\normalbarwidth}%
+}
+
+\newrobustcmd*\leftrepeat{%
+ \leadsheets@thickbar
+ \leadsheets@interbar
+ \normalbar
+ \leadsheets@repeatcolon
+}
+
+\newrobustcmd*\rightrepeat{%
+ \leadsheets@repeatcolon
+ \normalbar
+ \leadsheets@interbar
+ \leadsheets@thickbar
+}
+
+\newrobustcmd*\leftrightrepeat{%
+ \leadsheets@repeatcolon
+ \leadsheets@thickbar
+ \leadsheets@interbar
+ \leadsheets@thickbar
+ \leadsheets@repeatcolon
+}
+
+\newrobustcmd*\doublebar{%
+ \normalbar
+ \leadsheets@interbar
+ \normalbar
+}
+
+\newrobustcmd*\stopbar{%
+ \normalbar
+ \leadsheets@interbar
+ \leadsheets@thickbar
+}
+
+\endinput
diff --git a/Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.properties.code.tex b/Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.properties.code.tex
new file mode 100644
index 00000000000..b904d2320ba
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.properties.code.tex
@@ -0,0 +1,167 @@
+\LeadsheetsExplLibrary{properties}{2014/08/10 song properties}
+
+\cs_generate_variant:Nn \tl_if_eq:nnTF {x}
+
+\seq_new:N \l__leadsheets_song_properties_seq
+\prop_new:N \l__leadsheets_duplicate_properties_prop
+
+\cs_new_protected:Npn \leadsheets_define_property:n #1
+ {
+ \prop_new:c {l__leadsheets_songs_#1_prop}
+ \seq_put_right:Nn \l__leadsheets_song_properties_seq {#1}
+ }
+
+\cs_new_protected:Npn \leadsheets_set_property:nnn #1#2#3
+ { \prop_gput:cnn {l__leadsheets_songs_#2_prop} {#1} {#3} }
+\cs_generate_variant:Nn \leadsheets_set_property:nnn { nnx }
+
+\cs_new:Npn \leadsheets_get_property:nn #1#2
+ { \prop_item:cn {l__leadsheets_songs_#2_prop} {#1} }
+\cs_generate_variant:Nn \leadsheets_get_property:nn { V }
+
+\prg_new_conditional:Npnn \leadsheets_if_property:nn #1#2 {p,T,F,TF}
+ {
+ \prop_if_in:cnTF {l__leadsheets_songs_#2_prop} {#1}
+ { \prg_return_true: }
+ { \prg_return_false: }
+ }
+\cs_generate_variant:Nn \leadsheets_if_property:nnTF { V }
+\cs_generate_variant:Nn \leadsheets_if_property:nnT { V }
+\cs_generate_variant:Nn \leadsheets_if_property_p:nn { V }
+
+\prg_new_conditional:Npnn \leadsheets_if_measuring: {T,F,TF}
+ {
+ \bool_if:NTF \l__leadsheets_measuring_bool
+ { \prg_return_true: }
+ { \prg_return_false: }
+ }
+
+\prg_new_protected_conditional:Npnn \leadsheets_if_properties_eq:nnn #1#2#3 {T,F,TF}
+ {
+ \tl_if_eq:xxTF
+ { \leadsheets_get_property:nn {#1} {#2} }
+ { \leadsheets_get_property:nn {#1} {#3} }
+ { \prg_return_true: }
+ { \prg_return_false: }
+ }
+\cs_generate_variant:Nn \leadsheets_if_properties_eq:nnnTF { V }
+
+\prg_new_protected_conditional:Npnn \leadsheets_if_property_eq:nnn #1#2#3 {T,F,TF}
+ {
+ \tl_if_eq:xnTF
+ { \leadsheets_get_property:nn {#1} {#2} }
+ { #3 }
+ { \prg_return_true: }
+ { \prg_return_false: }
+ }
+\cs_generate_variant:Nn \leadsheets_if_property_eq:nnnTF { V }
+
+\cs_new_protected:Npn \leadsheets_copy_property:nnn #1#2#3
+ {
+ \bool_if:nT
+ {
+ !\leadsheets_if_property_p:nn {#1} {#3}
+ &&
+ \leadsheets_if_property_p:nn {#1} {#2}
+ }
+ {
+ \leadsheets_set_property:nnx {#1} {#3}
+ { \leadsheets_get_property:nn {#1} {#2} }
+ }
+ }
+
+\cs_new_protected:Npn \leadsheets_duplicate_property:nn #1#2
+ { \prop_put:Nnn \l__leadsheets_duplicate_properties_prop {#1} {#2} }
+
+\cs_new_protected:Npn \leadsheets_set_duplicate_properties:n #1
+ {
+ \prop_map_inline:Nn \l__leadsheets_duplicate_properties_prop
+ { \leadsheets_copy_property:nnn {#1} {##1} {##2} }
+ }
+
+\cs_new_protected:Npn \leadsheets_print_property_list:nnnnnn #1#2#3#4#5#6
+ {
+ \seq_set_split:Nnx \l__leadsheets_tmpa_seq {~and~}
+ { \leadsheets_get_property:nn {#1} {#2} }
+ \seq_clear:N \l__leadsheets_tmpb_seq
+ \seq_map_inline:Nn \l__leadsheets_tmpa_seq
+ { \seq_put_right:Nn \l__leadsheets_tmpb_seq { #3 {##1} } }
+ \seq_use:Nnnn \l__leadsheets_tmpb_seq {#4} {#5} {#6}
+ }
+\cs_generate_variant:Nn \leadsheets_print_property_list:nnnnnn { V }
+
+\cs_new_protected:Npn \leadsheets_use_property_list:nnnn #1#2#3#4
+ {
+ \seq_set_split:Nnx \l__leadsheets_tmpa_seq {~and~}
+ { \leadsheets_get_property:nn {#1} {#2} }
+ \seq_clear:N \l__leadsheets_tmpb_seq
+ \seq_map_inline:Nn \l__leadsheets_tmpa_seq
+ { \seq_put_right:Nn \l__leadsheets_tmpb_seq { #3 {##1} } }
+ \seq_use:Nn \l__leadsheets_tmpb_seq {#4}
+ }
+\cs_generate_variant:Nn \leadsheets_use_property_list:nnnn { V }
+
+\cs_new:Npn \leadsheets_for_property_list:nn #1#2
+ { \__leadsheets_for_property_list_aux:nww {#2} #1 ~and~ \q_stop }
+\cs_generate_variant:Nn \leadsheets_for_property_list:nn { f }
+
+\cs_new:Npn \__leadsheets_for_property_list_aux:nww #1#2 ~and~ #3 \q_stop
+ {
+ #1 { #2 }
+ \tl_if_blank:nF {#3}
+ { \__leadsheets_for_property_list_aux:nww {#1} #3 \q_stop }
+ }
+
+\DeclareExpandableDocumentCommand \songproperty {m}
+ { \leadsheets_get_property:Vn \l_leadsheets_current_song_id_tl {#1} }
+
+% #1: command that formats every entry in list
+% #2: property
+% #3: separator between two
+% #4: separator between more than tow
+% #5: separator between last two
+\NewDocumentCommand \printsongpropertylist {O{\use:n}mmmm}
+ {
+ \leadsheets_print_property_list:Vnnnnn \l_leadsheets_current_song_id_tl
+ {#2} {#1} {#3} {#4} {#5}
+ }
+
+% #1: command that formats every entry in list
+% #2: property
+% #3: separator
+\NewDocumentCommand \usesongpropertylist {O{\use:n}mm}
+ {
+ \leadsheets_use_property_list:Vnnn \l_leadsheets_current_song_id_tl
+ {#2} {#1} {#3}
+ }
+
+% #1: command that formats every entry in list
+% #2: property
+\DeclareExpandableDocumentCommand \forsongpropertylist {mm}
+ {
+ \leadsheets_for_property_list:fn
+ { \leadsheets_get_property:Vn \l_leadsheets_current_song_id_tl {#1} }
+ {#2}
+ }
+
+\DeclareExpandableDocumentCommand \ifsongproperty {m}
+ { \leadsheets_if_property:VnTF \l_leadsheets_current_song_id_tl {#1} }
+
+\DeclareExpandableDocumentCommand \ifsongmeasuring {}
+ { \leadsheets_if_measuring:TF }
+
+\NewDocumentCommand \ifsongpropertiesequal {mm}
+ { \leadsheets_if_properties_eq:VnnTF \l_leadsheets_current_song_id_tl {#1} {#2} }
+
+\NewDocumentCommand \ifsongpropertyequal {mm}
+ { \leadsheets_if_property_eq:VnnTF \l_leadsheets_current_song_id_tl {#1} {#2} }
+
+\NewDocumentCommand \definesongproperty {m}
+ { \leadsheets_define_property:n {#1} }
+\@onlypreamble\definesongproperty
+
+\NewDocumentCommand \copysongproperty {mm}
+ { \leadsheets_duplicate_property:nn {#1} {#2} }
+\@onlypreamble\copysongproperty
+
+\endinput
diff --git a/Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.shorthands.code.tex b/Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.shorthands.code.tex
new file mode 100644
index 00000000000..3766ddcc0b3
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.shorthands.code.tex
@@ -0,0 +1,40 @@
+\LeadsheetsExplLibrary{shorthands}
+ {2014/08/10 definition and activation of shorthands}
+
+\seq_new:N \l__leadsheets_shorthands_seq
+
+\group_begin:
+\char_set_catcode_active:N \~
+
+\cs_new_protected:Npn \leadsheets_define_shorthand:Npn #1
+ {
+ \seq_if_in:NnF \l__leadsheets_shorthands_seq {#1}
+ { \seq_put_right:Nn \l__leadsheets_shorthands_seq {#1} }
+ \group_begin:
+ \__leadsheets_define_shorthand_aux_i:np {#1}
+ }
+
+\cs_new_protected:Npn \__leadsheets_define_shorthand_aux_i:np #1#2#{
+ \char_set_lccode:nn {`~} {`#1}
+ \__leadsheets_define_shorthand_aux_ii:nn {#2}
+ }
+
+\cs_new_protected:Npn \__leadsheets_define_shorthand_aux_ii:nn #1#2
+ { \tl_to_lowercase:n { \group_end: \cs_set:Npn ~ } #1 {#2} }
+\group_end:
+
+\cs_new_protected:Npn \leadsheets_activate_shorthands:n #1
+ {
+ \tl_map_inline:nn {#1}
+ {
+ \seq_if_in:NnT \l__leadsheets_shorthands_seq {##1}
+ { \char_set_catcode_active:N ##1 }
+ }
+ }
+\cs_new_protected:Npn \leadsheets_activate_all_shorthands:
+ {
+ \seq_map_inline:Nn \l__leadsheets_shorthands_seq
+ { \char_set_catcode_active:N ##1 }
+ }
+
+\endinput
diff --git a/Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.songs.code.tex b/Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.songs.code.tex
new file mode 100644
index 00000000000..a669e3cdb8e
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.songs.code.tex
@@ -0,0 +1,631 @@
+\LeadsheetsExplLibrary{songs}{2014/08/10 typesetting songs}
+
+% --------------------------------------------------------------------------
+% messages:
+\msg_new:nnn {leadsheets} {unknown-verse-type}
+ {
+ The~ verse~ type~ `#1'~ is~ unknown.~ Using~ `verse'~ instead~
+ \msg_line_context:
+ }
+
+\msg_new:nnn {leadsheets} {song-defined}
+ {
+ A~ song~ with~ the~ ID~ `#1'~ has~ already~ been~ defined! Check~ your~
+ source~ \msg_line_context:
+ }
+
+\msg_new:nnn {leadsheets} {transpose-key}
+ {
+ You~ need~ to~ specify~ the~ `key'~ property~ for~ song~ `#1'~
+ ( \leadsheets_get_property:nn {#1} {title} )~ in~ order~ to~ use~ the~
+ transposing~ mechanism~ \msg_line_context:
+ }
+
+% --------------------------------------------------------------------------
+% variables:
+\tl_const:Nn \c_leadsheets_sharp_tl {sharp}
+\tl_const:Nn \c_leadsheets_flat_tl {flat}
+
+\tl_new:N \l__leadsheets_songtext_format_tl
+\tl_new:N \l__leadsheets_song_format_tl
+\tl_new:N \l_leadsheets_current_song_id_tl
+\tl_new:N \l_leadsheets_verse_type_tl
+\tl_set:Nn \l_leadsheets_verse_type_tl {verse}
+\tl_new:N \l__leadsheets_verses_format_tl
+\tl_new:N \l__leadsheets_verses_label_format_tl
+\tl_new:N \l__leadsheets_verses_after_label_tl
+\tl_set:Nn \l__leadsheets_verses_after_label_tl {:}
+\tl_new:N \l__leadsheets_enharmonic_tl
+\tl_new:N \l__leadsheets_capo_number_format_tl
+\tl_new:N \l__leadsheets_recall_verse_type_tl
+\tl_new:N \l__leadsheets_song_body_tl
+
+\bool_new:N \l__leadsheets_print_selected_bool
+\bool_new:N \l__leadsheets_transpose_bool
+\bool_new:N \l__leadsheets_transpose_capo_bool
+\bool_new:N \l__leadsheets_enharmonic_bool
+\bool_new:N \l__leadsheets_obey_lines_bool
+\bool_new:N \l__leadsheets_bar_shorthands_bool
+\bool_new:N \l__leadsheets_measuring_bool
+
+\clist_new:N \l__leadsheets_print_tags_clist
+
+\seq_new:N \l__leadsheets_defined_songs_seq
+\seq_new:N \l__leadsheets_songs_print_seq
+\seq_new:N \l__leadsheets_reset_counters_seq
+
+\int_new:N \l__leadsheets_transpose_steps_int
+\int_new:N \l__leadsheets_capo_int
+\int_new:N \g__leadsheets_song_id_int
+
+\skip_new:N \l__leadsheets_obey_parskip_skip
+
+% --------------------------------------------------------------------------
+% load necessary libraries:
+\leadsheets_load_libraries:n
+ {
+ musicsymbols,
+ chordnames,
+ chords,
+ shorthands,
+ properties,
+ transposing,
+ templates,
+ translations
+ }
+
+% --------------------------------------------------------------------------
+% define shorthands
+\leadsheets_define_shorthand:Npn ^ {\leadsheets_remember_or_recall_chords:w}
+\leadsheets_define_shorthand:Npn _ {\writechord}
+\leadsheets_define_shorthand:Npn | #1
+ {
+ \str_case:nnF {#1}
+ {
+ {:} {\leftrepeat}
+ {|} {\__leadsheets_checkbartype:}
+ }
+ {\normalbar\space #1}
+ }
+\cs_new_protected:Npn \__leadsheets_checkbartype:
+ {
+ \peek_charcode_remove:NTF |
+ {\stopbar}
+ {\doublebar}
+ }
+
+\leadsheets_define_shorthand:Npn :
+ {
+ \peek_charcode_remove:NTF |
+ {\__leadsheets_checkrepeat:}
+ {\token_to_str:N :}
+ }
+\cs_new_protected:Npn \__leadsheets_checkrepeat:
+ {
+ \peek_charcode_remove:NTF :
+ {\leftrightrepeat}
+ {\rightrepeat}
+ }
+
+% --------------------------------------------------------------------------
+% the `song' environment:
+\NewDocumentEnvironment {song} { O{}m }
+ {
+ \int_gincr:N \g__leadsheets_song_id_int
+ \tl_set:Nx \l__leadsheets_tmpa_tl
+ { song-\int_to_arabic:n { \g__leadsheets_song_id_int } }
+ \leadsheets_startsong:nVn {#1} \l__leadsheets_tmpa_tl {#2}
+ }
+ {}
+
+% some hacks for the `obey-lines' option:
+\group_begin:
+\ExplSyntaxOff
+\catcode`\:=11
+\catcode`\_=11
+\cs_new:Npn \__leadsheets_active_eol: { \catcode`\^^M=\active }
+
+\__leadsheets_active_eol: %
+\tl_const:Nn \c__leadsheets_eol_tl {^^M}%
+\cs_new_protected:Npn \leadsheets_obey_lines: {%
+ \skip_set_eq:NN \l__leadsheets_obey_parskip_skip \parskip
+ \cs_set:Npn ^^M{%
+ \peek_meaning:NTF ^^M%
+ {\par \skip_vertical:N \l__leadsheets_obey_parskip_skip}%
+ {\par}%
+ }%
+}%
+\cs_new_protected:Npn \leadsheets_ignore_lines:{%
+ \cs_set:Npn ^^M{%
+ \peek_meaning:NTF^^M%
+ {\par}%
+ {\c_space_tl}%
+ }%
+}%
+\group_end:
+
+% #1: options
+% #2: ID
+% #3: properties
+\cs_new_protected:Npn \leadsheets_startsong:nnn #1#2#3
+ {
+ \leadsheets_song_define:nn {#2} {#3}
+ \leadsheets_set_duplicate_properties:n {#2}
+ \leadsheets_check_print:n {#2}
+ \prop_gclear:N \g__leadsheets_chords_sequences_prop
+ \group_begin:
+ \keys_set:nn {leadsheets} {#1}
+ \leadsheets_specials:
+ \tl_use:N \l__leadsheets_song_format_tl
+ \leadsheets_ignore_lines:
+ \leadsheets_print_song:nwn {#2}
+ }
+\cs_generate_variant:Nn \leadsheets_startsong:nnn { nV }
+
+\cs_new_protected:Npn \leadsheets_specials:
+ {
+ \leadsheets_activate_shorthands:n {^_}
+ \bool_if:NT \l__leadsheets_bar_shorthands_bool
+ { \leadsheets_activate_shorthands:n {:|} }
+ \char_set_catcode_other:N \#
+ \bool_if:NT \l__leadsheets_obey_lines_bool
+ { \__leadsheets_active_eol: }
+ }
+
+% --------------------------------------------------------------------------
+% define song properties:
+\definesongproperty {title}
+\definesongproperty {subtitle}
+\definesongproperty {short-title}
+\definesongproperty {sort-title}
+\definesongproperty {sort-short-title}
+\definesongproperty {composer}
+\definesongproperty {sort-composer}
+\definesongproperty {music}
+\definesongproperty {sort-music}
+\definesongproperty {lyrics}
+\definesongproperty {sort-lyrics}
+\definesongproperty {arr}
+\definesongproperty {sort-arr}
+\definesongproperty {band}
+\definesongproperty {sort-band}
+\definesongproperty {genre}
+\definesongproperty {interpret}
+\definesongproperty {sort-interpret}
+\definesongproperty {key}
+\definesongproperty {capo}
+\definesongproperty {tempo}
+\definesongproperty {tags}
+\definesongproperty {counter}
+\definesongproperty {ID}
+
+% properties that should take the value of another property if they're not set
+% explicitly:
+\copysongproperty {composer} {sort-composer}
+\copysongproperty {lyrics} {sort-lyrics}
+\copysongproperty {music} {sort-music}
+\copysongproperty {title} {sort-title}
+\copysongproperty {short-title} {sort-short-title}
+\copysongproperty {arr} {sort-arr}
+\copysongproperty {interpret} {sort-interpret}
+
+% --------------------------------------------------------------------------
+% defining a new song:
+\cs_new_protected:Npn \leadsheets_song_define:nn #1#2
+ {
+ \seq_if_in:NnTF \l__leadsheets_defined_songs_seq {#1}
+ { \msg_error:nnn {leadsheets} {song-defined} {#1} }
+ { \seq_put_right:Nn \l__leadsheets_defined_songs_seq {#1} }
+ \leadsheets_define_song_properties:n {#1}
+ \keys_set:nn {leadsheets/song/#1} {#2}
+ \leadsheets_set_property:nnn {#1} {ID} {#1}
+ \leadsheets_set_property:nnx {#1} {counter}
+ { \int_to_arabic:n {\g__leadsheets_song_id_int} }
+ }
+
+\cs_new_protected:Npn \leadsheets_define_song_properties:n #1
+ {
+ \seq_map_inline:Nn \l__leadsheets_song_properties_seq
+ {
+ \keys_define:nn {leadsheets/song/#1}
+ { ##1 .code:n = \leadsheets_set_property:nnn {#1} {##1} {####1} }
+ }
+ }
+
+% --------------------------------------------------------------------------
+\cs_new:Npn \leadsheets_print_song:nwn #1#2\end#3
+ {
+ \tl_clear:N \l__leadsheets_song_body_tl
+ \leadsheets_if_print_song:nT {#1}
+ {
+ \tl_set:Nn \l_leadsheets_current_song_id_tl {#1}
+ \tl_put_right:Nn \l__leadsheets_song_body_tl
+ {
+ \leadsheets_songtitle:
+ \leadsheets_check_capo:
+ \tl_use:N \l__leadsheets_songtext_format_tl
+ #2
+ }
+ }
+ \tl_if_eq:nnTF {#3} {song}
+ {
+ \leadsheets_if_print_song:nT {#1}
+ { \leadsheets_end_song:n {#1} }
+ \group_end:
+ \end{song}
+ }
+ {
+ \tl_put_right:Nn \l__leadsheets_song_body_tl { \end{#3} }
+ \__leadsheets_continue_song:nwn {#1}
+ }
+ }
+
+\cs_new:Npn \__leadsheets_continue_song:nwn #1#2\end#3
+ {
+ \leadsheets_if_print_song:nT {#1}
+ { \tl_put_right:Nn \l__leadsheets_song_body_tl {#2} }
+ \tl_if_eq:nnTF {#3} {song}
+ {
+ \leadsheets_if_print_song:nT {#1}
+ { \leadsheets_end_song:n {#1} }
+ \group_end:
+ \end{song}
+ }
+ {
+ \tl_put_right:Nn \l__leadsheets_song_body_tl { \end{#3} }
+ \__leadsheets_continue_song:nwn {#1}
+ }
+ }
+
+\cs_new:Npn \leadsheets_end_song:n #1
+ {
+ \bool_set_true:N \l__leadsheets_measuring_bool
+ \leadsheets_reset_counters:
+ \box_clear:N \l__leadsheets_tmpa_box
+ \vbox_set:NV \l__leadsheets_tmpa_box \l__leadsheets_song_body_tl
+ \leadsheets_set_property:nnx {#1} {height}
+ {
+ \dim_to_decimal:n
+ {
+ \box_ht:N \l__leadsheets_tmpa_box +
+ \box_dp:N \l__leadsheets_tmpa_box
+ }
+ pt
+ }
+ \bool_set_false:N \l__leadsheets_measuring_bool
+ \leadsheets_reset_counters:
+ \tl_use:N \l__leadsheets_song_body_tl
+ }
+
+\cs_new_protected:Npn \leadsheets_add_to_reset:n #1
+ { \seq_put_right:Nn \l__leadsheets_reset_counters_seq {#1} }
+
+\cs_new_protected:Npn \leadsheets_reset_counters:
+ {
+ \seq_map_inline:Nn \l__leadsheets_reset_counters_seq
+ { \setcounter {##1} {0} }
+ }
+
+\prg_new_conditional:Npnn \leadsheets_if_print_song:n #1 {T,F,TF}
+ {
+ \seq_if_in:NnTF \l__leadsheets_songs_print_seq {#1}
+ { \prg_return_true: }
+ { \prg_return_false: }
+ }
+
+\cs_new_protected:Npn \leadsheets_check_print:n #1
+ {
+ \leadsheets_if_print_tags:nT {#1}
+ { \seq_put_right:Nn \l__leadsheets_songs_print_seq {#1} }
+ }
+
+\prg_new_protected_conditional:Npnn \leadsheets_if_print_tags:n #1 {T,F,TF}
+ {
+ \bool_if:NTF \l__leadsheets_print_selected_bool
+ {
+ \leadsheets_if_property:nnTF {#1} {tags}
+ {
+ \bool_set_false:N \l__leadsheets_tmpa_bool
+ \tl_set:Nx \l__leadsheets_tmpa_tl
+ { \leadsheets_get_property:nn {#1} {tags} }
+ \clist_map_inline:Nn \l__leadsheets_print_tags_clist
+ {
+ \clist_if_in:NnT \l__leadsheets_tmpa_tl {##1}
+ {
+ \bool_set_true:N \l__leadsheets_tmpa_bool
+ \clist_map_break:
+ }
+ }
+ \bool_if:NTF \l__leadsheets_tmpa_bool
+ { \prg_return_true: }
+ { \prg_return_false: }
+ }
+ { \prg_return_false: }
+ }
+ { \prg_return_true: }
+ }
+
+\keys_define:nn { leadsheets }
+ {
+ print-tags .code:n =
+ \bool_set_true:N \l__leadsheets_print_selected_bool
+ \clist_set:Nn \l__leadsheets_print_tags_clist {#1}
+ }
+
+% --------------------------------------------------------------------------
+% predefined title templates
+\definesongtitletemplate {minimal}
+ { \section*{ \songproperty {title} } }
+
+\definesongtitletemplate {tabular}
+ {
+ \ifsongmeasuring
+ { \section* }
+ { \section }
+ { \songproperty {title} }
+ \begingroup\footnotesize
+ \begin{tabular}{
+ @{}
+ >{\raggedright\arraybackslash}p{.5\linewidth}
+ @{}
+ >{\raggedleft\arraybackslash}p{.5\linewidth}
+ @{}
+ }
+ \ifsongproperty{interpret}
+ {\GetTranslation{leadsheets/interpret}}
+ {}
+ \ifsongproperty{composer}
+ {
+ & \GetTranslation{leadsheets/composer}:~
+ \printsongpropertylist{composer}{~\&~}{,~}{~\&~}
+ \ifsongproperty{lyrics}
+ {\\ & \GetTranslation{leadsheets/lyrics}:~
+ \printsongpropertylist{lyrics}{~\&~}{,~}{~\&~}
+ }
+ {}
+ }
+ {}
+ \ifsongproperty{interpret}{\\}{\ifsongproperty{composer}{\\}{}}
+ \ifsongproperty{genre}
+ {& Genre:~ \songproperty{genre} \\}
+ {}
+ \ifsongproperty{tempo}
+ {& Tempo:~ \songproperty{tempo} \\}
+ {}
+ \ifsongproperty{key}
+ {
+ &
+ \setchordnames{
+ major = -\GetTranslation{leadsheets/major} ,
+ minor = -\GetTranslation{leadsheets/minor}
+ }
+ \GetTranslation{leadsheets/key}:~
+ \expandcode{\writechord{\songproperty{key}}} \\
+ }
+ {}
+ \end{tabular}
+ \par\endgroup
+ }
+
+% --------------------------------------------------------------------------
+% capo settings:
+\cs_new_protected:Npn \leadsheets_check_capo:
+ {
+ \leadsheets_if_property:VnTF \l_leadsheets_current_song_id_tl {capo}
+ {
+ \int_set:Nn \l__leadsheets_capo_int
+ { \leadsheets_get_property:Vn \l_leadsheets_current_song_id_tl {capo} }
+ }
+ { \int_zero:N \l__leadsheets_capo_int }
+ \int_set:Nn \l__leadsheets_transpose_steps_int
+ {
+ \bool_if:NTF \l__leadsheets_transpose_bool
+ { \l__leadsheets_transpose_steps_int }
+ {12}
+ - \l__leadsheets_capo_int
+ }
+ }
+
+\cs_new:Npn \leadsheets_capo_number_print:n #1 {#1.}
+
+\cs_new_protected:Npn \leadsheets_capo:
+ {
+ \leadsheets_if_property:VnT \l_leadsheets_current_song_id_tl {capo}
+ {
+ \leadsheets_translation:n {capo} :~
+ \leadsheets_capo_number_print:n
+ {
+ \use:c {int_to_ \l__leadsheets_capo_number_format_tl :n}
+ { \l__leadsheets_capo_int }
+ }
+ \nobreakspace
+ \leadsheets_translation:n {fret}
+ }
+ }
+
+\NewDocumentCommand \capo {} { \leadsheets_capo: }
+
+% --------------------------------------------------------------------------
+% verses and the like:
+\cs_new_protected:Npn \leadsheets_verse_label:n #1
+ {
+ \bool_if:cF {l__leadsheets_#1_empty_bool}
+ {
+ \tl_use:c {l__leadsheets_#1_label_format_tl}
+ \bool_if:cT {l__leadsheets_#1_named_bool}
+ {
+ \leadsheets_translation:n {#1}
+ \bool_if:cT {l__leadsheets_#1_numbered_bool} { ~ }
+ }
+ \bool_if:cT {l__leadsheets_#1_numbered_bool}
+ { \use:c {the#1} }
+ \tl_use:c {l__leadsheets_#1_after_label_tl}
+ }
+ }
+
+\cs_new_protected:Npn \leadsheets_verse_begin:n #1
+ {
+ \stepcounter {#1}
+ \tl_set:Nn \verselabel { \leadsheets_verse_label:n {#1} }
+ \tl_set:Nn \verselabelformat
+ { \tl_use:c {l__leadsheets_#1_label_format_tl} }
+ \tl_set:Nn \versenumber { \use:c {the#1} }
+ \tl_set:Nn \verseafterlabel { \tl_use:c {l__leadsheets_#1_after_label_tl} }
+ \tl_set:Nn \versename { \leadsheets_translation:n {#1} }
+ \tl_set:Nn \ifversestarred { \bool_if:cTF {l__leadsheets_#1_empty_bool} }
+ \tl_set:Nn \ifversenamed { \bool_if:cTF {l__leadsheets_#1_named_bool} }
+ \tl_set:Nn \ifversenumbered
+ { \bool_if:cTF {l__leadsheets_#1_numbered_bool} }
+ \leadsheets_obey_lines:
+ \leadsheets_use_verse_template:nn {begin} {#1}
+ }
+
+\cs_new_protected:Npn \leadsheets_verse_end:n #1
+ {
+ \leadsheets_ignore_lines:
+ \leadsheets_use_verse_template:nn {end} {#1}
+ \ignorespacesafterend
+ }
+
+\cs_new_protected:Npn \leadsheets_new_verse_type:Nnn #1#2#3
+ {
+ \bool_new:c {l__leadsheets_#2_empty_bool}
+ \bool_new:c {l__leadsheets_#2_numbered_bool}
+ \bool_new:c {l__leadsheets_#2_named_bool}
+ \bool_set_true:c {l__leadsheets_#2_named_bool}
+ \bool_if:NTF #1
+ { \bool_set_true:c {l__leadsheets_#2_empty_bool} }
+ { \bool_set_false:c {l__leadsheets_#2_empty_bool} }
+ \tl_new:c {l__leadsheets_#2_format_tl}
+ \tl_new:c {l__leadsheets_#2_template_tl}
+ \tl_new:c {l__leadsheets_#2_label_format_tl}
+ \tl_new:c {l__leadsheets_#2_after_label_tl}
+ \newcounter {#2}
+ \leadsheets_add_to_reset:n {#2}
+ \tl_set:cn {the#2} { \arabic {#2} . }
+ \keys_define:nn {leadsheets/#2}
+ {
+ numbered .bool_set:c = {l__leadsheets_#2_numbered_bool} ,
+ named .bool_set:c = {l__leadsheets_#2_named_bool} ,
+ format .code:n =
+ \tl_set:cn {l__leadsheets_#2_format_tl} {##1} ,
+ format .initial:n = \l__leadsheets_verses_format_tl ,
+ label-format .code:n =
+ \tl_set:cn {l__leadsheets_#2_label_format_tl} {##1} ,
+ label-format .initial:n = \l__leadsheets_verses_label_format_tl ,
+ after-label .code:n =
+ \tl_set:cn {l__leadsheets_#2_after_label_tl} {##1} ,
+ after-label .initial:n = \l__leadsheets_verses_after_label_tl ,
+ template .code:n =
+ \tl_set:cn {l__leadsheets_#2_template_tl} {##1} ,
+ template .initial:n = itemize ,
+ recall-chords .tl_set:N = \l__leadsheets_recall_verse_type_tl ,
+ name .code:n =
+ \@trnslt@declare@translation {leadsheets/#2} {fallback} {##1}
+ \@trnslt@declare@translation {leadsheets/#2} {English} {##1}
+ }
+ \NewDocumentEnvironment {#2} {O{}}
+ {
+ \par
+ \tl_set:Nn \l_leadsheets_verse_type_tl {#2}
+ \tl_set:Nn \l__leadsheets_recall_verse_type_tl {#2}
+ \keys_set:nn {leadsheets/#2} {##1}
+ \leadsheets_if_record_chords:T
+ { \seq_clear:N \l__leadsheets_chords_sequences_seq }
+ \leadsheets_if_recall_chords:T
+ {
+ \prop_get:NVN
+ \g__leadsheets_chords_sequences_prop
+ \l__leadsheets_recall_verse_type_tl
+ \l__leadsheets_tmpa_tl
+ \seq_clear:N \l__leadsheets_chords_sequences_seq
+ \tl_map_inline:Nn \l__leadsheets_tmpa_tl
+ { \seq_put_right:Nn \l__leadsheets_chords_sequences_seq {####1} }
+ }
+ \leadsheets_verse_begin:n {#2}
+ \tl_use:c {l__leadsheets_#2_format_tl}
+ }
+ {
+ \leadsheets_if_record_chords:T
+ {
+ \prop_gput:NVf \g__leadsheets_chords_sequences_prop
+ \l_leadsheets_verse_type_tl
+ { \seq_use:Nn \l__leadsheets_chords_sequences_seq {} }
+ }
+ \leadsheets_verse_end:n {#2}
+ \par
+ }
+ \@trnslt@declare@translation {leadsheets/#2} {fallback} {}
+ \@trnslt@declare@translation {leadsheets/#2} {English} {}
+ \keys_set:nn {leadsheets/#2} {#3}
+ }
+
+\NewDocumentCommand \newversetype {smO{}}
+ { \leadsheets_new_verse_type:Nnn #1 {#2} {#3} }
+
+\cs_undefine:N \verse
+\cs_undefine:N \endverse
+
+\newversetype {verse} [ name=Verse, named=false, after-label= ]
+\newversetype*{verse*}
+\newversetype {chorus} [ name=Chorus ]
+\newversetype*{chorus*}
+\newversetype {intro} [ name=Intro ]
+\newversetype*{intro*} [ name=Intro ]
+\newversetype {outro} [ name=Outro ]
+\newversetype {interlude} [ name=Interlude ]
+\newversetype {bridge} [ name=Bridge ]
+\newversetype*{info}
+\newversetype*{solo*}
+\newversetype {solo} [ name=Solo ]
+
+% --------------------------------------------------------------------------
+% predefined verse templates:
+\defineversetypetemplate {itemize}
+ {
+ \itemize
+ \int_zero:N \@itemdepth
+ \bool_if:NT \l__leadsheets_obey_lines_bool
+ {
+ \dim_zero:N \parskip
+ \keys_set:nn {leadsheets}
+ { obey-lines-parskip = \parsep }
+ }
+ \item[{\verselabel}]
+ }
+ { \enditemize }
+
+% --------------------------------------------------------------------------
+
+\keys_define:nn { leadsheets }
+ {
+ title-template .tl_set:N = \l__leadsheets_songtitle_template_tl ,
+ title-template .initial:n = minimal ,
+ text-format .tl_set:N = \l__leadsheets_songtext_format_tl ,
+ song-format .tl_set:N = \l__leadsheets_song_format_tl ,
+ verse/type .choice: ,
+ verse/type/verse .code:n =
+ \tl_set:Nn \l_leadsheets_verse_type_tl {verse} ,
+ verse/type/unknown .code:n =
+ \msg_warning:nnn {leadsheets} {unknown-verse-type} {#1}
+ \tl_set:Nn \l_leadsheets_verse_type_tl {verse} ,
+ verse/format .tl_set:N = \l__leadsheets_verse_format_tl ,
+ verse/format .initial:n = \l__leadsheets_verses_format_tl ,
+ verse/label-format .tl_set:N = \l__leadsheets_verse_label_format_tl ,
+ verse/label-format .initial:n = \l__leadsheets_verses_label_format_tl ,
+ verses-format .tl_set:N = \l__leadsheets_verses_format_tl ,
+ verses-label-format .tl_set:N = \l__leadsheets_verses_label_format_tl ,
+ verses-after-label .tl_set:N = \l__leadsheets_verses_after_label_tl ,
+ obey-lines .bool_set:N = \l__leadsheets_obey_lines_bool ,
+ obey-lines-parskip .skip_set:N = \l__leadsheets_obey_parskip_skip ,
+ bar-shortcuts .bool_set:N = \l__leadsheets_bar_shorthands_bool ,
+ capo-nr-format .choices:nn =
+ { arabic , roman , Roman }
+ { \tl_set:NV \l__leadsheets_capo_number_format_tl \l_keys_choice_tl } ,
+ capo-nr-format .initial:n = {Roman} ,
+ capo-nr .code:n =
+ \cs_set_protected:Npn \leadsheets_capo_number_print:n ##1 {#1} ,
+ capo-nr .initial:n = #1.
+ }
+
+\endinput
diff --git a/Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.templates.code.tex b/Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.templates.code.tex
new file mode 100644
index 00000000000..618350e1deb
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.templates.code.tex
@@ -0,0 +1,87 @@
+\LeadsheetsExplLibrary{templates}
+ {2014/08/10 template mechanism for song titles and verses}
+
+\msg_new:nnn {leadsheets} {unknown-template}
+ { Unknown~ #1~ template~ `#2'~ \msg_line_context: }
+
+\tl_new:N \l__leadsheets_songtitle_template_tl
+\prop_new:N \l__leadsheets_songtitle_template_prop
+
+\NewDocumentCommand \songtitle {} { \leadsheets_songtitle: }
+
+% the following is shamelessly adapted from the `needspace' package by
+% Peter Wilson and Herries Press:
+\cs_new:Npn \leadsheets_needspace:n #1
+ {
+ \group_begin:
+ \dim_set:Nn \l__leadsheets_tmpa_dim { #1 }
+ \skip_vertical:n { \c_zero_dim + \l__leadsheets_tmpa_dim }
+ \tex_penalty:D -100
+ \skip_vertical:n { \c_zero_dim - \l__leadsheets_tmpa_dim }
+ \skip_vertical:N \l__leadsheets_tmpa_dim
+ \tex_penalty:D 9999
+ \skip_vertical:n { - \l__leadsheets_tmpa_dim }
+ \skip_vertical:N \c_zero_dim
+ \group_end:
+ }
+
+\cs_new_protected:Npn \leadsheets_songtitle:
+ {
+ \leadsheets_use_songtitle_template:V \l__leadsheets_songtitle_template_tl
+ \leadsheets_needspace:n { 3\baselineskip }
+ }
+
+\cs_new_protected:Npn \leadsheets_use_songtitle_template:n #1
+ {
+ \prop_get:NnNTF \l__leadsheets_songtitle_template_prop
+ {#1}
+ \l__leadsheets_tmpa_tl
+ { \l__leadsheets_tmpa_tl }
+ { \msg_error:nnnn {leadsheets} {unknown-template} {songtitle} {#1} }
+ }
+\cs_generate_variant:Nn \leadsheets_use_songtitle_template:n { V }
+
+\cs_new_protected:Npn \leadsheets_define_songtitle_template:nn #1#2
+ { \prop_put:Nnn \l__leadsheets_songtitle_template_prop {#1} {#2} }
+
+
+\NewDocumentCommand \definesongtitletemplate {m+m}
+ { \leadsheets_define_songtitle_template:nn {#1} {#2} }
+
+\NewDocumentCommand \expandcode {+m} { \use:x {#1} }
+
+
+% verse-type templates
+\prop_new:N \l__leadsheets_verse_begin_template_prop
+\prop_new:N \l__leadsheets_verse_end_template_prop
+
+% #1: template name
+% #2: begin code
+% #3: end code
+\cs_new_protected:Npn \leadsheets_define_verse_template:nnn #1#2#3
+ {
+ \prop_put:Nnn \l__leadsheets_verse_begin_template_prop {#1} {#2}
+ \prop_put:Nnn \l__leadsheets_verse_end_template_prop {#1} {#3}
+ }
+
+\cs_new_protected:Npn \leadsheets_use_verse_template:nn #1#2
+ {
+ \exp_args:Nnc
+ \prop_get:cVNTF {l__leadsheets_verse_#1_template_prop}
+ {l__leadsheets_#2_template_tl}
+ \l__leadsheets_tmpa_tl
+ { \tl_use:N \l__leadsheets_tmpa_tl }
+ {
+ \msg_error:nnxx {leadsheets} {unknown-template}
+ {verse-type}
+ {\use:c{l__leadsheets_#2_template_tl}}
+ }
+ }
+
+\DeclareExpandableDocumentCommand \ifobeylines {}
+ { \bool_if:NTF \l__leadsheets_obey_lines_bool }
+
+\NewDocumentCommand \defineversetypetemplate {m+m+m}
+ { \leadsheets_define_verse_template:nnn {#1} {#2} {#3} }
+
+\endinput
diff --git a/Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.translations.code.tex b/Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.translations.code.tex
new file mode 100644
index 00000000000..afbb8d0a1ec
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.translations.code.tex
@@ -0,0 +1,45 @@
+\LeadsheetsExplLibrary{translations}{2014/08/10 dictionary for leadsheets}
+
+\cs_new:Npn \leadsheets_translation:n #1
+ { \GetTranslation{leadsheets/#1} }
+\cs_generate_variant:Nn \leadsheets_translation:n { V }
+
+\DeclareTranslation {German} {leadsheets/chorus} {Refrain}
+\DeclareTranslation {German} {leadsheets/verse} {Strophe}
+
+\DeclareTranslationFallback {leadsheets/composer} {Composer}
+\DeclareTranslation {English} {leadsheets/composer} {Composer}
+\DeclareTranslation {German} {leadsheets/composer} {Komponist}
+
+\DeclareTranslationFallback {leadsheets/lyrics} {Lyrics}
+\DeclareTranslation {English} {leadsheets/lyrics} {Lyrics}
+\DeclareTranslation {German} {leadsheets/lyrics} {Text}
+
+\DeclareTranslationFallback {leadsheets/key} {Key}
+\DeclareTranslation {English} {leadsheets/key} {Key}
+\DeclareTranslation {German} {leadsheets/key} {Tonart}
+
+\DeclareTranslationFallback {leadsheets/interpret}
+ {as~ interpreted~ by~ \printsongpropertylist{interpret}{~\&~}{,~}{~\&~}}
+\DeclareTranslation {English} {leadsheets/interpret}
+ {as~ interpreted~ by~ \printsongpropertylist{interpret}{~\&~}{,~}{~\&~}}
+\DeclareTranslation {German} {leadsheets/interpret}
+ {wie~ von~ \printsongpropertylist{interpret}{~\&~}{,~}{~\&~}~ interpretiert}
+
+\DeclareTranslationFallback {leadsheets/major} {major}
+\DeclareTranslation {English} {leadsheets/major} {major}
+\DeclareTranslation {German} {leadsheets/major} {Dur}
+
+\DeclareTranslationFallback {leadsheets/minor} {minor}
+\DeclareTranslation {English} {leadsheets/minor} {minor}
+\DeclareTranslation {German} {leadsheets/minor} {Moll}
+
+\DeclareTranslationFallback {leadsheets/capo} {Capo}
+\DeclareTranslation {English} {leadsheets/capo} {Capo}
+\DeclareTranslation {German} {leadsheets/capo} {Kapo}
+
+\DeclareTranslationFallback {leadsheets/fret} {fret}
+\DeclareTranslation {English} {leadsheets/fret} {fret}
+\DeclareTranslation {German} {leadsheets/fret} {Bund}
+
+\endinput
diff --git a/Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.transposing.code.tex b/Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.transposing.code.tex
new file mode 100644
index 00000000000..f70cec60748
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/leadsheets/leadsheets.library.transposing.code.tex
@@ -0,0 +1,211 @@
+\LeadsheetsExplLibrary{transposing}{2014/08/10 transposing of chord symbols}
+
+\prop_new:N \l__leadsheets_pitches_prop
+\prop_new:N \l__leadsheets_prefer_key_prop
+\seq_new:N \l__leadsheets_sharps_seq
+\seq_new:N \l__leadsheets_flats_seq
+
+\cs_new_protected:Npn \leadsheets_define_key:nnn #1#2#3
+ {
+ \seq_new:c {g__leadsheets_key_#1_#2_seq}
+ \prop_new:c {g__leadsheets_key_#1_#2_prop}
+ \seq_gset_from_clist:cn {g__leadsheets_key_#1_#2_seq} {#3}
+ }
+
+% pitches:
+\prop_put:Nnn \l__leadsheets_pitches_prop {C} {0}
+\prop_put:Nnn \l__leadsheets_pitches_prop {Cma} {0}
+\prop_put:Nnn \l__leadsheets_pitches_prop {Ami} {0}
+\prop_put:Nnn \l__leadsheets_pitches_prop {C#} {1}
+\prop_put:Nnn \l__leadsheets_pitches_prop {C#ma} {1}
+\prop_put:Nnn \l__leadsheets_pitches_prop {A#mi} {1}
+\prop_put:Nnn \l__leadsheets_pitches_prop {Db} {1}
+\prop_put:Nnn \l__leadsheets_pitches_prop {Dbma} {1}
+\prop_put:Nnn \l__leadsheets_pitches_prop {Bbmi} {1}
+\prop_put:Nnn \l__leadsheets_pitches_prop {D} {2}
+\prop_put:Nnn \l__leadsheets_pitches_prop {Dma} {2}
+\prop_put:Nnn \l__leadsheets_pitches_prop {Bmi} {2}
+\prop_put:Nnn \l__leadsheets_pitches_prop {D#} {3}
+\prop_put:Nnn \l__leadsheets_pitches_prop {D#ma} {3}
+\prop_put:Nnn \l__leadsheets_pitches_prop {F#mi} {3}
+\prop_put:Nnn \l__leadsheets_pitches_prop {Eb} {3}
+\prop_put:Nnn \l__leadsheets_pitches_prop {Ebma} {3}
+\prop_put:Nnn \l__leadsheets_pitches_prop {Cmi} {3}
+\prop_put:Nnn \l__leadsheets_pitches_prop {E} {4}
+\prop_put:Nnn \l__leadsheets_pitches_prop {Ema} {4}
+\prop_put:Nnn \l__leadsheets_pitches_prop {C#mi} {4}
+\prop_put:Nnn \l__leadsheets_pitches_prop {Fb} {4}
+\prop_put:Nnn \l__leadsheets_pitches_prop {Fbma} {4}
+\prop_put:Nnn \l__leadsheets_pitches_prop {Dbmi} {4}
+\prop_put:Nnn \l__leadsheets_pitches_prop {F} {5}
+\prop_put:Nnn \l__leadsheets_pitches_prop {Fma} {5}
+\prop_put:Nnn \l__leadsheets_pitches_prop {Dmi} {5}
+\prop_put:Nnn \l__leadsheets_pitches_prop {F#} {6}
+\prop_put:Nnn \l__leadsheets_pitches_prop {F#ma} {6}
+\prop_put:Nnn \l__leadsheets_pitches_prop {D#mi} {6}
+\prop_put:Nnn \l__leadsheets_pitches_prop {Gb} {6}
+\prop_put:Nnn \l__leadsheets_pitches_prop {Gbma} {6}
+\prop_put:Nnn \l__leadsheets_pitches_prop {Ebmi} {6}
+\prop_put:Nnn \l__leadsheets_pitches_prop {G} {7}
+\prop_put:Nnn \l__leadsheets_pitches_prop {Gma} {7}
+\prop_put:Nnn \l__leadsheets_pitches_prop {Emi} {7}
+\prop_put:Nnn \l__leadsheets_pitches_prop {G#} {8}
+\prop_put:Nnn \l__leadsheets_pitches_prop {G#ma} {8}
+\prop_put:Nnn \l__leadsheets_pitches_prop {E#mi} {8}
+\prop_put:Nnn \l__leadsheets_pitches_prop {Ab} {8}
+\prop_put:Nnn \l__leadsheets_pitches_prop {Abma} {8}
+\prop_put:Nnn \l__leadsheets_pitches_prop {Fmi} {8}
+\prop_put:Nnn \l__leadsheets_pitches_prop {A} {9}
+\prop_put:Nnn \l__leadsheets_pitches_prop {Ama} {9}
+\prop_put:Nnn \l__leadsheets_pitches_prop {F#mi} {9}
+\prop_put:Nnn \l__leadsheets_pitches_prop {A#} {10}
+\prop_put:Nnn \l__leadsheets_pitches_prop {A#ma} {10}
+\prop_put:Nnn \l__leadsheets_pitches_prop {F##mi} {10}
+\prop_put:Nnn \l__leadsheets_pitches_prop {Bb} {10}
+\prop_put:Nnn \l__leadsheets_pitches_prop {Bbma} {10}
+\prop_put:Nnn \l__leadsheets_pitches_prop {Gmi} {10}
+\prop_put:Nnn \l__leadsheets_pitches_prop {B} {11}
+\prop_put:Nnn \l__leadsheets_pitches_prop {Bma} {11}
+\prop_put:Nnn \l__leadsheets_pitches_prop {G#mi} {11}
+
+\seq_set_from_clist:Nn \l__leadsheets_sharps_seq
+ {C,Ami,G,Emi,D,Bmi,A,F#mi,E,C#mi,B,G#mi,F#,D#mi}
+\seq_set_from_clist:Nn \l__leadsheets_flats_seq
+ {C,Ami,F,Dmi,Bb,Gmi,Eb,Cmi,Ab,Fmi,Db,Bbmi,Gb,Ebmi}
+
+\prop_put:Nnn \l__leadsheets_prefer_key_prop {0} {sharp} % C
+\prop_put:Nnn \l__leadsheets_prefer_key_prop {1} {flat} % Db
+\prop_put:Nnn \l__leadsheets_prefer_key_prop {2} {sharp} % D
+\prop_put:Nnn \l__leadsheets_prefer_key_prop {3} {flat} % Eb
+\prop_put:Nnn \l__leadsheets_prefer_key_prop {4} {sharp} % E
+\prop_put:Nnn \l__leadsheets_prefer_key_prop {5} {flat} % F
+\prop_put:Nnn \l__leadsheets_prefer_key_prop {6} {sharp} % F#
+\prop_put:Nnn \l__leadsheets_prefer_key_prop {7} {sharp} % G
+\prop_put:Nnn \l__leadsheets_prefer_key_prop {8} {flat} % Ab
+\prop_put:Nnn \l__leadsheets_prefer_key_prop {9} {sharp} % A
+\prop_put:Nnn \l__leadsheets_prefer_key_prop {10} {flat} % Bb
+\prop_put:Nnn \l__leadsheets_prefer_key_prop {11} {sharp} % B
+
+\group_begin:
+\char_set_catcode_other:N \#
+\leadsheets_define_key:nnn {sharp} {0} {C, D, E, F, G, A, B} % C
+\leadsheets_define_key:nnn {flat} {0} {C, D, E, F, G, A, B} % C
+
+\leadsheets_define_key:nnn {sharp} {1} {C#, D#, E#, F#, G#, A#, B#} % C#
+\leadsheets_define_key:nnn {flat} {1} {Db, Eb, F, Gb, Ab, Bb, C} % Db
+
+\leadsheets_define_key:nnn {sharp} {2} {D, E, F#, G, A, B, C#} % D
+\leadsheets_define_key:nnn {flat} {2} {Ebb,Fb, Gb, Abb,Bbb,Cb, Db} % Ebb
+
+\leadsheets_define_key:nnn {sharp} {3} {D#, E#, F##,G#, A#, B#, C##}% Eb
+\leadsheets_define_key:nnn {flat} {3} {Eb, F, G, Ab, Bb, C, D} % Eb
+
+\leadsheets_define_key:nnn {sharp} {4} {E, F#, G#, A, B, C#, D#} % E
+\leadsheets_define_key:nnn {flat} {4} {Fb, Gb, Ab, Bbb,Cb, Db, Eb} % Fb
+
+\leadsheets_define_key:nnn {sharp} {5} {E#, F##,G##,A#, B#, C##,D##}% E#
+\leadsheets_define_key:nnn {flat} {5} {F, G, A, Bb, C, D, E} % F
+
+\leadsheets_define_key:nnn {sharp} {6} {F#, G#, A#, B, C#, D#, E#} % F#
+\leadsheets_define_key:nnn {flat} {6} {Gb, Ab, Bb, Cb, Db, Eb, F} % Gb
+
+\leadsheets_define_key:nnn {sharp} {7} {G, A, B, C, D, E, F#} % G
+\leadsheets_define_key:nnn {flat} {7} {Abb,Bbb,Cb, Dbb,Ebb,Fb, Gb} % Abb
+
+\leadsheets_define_key:nnn {sharp} {8} {G#, A#, B#, C#, D#, E#, F##}% G#
+\leadsheets_define_key:nnn {flat} {8} {Ab, Bb, C, Db, Eb, F, G} % Ab
+
+\leadsheets_define_key:nnn {sharp} {9} {A, B, C#, D, E, F#, G#} % A
+\leadsheets_define_key:nnn {flat} {9} {Bbb,Cb, Db, Ebb,Fb, Gb, Ab} % Bbb
+
+\leadsheets_define_key:nnn {sharp} {10} {A#, B#, C##,D#, E#, F##,G##}% A#
+\leadsheets_define_key:nnn {flat} {10} {Bb, C, D, Eb, F, G, A} % Bb
+
+\leadsheets_define_key:nnn {sharp} {11} {B, C#, D#, E, F#, G#, A#} % B
+\leadsheets_define_key:nnn {flat} {11} {Cb, Db, Eb, Fb, Gb, Ab, Bb} % Cb
+\group_end:
+
+% #1: key
+% #2: semitone steps
+% #3: chord
+\cs_new_protected:Npn \leadsheets_transpose:nnN #1#2#3
+ {
+ \int_set:Nn \l__leadsheets_tmpa_int {0}
+ % \l__leadsheets_tmpa_int holds the C pitch
+ \seq_if_in:NnTF \l__leadsheets_sharps_seq {#1}
+ { \tl_set:Nn \l__leadsheets_tmpa_tl {sharp} }
+ { \tl_set:Nn \l__leadsheets_tmpa_tl {flat} }
+ % \l__leadsheets_tmpa_tl holds the `sharp' or `flat' preference
+ \int_set:Nn \l__leadsheets_tmpb_int {#2}
+ \int_while_do:nNnn { \l__leadsheets_tmpb_int } < { 0 }
+ { \int_set:Nn \l__leadsheets_tmpb_int { \l__leadsheets_tmpb_int + 12 } }
+ % \l__leadsheets_tmpb_int holds the new pitch number relatice to C
+ \bool_if:NTF \l__leadsheets_enharmonic_bool
+ { \tl_set_eq:NN \l__leadsheets_tmpb_tl \l__leadsheets_enharmonic_tl }
+ {
+ \tl_set:Nx \l__leadsheets_tmpb_tl
+ {
+ \prop_item:NV
+ \l__leadsheets_prefer_key_prop
+ \l__leadsheets_tmpb_int
+ }
+ }
+ % \l__leadsheets_tmpb_tl holds the `sharp' or `flat' preference
+ % of the new key
+ \seq_set_split:NnV \l__leadsheets_tmpa_seq {/} #3
+ \tl_clear:N #3
+ \seq_clear:N \l__leadsheets_tmpb_seq
+ \seq_map_inline:Nn \l__leadsheets_tmpa_seq
+ {
+ \tl_set:Nn \l__leadsheets_tmpc_tl {##1} % the chord
+ \int_zero:N \l__leadsheets_tmpc_int
+ \int_zero:N \l__leadsheets_tmpc_int
+ \seq_map_inline:cn
+ {
+ g__leadsheets_key_
+ \l__leadsheets_tmpb_tl _
+ \int_to_arabic:V \l__leadsheets_tmpa_int
+ _seq
+ }
+ {
+ \int_incr:N \l__leadsheets_tmpc_int
+ \tl_if_in:NnT \l__leadsheets_tmpc_tl {####1}
+ {
+ \tl_set:Nx \l__leadsheets_tmpd_tl
+ {
+ \seq_item:cV
+ {
+ g__leadsheets_key_
+ \l__leadsheets_tmpb_tl _
+ \int_to_arabic:V \l__leadsheets_tmpb_int
+ _seq
+ }
+ \l__leadsheets_tmpc_int
+ }
+ \tl_replace_once:NnV \l__leadsheets_tmpc_tl
+ {####1}
+ \l__leadsheets_tmpd_tl
+ \seq_map_break:
+ }
+ }
+ \seq_put_right:NV \l__leadsheets_tmpb_seq \l__leadsheets_tmpc_tl
+ }
+ \tl_set:Nx #3 { \seq_use:Nn \l__leadsheets_tmpb_seq {/} }
+ }
+\cs_generate_variant:Nn \leadsheets_transpose:nnN { xV }
+
+\keys_define:nn {leadsheets}
+ {
+ transpose .code:n =
+ \bool_set_true:N \l__leadsheets_transpose_bool
+ \int_set:Nn \l__leadsheets_transpose_steps_int {#1} ,
+ transpose-capo .bool_set:N = \l__leadsheets_transpose_capo_bool ,
+ enharmonic .choices:nn =
+ { sharp , flat }
+ {
+ \tl_set_eq:NN \l__leadsheets_enharmonic_tl \l_keys_choice_tl
+ \bool_set_true:N \l__leadsheets_enharmonic_bool
+ }
+ }
+
+\endinput
diff --git a/Master/texmf-dist/tex/latex/leadsheets/leadsheets.sty b/Master/texmf-dist/tex/latex/leadsheets/leadsheets.sty
new file mode 100644
index 00000000000..21e744f36d0
--- /dev/null
+++ b/Master/texmf-dist/tex/latex/leadsheets/leadsheets.sty
@@ -0,0 +1,171 @@
+% --------------------------------------------------------------------------
+% required packages:
+\RequirePackage{expl3,l3keys2e,xparse,translations}
+
+% --------------------------------------------------------------------------
+% package information:
+\ExplSyntaxOn
+\tl_const:Nx \c_leadsheets_date_tl {2015/01/11}
+\tl_const:Nx \c_leadsheets_version_tl {0.1}
+\tl_const:Nx \c_leadsheets_info_tl {Typesetting leadsheets and songbooks}
+
+\ProvidesExplPackage
+ {leadsheets}
+ {\c_leadsheets_date_tl}
+ {\c_leadsheets_version_tl}
+ {\c_leadsheets_info_tl \c_space_tl (CN)}
+
+% --------------------------------------------------------------------------
+% messages:
+\msg_new:nnn {leadsheets} {library-missing}
+ {
+ You've~ requested~ the~ leadsheets~ library~ `#1'~ but~ it~ appears~ to~
+ be~ missing~ on~ your~ system.~ Maybe~ you've~ misspelled~ the~ name?~
+ Loading~ the~ library~ will~ abort~ \msg_line_context:
+ }
+
+\msg_new:nnn {leadsheets} {loading-library}
+ {
+ (leadsheets) \c_space_tl \c_space_tl \c_space_tl \c_space_tl
+ Loading~ library~ `#1'...
+ }
+
+% --------------------------------------------------------------------------
+% variants of kernel functions:
+\cs_generate_variant:Nn \tl_if_eq:nnTF { xx , V }
+\cs_generate_variant:Nn \seq_set_split:Nnn { Nnx }
+\cs_generate_variant:Nn \prop_item:Nn { NV }
+\cs_generate_variant:Nn \seq_item:Nn { cV }
+\cs_generate_variant:Nn \int_to_arabic:n { V }
+\cs_generate_variant:Nn \tl_replace_once:Nnn { NnV }
+\cs_generate_variant:Nn \prop_gput:Nnn { cxx , NVf }
+\cs_generate_variant:Nn \msg_error:nnn { nnV }
+\cs_generate_variant:Nn \msg_warning:nnn { nnV }
+\cs_generate_variant:Nn \vbox_set:Nn { NV }
+
+% --------------------------------------------------------------------------
+% temporary variables:
+\tl_new:N \l__leadsheets_tmpa_tl
+\tl_new:N \l__leadsheets_tmpb_tl
+\tl_new:N \l__leadsheets_tmpc_tl
+\tl_new:N \l__leadsheets_tmpd_tl
+\bool_new:N \l__leadsheets_tmpa_bool
+\dim_new:N \l__leadsheets_tmpa_dim
+\seq_new:N \l__leadsheets_tmpa_seq
+\seq_new:N \l__leadsheets_tmpb_seq
+\int_new:N \l__leadsheets_tmpa_int
+\int_new:N \l__leadsheets_tmpb_int
+\int_new:N \l__leadsheets_tmpc_int
+\box_new:N \l__leadsheets_tmpa_box
+
+% --------------------------------------------------------------------------
+% library mechanism:
+\tl_const:Nn \c__leadsheets_library_extension_tl {code.tex}
+\tl_const:Nn \c__leadsheets_library_prefix_tl {leadsheets.library}
+
+\cs_new_protected:Npn \leadsheets_load_libraries:n #1
+ { \clist_map_inline:nn {#1} { \leadsheets_load_library:n {##1} } }
+
+\cs_new_protected:Npn \leadsheets_load_library:n #1
+ {
+ \tl_set:Nx \l__leadsheets_tmpa_tl { \tl_trim_spaces:n {#1} }
+ \__leadsheets_load_library:V \l__leadsheets_tmpa_tl
+ }
+
+\cs_new_protected:Npn \__leadsheets_load_library:n #1
+ {
+ \cs_if_exist:cF {leadsheets-library-#1-loaded}
+ {
+ \file_if_exist:nTF
+ {\c__leadsheets_library_prefix_tl.#1.\c__leadsheets_library_extension_tl}
+ {
+ \msg_log:nnn {leadsheets} {loading-library} {#1}
+ \@onefilewithoptions
+ {\c__leadsheets_library_prefix_tl.#1}[][]
+ \c__leadsheets_library_extension_tl
+ }
+ { \msg_warning:nnn {leadsheets} {library-missing} {#1} }
+ }
+ }
+\cs_generate_variant:Nn \__leadsheets_load_library:n { V }
+
+\cs_new_protected:Npn \__leadsheets_library:nn #1#2
+ {
+ \cs_new:cpn {leadsheets-library-#1-loaded} {leadsheets:~`#1'~library}
+ \ProvidesFile
+ {\c__leadsheets_library_prefix_tl.#1.\c__leadsheets_library_extension_tl}
+ [
+ \c_leadsheets_date_tl
+ \c_space_tl
+ v \c_leadsheets_version_tl
+ \c_space_tl
+ leadsheets~ library~ `#1'~ #2
+ ]
+ }
+
+% --------------------------------------------------------------------------
+% one of those defines a leadsheets library, either using expl syntax or 2e
+% package syntax:
+\NewDocumentCommand \LeadsheetsExplLibrary {mm}
+ { \__leadsheets_library:nn {#1} {#2} \ExplSyntaxOn }
+
+\NewDocumentCommand \LeadsheetsLibrary {mm}
+ { \__leadsheets_library:nn {#1} {#2} }
+
+% --------------------------------------------------------------------------
+% commands for loading libraries:
+\NewDocumentCommand \useleadsheetslibraries {m}
+ { \leadsheets_load_libraries:n {#1} }
+
+\NewDocumentCommand \useleadsheetslibrary {m}
+ { \leadsheets_load_library:n {#1} }
+
+% --------------------------------------------------------------------------
+% a setup command:
+\NewDocumentCommand \setleadsheets {m}
+ { \keys_set:nn {leadsheets} {#1} }
+
+% --------------------------------------------------------------------------
+% package options:
+\bool_new:N \l__leadsheets_with_options_bool
+
+\keys_define:nn {leadsheets}
+ {
+ musicsymbols .code:n =
+ \bool_set_true:N \l__leadsheets_with_options_bool
+ \leadsheets_load_library:n {musicsymbols} ,
+ chordnames .code:n =
+ \bool_set_true:N \l__leadsheets_with_options_bool
+ \leadsheets_load_library:n {chordnames} ,
+ musejazz .code:n =
+ \bool_set_true:N \l__leadsheets_with_options_bool
+ \leadsheets_load_library:n {musejazz} ,
+ songs .code:n =
+ \bool_set_true:N \l__leadsheets_with_options_bool
+ \leadsheets_load_library:n {songs} ,
+ minimal .code:n =
+ \bool_set_true:N \l__leadsheets_with_options_bool ,
+ full .code:n =
+ \bool_set_true:N \l__leadsheets_with_options_bool
+ \leadsheets_load_libraries:n
+ {
+ musicsymbols ,
+ chordnames ,
+ songs ,
+ chords ,
+ shorthands ,
+ properties ,
+ transposing ,
+ templates ,
+ translations
+ }
+ }
+\ProcessKeysOptions{leadsheets}
+
+\bool_if:NF \l__leadsheets_with_options_bool
+ { \leadsheets_load_library:n {songs} }
+
+
+% --------------------------------------------------------------------------
+\tex_endinput:D
+
diff --git a/Master/tlpkg/bin/tlpkg-ctan-check b/Master/tlpkg/bin/tlpkg-ctan-check
index 8557768cd7c..411923eaa1b 100755
--- a/Master/tlpkg/bin/tlpkg-ctan-check
+++ b/Master/tlpkg/bin/tlpkg-ctan-check
@@ -293,7 +293,8 @@ my @TLP_working = qw(
latexdemo latexdiff latexfileinfo-pkgs latexfileversion latexindent
latexmk latexmp latexpand
lato layaureo layouts lazylist
- lcd lcg lcyw leading leaflet lecturer ledmac leftidx leipzig lengthconvert
+ lcd lcg lcyw leading leadsheets leaflet
+ lecturer ledmac leftidx leipzig lengthconvert
lettre lettrine levy lewis lexikon lexref lfb lgreek lh lhcyr lhelp
libertine
libgreek librarian librebaskerville librecaslon
@@ -642,7 +643,7 @@ my @TLP_no_check = (
"pdfwin", # not on ctan, too old to worry about
"plain", # mostly our .ini files, plus well-known plain.tex
"powerdot", # stale generated files on ctan
- "ps2pkm", # binary
+ "ps2pk", # binary
"pst-ghsb", # not on ctan, replaced by pst-slpe, keep for compat
"pstools", # binary
"psutils", # binary
diff --git a/Master/tlpkg/libexec/ctan2tds b/Master/tlpkg/libexec/ctan2tds
index bfda1e31036..3326828320c 100755
--- a/Master/tlpkg/libexec/ctan2tds
+++ b/Master/tlpkg/libexec/ctan2tds
@@ -1512,6 +1512,7 @@ $standardtex='\.(.bx|cfg|sty|clo|ldf|cls|def|fd|fontspec|cmap|4ht)$';
'latex-referenz','NULL', # keep doc together
'latex4wp', 'NULL', # keep doc together
'latex4wp-it', 'NULL', # keep doc together
+ 'leadsheets', '\.library\.|' . $standardtex,
'lecturer', '(t-)?lecturer.(tex|sty)|ltr-',
'leipzig', 'leipzig\.tex|' . $standardtex,
'lettre', 'default\.ins|\.cls',
diff --git a/Master/tlpkg/tlpsrc/collection-music.tlpsrc b/Master/tlpkg/tlpsrc/collection-music.tlpsrc
index 8ba228004da..cd33fa37fa8 100644
--- a/Master/tlpkg/tlpsrc/collection-music.tlpsrc
+++ b/Master/tlpkg/tlpsrc/collection-music.tlpsrc
@@ -12,6 +12,7 @@ depend gtrcrd
depend guitar
depend guitarchordschemes
depend harmony
+depend leadsheets
depend lilyglyphs
depend m-tx
depend musixguit
diff --git a/Master/tlpkg/tlpsrc/leadsheets.tlpsrc b/Master/tlpkg/tlpsrc/leadsheets.tlpsrc
new file mode 100644
index 00000000000..e69de29bb2d
--- /dev/null
+++ b/Master/tlpkg/tlpsrc/leadsheets.tlpsrc