]> git.donarmstrong.com Git - lilypond.git/blob - tex/lily-ps-defs.tex
da9907c536de0d950d32eee236e6d375a25182cc
[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 % Use of 
12 % /foo { operatorname } bind def
13 %
14 % ``compiles'' operatorname binding in the body of foo, making
15 % the code faster, and more reliable (less flexible)
16
17
18 \def\turnOnPostScript{%
19         % This sets CTM so that you get to the currentpoint
20         % by executing a 0 0 moveto
21         \def\embeddedps##1{%
22                 \special{ps: @beginspecial @setspecial ##1 @endspecial}       
23         }
24         %
25         \special{! 
26 /stafflinethickness \mudelapaperstaffline\space def
27 /interline \mudelapaperinterline\space def
28 interline 3 div /bracket_b exch def
29 interline 2 mul /bracket_w exch def
30 stafflinethickness 2 mul /bracket_t exch def
31 interline 1.5 mul /bracket_v exch def
32 bracket_v /bracket_u exch def
33 50 /bracket_alpha exch def
34 1 setlinecap}
35 }
36
37 \def\turnOnExperimentalFeatures{}
38