]> git.donarmstrong.com Git - lilypond.git/blob - tex/lily-ps-defs.tex
084d51ce5515d5f0c2df0f3d3e490c61e3ed9956
[lilypond.git] / tex / lily-ps-defs.tex
1 %
2 % WARNING: don't leave blank lines in the PS-code; they are
3 % transformed into \par 
4 %
5
6 %
7 % header info (macros/defs, etc) should go into a \special{! ... }, 
8 % note the ! sign.  See dvips.info for details.
9 %
10
11 % ARG. Fix brackets
12 \def\turnOnPostScript{%
13         % This sets CTM so that you get to the currentpoint
14         % by executing a 0 0 moveto
15         \def\embeddedps##1{%
16                 \special{ps: @beginspecial @setspecial ##1 @endspecial}       
17         }
18         %
19         \special{! 
20 /stafflinethickness \mudelapaperstafflinethickness\space def
21 /interline \mudelapaperinterline\space def
22 interline 3 div /bracket_b exch def
23 interline 2 mul /bracket_w exch def
24 stafflinethickness 2 mul /bracket_t exch def
25 interline 1.5 mul /bracket_v exch def
26 bracket_v /bracket_u exch def
27 50 /bracket_alpha exch def
28 1 setlinecap}
29 }
30
31 \def\turnOnExperimentalFeatures{}
32