]> git.donarmstrong.com Git - lilypond.git/blob - input/regression/instrument-switch.ly
73f6dff473073323e3d134be29c176364515373f
[lilypond.git] / input / regression / instrument-switch.ly
1
2 \header {
3
4   texidoc = "The @code{switchInstrument} music function modifies
5 properties for an in staff instrument switch. "
6   }
7
8 \version "2.9.13"
9 \addInstrumentDefinition #"bassClar"
10   #`((instrumentTransposition . ,(ly:make-pitch -1 6 FLAT))
11      (instrumentName . "bla") 
12      (shortInstrumentName . "bl")
13      (clefGlyph . "clefs.F") 
14      (middleCPosition . 6)
15      (clefPosition . 2)
16      (instrumentCueName . ,(make-bold-markup "cl. B"))
17      (midiInstrument . "clarinet"))
18
19
20 \paper {
21   ragged-right = ##t
22 }
23
24 \relative
25 {
26   c4
27   \instrumentSwitch "bassClar"
28   c2.\break
29   c1\break
30   c
31 }