summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/gtrcrd
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2013-12-25 22:52:11 +0000
committerKarl Berry <karl@freefriends.org>2013-12-25 22:52:11 +0000
commit0fbc4eb675fc0b7886a724a7cb28faa69ada129a (patch)
tree8d2396fbf3af5fba7af8322e509c92d8e5c15a13 /Master/texmf-dist/tex/latex/gtrcrd
parent6afbf6b486c12db73726532451eb1d089025db55 (diff)
gtrcrd (25dec13)
git-svn-id: svn://tug.org/texlive/trunk@32484 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/latex/gtrcrd')
-rw-r--r--Master/texmf-dist/tex/latex/gtrcrd/gtrcrd.sty75
1 files changed, 72 insertions, 3 deletions
diff --git a/Master/texmf-dist/tex/latex/gtrcrd/gtrcrd.sty b/Master/texmf-dist/tex/latex/gtrcrd/gtrcrd.sty
index c7d331af2fc..e95c2ebdbd3 100644
--- a/Master/texmf-dist/tex/latex/gtrcrd/gtrcrd.sty
+++ b/Master/texmf-dist/tex/latex/gtrcrd/gtrcrd.sty
@@ -1,9 +1,9 @@
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% %%
%% Package name: gtrcrd %%
-%% Author: Riccardo Bresciani - gtrcrd@tex.nopkoguo.net %%
+%% Author: Riccardo Bresciani - gtrcrd@tex.nopkoguo.it %%
%% %%
-%% Copyright 2012 Riccardo Bresciani %%
+%% Copyright 2012-2013 Riccardo Bresciani %%
%% %%
%% Description: This package is suitable to add chords to lyrics. %%
%% The main advantages of using this package is that chords are %%
@@ -27,7 +27,7 @@
%% %%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-\ProvidesPackage{gtrcrd} [2012/01/15 v1.0 Guitar chords]
+\ProvidesPackage{gtrcrd} [2013/12/24 v1.1 Guitar chords]
\newlength{\wordwidth}
\newlength{\crdwidth}
@@ -45,6 +45,17 @@
\hspace{\wordwidth}%
}
+\newcommand{\chordsbelow}{%
+\renewcommand{\CHORD}[3][]{%
+\settowidth{\wordwidth}{##3}%
+\settowidth{\crdwidth}{{\crdfont ##2##1}}%
+##3%
+\hspace{-\wordwidth}\raisebox{-2.2ex}{\parbox[t][\crdheight][t]{\crdwidth}{\crdfont ##2##1}}%
+\addtolength{\wordwidth}{-\crdwidth}%
+\hspace{\wordwidth}%
+}%
+}
+
\newcommand{\crdA}[2][]{\CHORD[#1]{A}{#2}}
\newcommand{\crdB}[2][]{\CHORD[#1]{B}{#2}}
@@ -94,6 +105,56 @@
\newcommand{\crdFsm}[2][]{\CHORD[#1]{F$\sharp$m}{#2}}
\newcommand{\crdGsm}[2][]{\CHORD[#1]{G$\sharp$m}{#2}}
+\newcommand{\neolatin}{%
+\renewcommand{\crdA}[2][]{\CHORD[##1]{La}{##2}}%
+\renewcommand{\crdB}[2][]{\CHORD[##1]{Si}{##2}}%
+\renewcommand{\crdC}[2][]{\CHORD[##1]{Do}{##2}}%
+\renewcommand{\crdD}[2][]{\CHORD[##1]{Re}{##2}}%
+\renewcommand{\crdE}[2][]{\CHORD[##1]{Mi}{##2}}%
+\renewcommand{\crdF}[2][]{\CHORD[##1]{Fa}{##2}}%
+\renewcommand{\crdG}[2][]{\CHORD[##1]{Sol}{##2}}%
+%
+\renewcommand{\crdAm}[2][]{\CHORD[##1]{Lam}{##2}}%
+\renewcommand{\crdBm}[2][]{\CHORD[##1]{Sim}{##2}}%
+\renewcommand{\crdCm}[2][]{\CHORD[##1]{Dom}{##2}}%
+\renewcommand{\crdDm}[2][]{\CHORD[##1]{Rem}{##2}}%
+\renewcommand{\crdEm}[2][]{\CHORD[##1]{Mim}{##2}}%
+\renewcommand{\crdFm}[2][]{\CHORD[##1]{Fam}{##2}}%
+\renewcommand{\crdGm}[2][]{\CHORD[##1]{Solm}{##2}}%
+%
+\renewcommand{\crdAb}[2][]{\CHORD[##1]{La$\flat$}{##2}}%
+\renewcommand{\crdBb}[2][]{\CHORD[##1]{Si$\flat$}{##2}}%
+\renewcommand{\crdCb}[2][]{\CHORD[##1]{Do$\flat$}{##2}}%
+\renewcommand{\crdDb}[2][]{\CHORD[##1]{Re$\flat$}{##2}}%
+\renewcommand{\crdEb}[2][]{\CHORD[##1]{Mi$\flat$}{##2}}%
+\renewcommand{\crdFb}[2][]{\CHORD[##1]{Fa$\flat$}{##2}}%
+\renewcommand{\crdGb}[2][]{\CHORD[##1]{Sol$\flat$}{##2}}%
+%
+\renewcommand{\crdAbm}[2][]{\CHORD[##1]{La$\flat$m}{##2}}%
+\renewcommand{\crdBbm}[2][]{\CHORD[##1]{Si$\flat$m}{##2}}%
+\renewcommand{\crdCbm}[2][]{\CHORD[##1]{Do$\flat$m}{##2}}%
+\renewcommand{\crdDbm}[2][]{\CHORD[##1]{Re$\flat$m}{##2}}%
+\renewcommand{\crdEbm}[2][]{\CHORD[##1]{Mi$\flat$m}{##2}}%
+\renewcommand{\crdFbm}[2][]{\CHORD[##1]{Fa$\flat$m}{##2}}%
+\renewcommand{\crdGbm}[2][]{\CHORD[##1]{Sol$\flat$m}{##2}}%
+%
+\renewcommand{\crdAs}[2][]{\CHORD[##1]{La$\sharp$}{##2}}%
+\renewcommand{\crdBs}[2][]{\CHORD[##1]{Si$\sharp$}{##2}}%
+\renewcommand{\crdCs}[2][]{\CHORD[##1]{Do$\sharp$}{##2}}%
+\renewcommand{\crdDs}[2][]{\CHORD[##1]{Re$\sharp$}{##2}}%
+\renewcommand{\crdEs}[2][]{\CHORD[##1]{Mi$\sharp$}{##2}}%
+\renewcommand{\crdFs}[2][]{\CHORD[##1]{Fa$\sharp$}{##2}}%
+\renewcommand{\crdGs}[2][]{\CHORD[##1]{Sol$\sharp$}{##2}}%
+%
+\renewcommand{\crdAsm}[2][]{\CHORD[##1]{La$\sharp$m}{##2}}%
+\renewcommand{\crdBsm}[2][]{\CHORD[##1]{Si$\sharp$m}{##2}}%
+\renewcommand{\crdCsm}[2][]{\CHORD[##1]{Do$\sharp$m}{##2}}%
+\renewcommand{\crdDsm}[2][]{\CHORD[##1]{Re$\sharp$m}{##2}}%
+\renewcommand{\crdEsm}[2][]{\CHORD[##1]{Mi$\sharp$m}{##2}}%
+\renewcommand{\crdFsm}[2][]{\CHORD[##1]{Fa$\sharp$m}{##2}}%
+\renewcommand{\crdGsm}[2][]{\CHORD[##1]{Sol$\sharp$m}{##2}}%
+}
+
\newcommand{\notranspose}{
\let\A\crdA
\let\B\crdB
@@ -808,5 +869,13 @@
\normalize
}
+\DeclareOption{chordsbelow}{
+\chordsbelow
+}
+
+\DeclareOption{neolatin}{
+\neolatin
+}
+
\ExecuteOptions{notranspose}
\ProcessOptions \ No newline at end of file