]> git.donarmstrong.com Git - lilypond.git/blob - input/regression/cue-clef-after-barline.ly
8f415c50b3e6e19b3a6fd618cbbf9e1e42b33a2c
[lilypond.git] / input / regression / cue-clef-after-barline.ly
1 \version "2.14.0"
2
3 instrument = \relative c' {
4   \repeat unfold 40 { c8 }
5 }
6 \addQuote "instrQuote" \instrument
7
8 Solo = \relative c' { 
9   c2 c |
10   
11   % Change the break-align-orders of the score so that cue-clef comes after bar-line
12   \override Score.BarLine #'space-alist #'cue-clef = #'(minimum-space . 1.0)
13   \override Score.BreakAlignment #'break-align-orders  =
14     ##(( ;; end-of-line:
15          left-edge cue-end-clef ambitus breathing-sign clef staff-bar
16          key-cancellation key-signature time-signature cue-clef custos)
17        ( ;; unbroken
18          left-edge cue-end-clef ambitus breathing-sign clef staff-bar
19          key-cancellation key-signature time-signature cue-clef custos)
20        ( ;; begin of line
21          left-edge ambitus breathing-sign clef key-cancellation
22          key-signature staff-bar time-signature cue-clef custos))
23
24   \cueDuringWithClef #"instrQuote" #UP #"bass" { R1 }
25   c2 c2 |
26   
27   % Revert back to default
28   \revert Score.BarLine #'(space-alist cue-clef)
29   \revert Score.BreakAlignment #'break-align-orders
30   \cueDuringWithClef #"instrQuote" #UP #"bass" { R1 }
31   c2 c2 |
32 }
33
34 \score {
35   <<
36     \new Staff \Solo
37   >>
38 }