]> git.donarmstrong.com Git - lilypond.git/blob - ly/paper-defaults-init.ly
Introduce new handling for paper margin settings.
[lilypond.git] / ly / paper-defaults-init.ly
1 \version "2.12.0"
2
3 \paper {
4   %%% WARNING
5   %%%
6   %%% If you add any new dimensions, don't forget to update
7   %%% the dimension-variables variable.  See paper.scm.
8
9   unit = #(ly:unit)
10   mm = 1.0
11   in = 25.4
12   pt = #(/ in 72.27)
13   cm = #(* 10 mm)
14
15   print-page-number = ##t
16
17   %%
18   %% 20pt staff, 5 pt = 1.75 mm
19   %%
20
21   output-scale = #1.7573
22
23   #(define-public book-title (marked-up-title 'bookTitleMarkup))
24   #(define-public score-title (marked-up-title 'scoreTitleMarkup))
25
26   %%
27   %% ugh. hard coded?
28   %%
29
30   #(layout-set-absolute-staff-size (* 20.0 pt))
31
32
33   #(define-public score-title-properties
34      '((is-title . #t)
35        (is-book-title . #f)))
36   #(define-public book-title-properties
37      '((is-title . #t)
38        (is-book-title . #t)))
39
40   %% Note: these are not scaled; they are in staff-spaces.
41   between-system-spacing = #'((space . 12) (minimum-distance . 8) (padding . 1))
42   between-scores-system-spacing = #'((space . 14) (minimum-distance . 8) (padding . 1))
43   after-title-spacing = #'((space . 2) (padding . 0.5))
44   before-title-spacing = #'((space . 5) (padding . 0.5))
45   between-title-spacing = #'((space . 1) (padding . 0.5))
46   top-system-spacing = #'((space . 1) (padding . 1) (min-distance . 0))
47   top-title-spacing = #'((space . 1) (padding . 1) (min-distance . 0))
48   bottom-system-spacing = #'((space . 1) (padding . 1) (min-distance . 0) (stretchability . 5))
49
50   ragged-bottom = ##f
51
52   %%
53   %% looks best for shorter scores.
54   %%
55   ragged-last-bottom = ##t
56
57   %%
58   %% settings for the page breaker
59   %%
60   blank-last-page-force = 0
61   blank-after-score-page-force = 2
62   blank-page-force = 5
63
64   %%
65   %% To limit space between systems on a page with a lot of space left
66   %%
67   page-limit-inter-system-space = ##f
68   page-limit-inter-system-space-factor = 1.4
69
70   #(define font-defaults
71      '((font-encoding . fetaMusic)))
72
73   %%
74   %% the font encoding `latin1' is a dummy value for Pango fonts
75   %%
76   #(define text-font-defaults
77      `((font-encoding . latin1)
78        (baseline-skip . 3)
79        (word-space . 0.6)))
80
81   #(define page-breaking ly:optimal-breaking)
82
83   #(define make-header (marked-up-headfoot 'oddHeaderMarkup 'evenHeaderMarkup))
84   #(define make-footer (marked-up-headfoot 'oddFooterMarkup 'evenFooterMarkup))
85   #(set-paper-dimension-variables (current-module))
86
87   \include "titling-init.ly"
88
89   check-consistency = ##t
90
91   top-margin = 5 \mm
92   bottom-margin = 6 \mm
93
94   left-margin-default = 10 \mm
95   right-margin-default = 10 \mm
96
97   head-separation = 4 \mm
98   foot-separation = 4 \mm
99
100   first-page-number = #1
101   print-first-page-number = ##f
102 }