]> git.donarmstrong.com Git - lilypond.git/blob - ly/params-init.ly
* GNUmakefile.in: config.h message fix.
[lilypond.git] / ly / params-init.ly
1 \version "1.5.68"
2 % JUNKME.
3
4 %% deprecated
5 papersizename = \papersize 
6
7 % DO NOT change this without fixing -f ps output
8 papersize = \papersize
9
10 % FIXME
11 % direct PostScript line height for single line staves
12 lineheight = 14
13
14 paperfile = \papersize + "-init.ly"
15
16 % paperfile = "a4-init.ly"
17
18 \include \paperfile
19 \include "paper-init.ly"
20
21 staffspace = #(/ staffheight 4.0)
22 linethickness = #(/ staffspace  10.0)
23 outputscale =  #(/ staffheight 4.0)
24 ledgerlinethickness = #(* 2.0 linethickness)
25
26
27
28 % blotdiameter = 0.4 \pt
29 blotdiameter = 0.04 \pt
30 interscoreline = 4. \mm
31
32
33 \translator { \NoteNamesContext }
34 \translator { \ScoreContext }
35 \translator { \ChoirStaffContext}
36 \translator { \InnerChoirStaffContext}
37
38 \translator { \RhythmicStaffContext}
39 \translator { \StaffContext }
40 \translator { \VoiceContext}
41 \translator { \StaffGroupContext }
42 \translator { \InnerStaffGroupContext }
43 \translator { \ChordNamesContext }
44 \translator { \GrandStaffContext}
45 \translator { \LyricsContext }
46 \translator { \ThreadContext}
47 \translator { \PianoStaffContext}
48 \translator { \LyricsVoiceContext }
49 \translator { \StaffContainerContext }
50 \translator { \FiguredBassContext }
51 \translator { \TabStaffContext }
52 \translator { \TabVoiceContext }
53
54
55
56 #(define font-defaults
57       '((font-family . music)
58         (font-relative-size . 0)
59         (font-shape . upright)
60         (font-series . medium)
61         ))
62
63 #(define style-alist
64       '((finger . ((font-family . number) (font-relative-size . -3)))
65         (volta . ((font-family . number) (font-relative-size . -2)))
66         (tuplet . ((font-family . roman) (font-shape . italic) (font-relative-size . -1)))
67
68         (timesig . ((font-family . number) ))
69         (timesig-symbol . ((font-family . music) ))
70         
71         (mmrest . ((font-family . number) ))
72         (mmrest-symbol . ((font-family . music) ))
73
74         (mark-number . ((font-family . number) (font-relative-size . 1)))
75         (mark-letter . ((font-family . roman)
76                         (font-series . bold)
77                         (font-shape . upright)
78                         (font-relative-size . 2)))
79         
80         (script . ((font-family . roman) (font-relative-size . -1)))
81         (large . ((font-family . roman) (font-relative-size . 1)))
82         (Large . ((font-series . bold) (font-family . roman)
83                   (font-relative-size . 2)))
84         (dynamic . ((font-family . dynamic) (font-relative-size . 0)))
85         ))
86 #(define properties-to-font Font_interface::properties_to_font_name)
87 #(define markup-to-properties markup-to-properties)
88 #(define abbreviation-alist
89       '((columns . ((axis . 0)))
90         (lines . ((axis . 1)))
91         (roman . ((font-family . roman)))
92         (music . ((font-family . music) (lookup . name)))
93         (finger . ((font-style . finger)))
94         (bold . ((font-series . bold)))
95         (upright . ((font-shape . upright)))
96         (italic . ((font-shape . italic)))
97         (named . ((lookup . name)))
98         (overstrike . ((extent . (0 . 0))))
99         (super . ((raise . 1) (font-relative-size . -1) (extent . (0 . 0))))
100         (sub . ((raise . -1) (font-relative-size . -1) (extent . (0 . 0))))
101         (text . ((lookup . value)))
102         )
103      )