mirror of https://github.com/patacrep/patacrep.git
Engine for LaTeX songbooks
http://www.patacrep.com
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
35 lines
597 B
35 lines
597 B
16 years ago
|
\makeatletter
|
||
|
|
|
||
|
|
\newlength{\coverheight}
|
||
|
|
\setlength{\coverheight}{2cm}
|
||
|
|
\newlength{\coverspace}
|
||
|
|
\setlength{\coverspace}{0.1cm}
|
||
|
|
\newcommand{\songcover}{}
|
||
|
|
\newsongkey{cov}{\let\songcover\@empty}{\def\songcover{#1}}
|
||
|
|
\newcommand\cover{%
|
||
|
|
\ifchorded%
|
||
|
|
\ifx\songcover\@empty\else%
|
||
|
|
\mbox{%
|
||
|
|
\includegraphics[height=\coverheight]{\songcover}%
|
||
|
|
\hspace{\coverspace}%
|
||
|
|
}%
|
||
|
|
\fi%
|
||
|
|
\fi%
|
||
|
|
}
|
||
|
|
|
||
|
|
\iflyric%
|
||
|
|
\renewcommand{\gtab}[2]{}%
|
||
|
|
\fi%
|
||
|
|
|
||
|
|
\newcommand{\image}[2]{%
|
||
|
|
\ifchorded%
|
||
|
|
\begin{flushright}%
|
||
|
|
\includegraphics[width=#2cm]{#1}%
|
||
|
|
\end{flushright}%
|
||
|
|
\fi%
|
||
|
|
}
|
||
|
|
|
||
|
|
\makeatother
|
||
|
|
|
||
|
|
|