+++ /dev/null
-%%% lilyponddefs.tex -- TeX macros for LilyPond output.
-%%%
-%%% source file of the GNU LilyPond music typesetter
-%%%
-%%% (c) 1998--2008 Jan Nieuwenhuizen <janneke@gnu.org>
-%%% Han-Wen Nienhuys <hanwen@cs.uu.nl>
-%%% Mats Bengtsson <mats.bengtsson@s3.kth.se>
-%%%
-%%
-%% Avoid \par while reading this file.
-%%
-\edef\lilyponddefsELC{\the\endlinechar}%
-\endlinechar -1\relax
-
-%% This runs with plain TeX, LaTeX, pdftex, and texinfo.
-%%
-%% To avoid interferences, lilyponddefs.tex must be loaded within a group.
-%% It is loaded only once, so the definitions must be global.
-%%
-%% The overall structure of a file created by LilyPond is as follows:
-%%
-%% <lilypond parameter definitions>
-%% <font setup>
-%% \ifx\lilypondstart \undefined
-%% \input lilyponddefs
-%% \fi
-%% \lilypondstart
-%% <note output>
-%% \lilypondend
-
-%% A temporary variable.
-%%
-\newdimen\lytempdim
-
-%% The scaling factor for all dimensions.
-%%
-\newdimen\outputscale
-
-\long\gdef\lilypondfirst#1#2{#1}
-\long\gdef\lilypondsecond#1#2{#2}
-
-%% \lilypondundefined{xxx}{foo}{bar}
-%%
-%% If `xxx' (without the leading backslash) is an undefined macro,
-%% execute block `foo'. Otherwise, execute block `bar'. Based on
-%% a similar macro from the LaTeX kernel.
-%%
-\gdef\lilypondifundefined#1{
- \expandafter\ifx\csname#1\endcsname\relax
- \expandafter\lilypondfirst
- \else
- \expandafter\lilypondsecond
- \fi
-}
-
-%% Urgh. LilyPond uses EC fonts, but texinfo is based on CM. We thus
-%% have to handle T1 font encoding by ourselves; all manipulations are
-%% collected in the macro \lilypondECencoding. Note that the following
-%% code only provides the texinfo interface, not complete access to all
-%% EC glyphs.
-%%
-%% All definitions are taken from texinfo or LaTeX (with modifications
-%% if necessary).
-%%
-\begingroup
-\catcode `\@=11\relax
-\gdef\lilypondECencoding{
- \def\"##1{
- {\accent4 ##1}}
- \def\'##1{
- {\accent1 ##1}}
- \def\,##1{
- {\leavevmode
- \setbox\z@\hbox{##1}
- \ifdim\ht\z@=1ex
- \accent11 ##1
- \else
- {\ooalign{
- \unhbox\z@
- \crcr
- \hidewidth
- \char11
- \hidewidth}}
- \fi}}
- \def\=##1{
- {\accent9 ##1}}
- \def\^##1{
- {\accent2 ##1}}
- \def\`##1{
- {\accent0 ##1}}
- \def\~##1{
- {\accent3 ##1}}
- \def\dotaccent##1{
- {\accent10 ##1}}
- \def\H##1{
- {\accent5 ##1}}
- \def\ringaccent##1{
- {\accent6 ##1}}
-% \def\tieaccent##1{} % unsupported: this is TS1
- \def\u##1{
- {\accent8 ##1}}
- \def\ubaraccent##1{
- {\o@lign{
- \relax
- ##1
- \crcr
- \hidewidth
- \sh@ft{29}\vbox to.2ex{
- \hbox{\char9}
- \vss}
- \hidewidth}}}
- \def\udotaccent##1{
- {\o@lign{
- \relax
- ##1
- \crcr
- \hidewidth
- \sh@ft{10}.
- \hidewidth}}}
- \def\v##1{
- {\accent7 ##1}}
-
- \chardef\exclamdown=189
- \chardef\questiondown=190
-
- \def\aa{
- \ringaccent{a}}
- \def\AA{
- \ringaccent{A}}
- \chardef\AE=198
- \chardef\ae=230
- \chardef\ptexi=25
- \chardef\j=26
- \chardef\L=138
- \chardef\l=170
- \chardef\O=216
- \chardef\o=248
- \chardef\OE=215
- \chardef\oe=247
- \chardef\ss=255
-}
-\endgroup
-
-%% This macro provides the necessary setup to make the lilypond data
-%% work with plain TeX, LaTeX, and texinfo.
-%%
-%% The reason of using \begingroup and \endgroup is to make the macro \x
-%% immediately disappear after it has been executed. Since we have \def
-%% within \def within \gdef, four hash signs (`#') are needed for
-%% parameters.
-%%
-%% \lilypondfontencoding is emitted by LilyPond to set the encoding of
-%% text strings.
-%%
-\gdef\lilypondstart{
- \frenchspacing
- \outputscale \lilypondpaperoutputscale\lilypondpaperunit
-
- \begingroup
- \catcode `\@=11\relax
-
- %% \@nodocument is defined as \relax after `\begin{document}'
- \lilypondifundefined{@nodocument}
- {%% Either plain TeX or texinfo or not at the beginning of LaTeX input.
- \def\x{
- \endgroup
-
- \def\lilypondfontencoding####1{
- \lilypondECencoding}
- \def\lilypondpagebreak{
- \eject}
- \def\lilypondnopagebreak{
- \ifvmode
- \penalty 10000\relax
- \fi}}}
-
- {%% LaTeX mode: Provide a complete preamble.
- \def\x{
- \endgroup
-
- %% Indicate that we shall emit `\end{document}' while executing
- %% \lilypondend.
- \def\lilyponddocument{}
-
- \def\lilypondfontencoding####1{
- \fontencoding{####1}
- \selectfont}
- \def\lilypondpagebreak{
- \newpage}
- \def\lilypondnopagebreak{
- \nopagebreak}
-
- \documentclass[\lilyponddocumentclassoptions]{article}
-
- %% As a safety guard, don't produce auxiliary files.
- \nofiles
-
- %% FIXME: workaround non-existent TeX.def.
- \def\TeXdef{TeX}\ifx\TeXdef\lilypondpaperinputencoding
- \usepackage[latin1]{inputenc}
- \else
- \usepackage[\lilypondpaperinputencoding]{inputenc}
- \fi
- \pagestyle{empty}
-
- \usepackage{color}
-
- \lilypondifundefined{lilypondclassic}
- {%% If not in `classic' mode, undo LaTeX's page layout settings
- %% since LilyPond does the layout by itself.
- \topmargin-1in
- \headheight0pt\headsep0pt
- \oddsidemargin-1in
- \evensidemargin\oddsidemargin}
-
- {%% Otherwise center output horizontally, without changing the
- %% vertical positioning.
- \hsize\lilypondpaperlinewidth\lilypondpaperunit
- \lytempdim \paperwidth
- \advance\lytempdim -\the\hsize
- \lytempdim 0.5\lytempdim
- \advance\lytempdim -1in
- \oddsidemargin \lytempdim
- \evensidemargin \lytempdim}
-
- \parindent 0pt
-
- %% We can't directly say `\begin{document}' in this macro since
- %% older versions of texinfo.tex define \begin as \outer; this
- %% means that it causes an error if \begin is found within another
- %% macro (even if the corresponding code will never be executed).
- %% As a workaround we use \csname to call \begin.
- \csname begin\endcsname{document}}}
- \x}
-
-%% The opposite of \lilypondstart.
-%%
-\gdef\lilypondend{
- %% Handle the `lastpagefill' parameter from the \layout block.
- %% Ignore it if \lilypondbook is defined.
- \lilypondifundefined{lilypondbook}
- {\lilypondifundefined{lilypondpaperlastpagefill}
- {\vskip 0pt plus\lilypondpaperinterscorelinefill00 fill}
- {}}
- {}
-
- \begingroup
- \lilypondifundefined{lilyponddocument}
- {\def\x{
- \endgroup}}
- {\def\x{
- \endgroup
- \csname end\endcsname{document}}}
- \x}
-
-%% Load the PostScript drawing routines. This is done using \special.
-%% To avoid multiple inclusions, redefine \lilypondspecial to a no-op
-%% afterwards.
-%%
-\gdef\lilypondspecial{
- \special{header=music-drawing-routines.ps}
- \gdef\lilypondspecial{}}
-
-%% The most used macro in LilyPond output. Put #3 into a zero-width box
-%% which is moved to the right by #1 (scaled by \outputscale) and moved
-%% up by #2 (also scaled by \outputscale).
-%%
-\gdef\lyitem#1#2#3{
- \raise #2\outputscale \hbox to 0pt {
- \kern #1\outputscale
- #3
- \hss}}
-
-%% All LilyPond music data is enclosed in this macro (as third argument).
-%% The data (which consists of boxes with zero width) gets an artificial
-%% width of #1 and a height of #2. The resulting box is then centered
-%% vertically along the x-height of the current font.
-%%
-%% Parameters #1 and #2 are scaled by \outputscale.
-%%
-\gdef\lybox#1#2#3{
- \lytempdim #2\outputscale
- \lytempdim -0.5\lytempdim
- \advance\lytempdim 1ex
- \leavevmode
- \raise \lytempdim \hbox to #1\outputscale {
- %% Convert depth of #3 into height only.
- \vbox to #2\outputscale {\hbox{#3}\vss}
- \hss}}
-
-%% Produce a black bar (width #2, depth #3, height #4) with a vertical
-%% offset #1. Everything is scaled by \outputscale.
-%%
-\gdef\lyvrule#1#2#3#4{
- \kern#1\outputscale
- \vrule width #2\outputscale depth #3\outputscale height #4\outputscale}
-
-%% FIXME: 'interscoreline' and 'lilypondPAPERinterscoreline
-%%
-\lilypondifundefined{lilypondpaperinterscorelinefill}
- {\gdef\lilypondpaperinterscorelinefill{0}}
- {\gdef\lilypondpaperinterscorelinefill{1}}
-
-%% Allow overriding of interscoreline, e.g., for LilyPond's --preview
-%%
-\lilypondifundefined{interscoreline}
- {\lilypondifundefined{lilypondclassic}
- {\gdef\interscoreline{}}
- {\gdef\interscoreline{
- \vskip\lilypondpaperinterscoreline\lilypondpaperunit
- plus \lilypondpaperinterscorelinefill fill}}}
- {}
-
-%% Include PostScript definitions (which are differently defined for
-%% TeX and pdfTeX). This is loaded once only because the inputted files
-%% define \lilypondpostscript.
-%%
-%% (Don't remove the spaces after the arguments to \input!)
-%%
-%
-%% In teTeX-3.0, latex is actually pdfetex, and we need
-%% ifpdf.sty to determinine if we are really *tex or pdf*tex.
-%
-%% \input ifpdf.sty
-%
-%% However, ifpfd.sty is too smart for LilyPond, so we copy the
-%% logic here. Using \input ifpdf.sty is a no-op when using latex,
-%% and the \ifpdf switch is needed before \documentclass, using
-%% \usepackage{ifpdf} is not an option.
-%
-\input lily-ps-defs
-
-% barfs with texi
-% Runaway argument?
-%{
-%! Forbidden control sequence found while scanning use of \lilypondfirst.
-%<inserted text>
-% \par
-%<to be read again>
-% \newif
-%l.330 {\newif
-% \ifpdf
-%?
-%
-%%
-%\lilypondifundefined{lilypondpostscript}
-% {\newif\ifpdf
-% \ifx\pdfoutput\undefined
-% \else
-% \ifx\pdfoutput\relax
-% \else
-% \ifcase\pdfoutput
-% \else
-% \pdftrue
-% \fi
-% \fi
-% \fi
-% \ifpdf
-% {\input lily-pdf-defs }
-% \else
-% {\input lily-ps-defs }
-% \fi}
-% {}
-%
-%% Restore newline functionality (disabled to avoid \par).
-%%
-\endlinechar \lilyponddefsELC
-\endinput
-
-%% end lilyponddefs.tex
projects / lilypond.git / blobdiff