]> git.donarmstrong.com Git - lilypond.git/blob - input/regression/bar-extent.ly
Doc-fr: update for 2.16.1 (second part)
[lilypond.git] / input / regression / bar-extent.ly
1 \header {
2    texidoc = "Bar line extent can be customised and the customised value
3    must be respected when staff symbol is changed temporarily (e.g. to
4    simulate ledger lines of renaissance prints and manuscripts);
5    moreover, span bars should not enter the staves."
6 }
7
8
9 \version "2.16.0"
10
11 ledgerUp =
12 {
13   s2
14   \stopStaff
15   \override Staff.StaffSymbol #'line-positions = #'(-4 -2 0 2 4 6)
16   \startStaff
17   s2
18   \noBreak
19   s2
20   \stopStaff
21   \revert Staff.StaffSymbol #'line-positions
22   \startStaff
23   s2
24 }
25
26 ledgerDown =
27 {
28   s2
29   \stopStaff
30   \override Staff.StaffSymbol #'line-positions = #'(-6 -4 -2 0 2 4)
31   \startStaff
32   s1
33   \stopStaff
34   \revert Staff.StaffSymbol #'line-positions
35   \startStaff
36   s2
37 }
38
39 \new StaffGroup
40 <<
41   \new Staff \with
42   {
43     \override BarLine #'bar-extent = #'(-1 . 1.5)
44   }
45   {
46     \ledgerUp \ledgerDown
47     s1*4
48     s1*4
49     \ledgerUp \ledgerDown
50     \ledgerUp \ledgerDown
51     \ledgerUp \ledgerDown
52     \ledgerUp \ledgerDown
53     s1*4
54     s1*4
55   }
56
57   \new Staff \with
58   {
59     \override BarLine #'bar-extent = #'(0 . 0)
60   }
61   {
62     s1*4
63     s1*4
64     \ledgerUp \ledgerDown
65     \ledgerUp \ledgerDown
66     \ledgerDown \ledgerUp
67     s1*4
68     s1*4
69     \ledgerUp \ledgerDown
70     \ledgerUp \ledgerDown
71   }
72
73   \new Staff \with
74   {
75     \override BarLine #'bar-extent = #'(-2 . 0)
76   }
77   {
78     s1*4
79     \ledgerUp \ledgerDown
80     s1*4
81     s1*4
82     s1*4
83     \ledgerUp \ledgerDown
84     \ledgerDown \ledgerUp
85     \ledgerUp \ledgerDown
86     \ledgerDown \ledgerUp
87   }
88 >>