]> git.donarmstrong.com Git - lilypond.git/blob - input/regression/typography-demo.ly
Issue 4204: Convert ly::time-signature::print from C++ to Scheme.
[lilypond.git] / input / regression / typography-demo.ly
1 \header {
2   title = "LilyPond demo"
3   enteredby="Han-Wen Nienhuys"
4   maintainer="hanwen@xs4all.nl"
5
6   texidoc = "
7 heavily mutilated Edition Peters Morgenlied by Schubert"
8
9 }
10
11 \version "2.19.12"
12 #(ly:expect-warning (_ "(De)crescendo with unspecified starting volume in MIDI."))
13
14 ignoreMelisma = \set ignoreMelismata = ##t
15 ignoreMelismaOff = \unset ignoreMelismata 
16
17 #(set-global-staff-size 21)
18
19 \paper  {
20                                 %#(set-global-staff-size (* 5.8 mm))
21   indent = #(* mm 4)
22   line-width = #(* mm 140)
23   system-system-spacing.basic-distance = #10.3
24   ragged-bottom = ##t 
25 }
26
27 modernAccidentals = {
28   \set Staff.extraNatural =  ##f
29   \set Staff.autoAccidentals =  #'(Staff (same-octave . 1) (any-octave . 0))
30   \set Staff.autoCautionaries =  #'()  
31 }
32
33
34 melody =    \relative c'' \repeat volta 2 \context Voice = "singer" {
35   \time 6/8
36   \autoBeamOff
37   << s2.^\markup {  \larger \line { \hspace #-3.1 Lieblich, etwas geschwind } }
38      R2.
39   >>
40   r4 r8 c4 g8 |
41   \acciaccatura { f16 }  e4 c8
42   <<
43     \new Voice { \stemUp f8. g16 }
44     { \stemDown f8.[ g16] } >> \stemNeutral a8 |
45   fis4  g8 c16[ b a g] f[ e] |
46   d4 f8
47   \transpose a' e' \relative c'' { a16[ g fis! g] f![ d]  } |
48   g4. r8 gis gis |
49   a4 a16.[ b32] c8[( a]) fis8 |
50   g4.~ 8-\fermata
51 }
52
53
54 firstVerse = \lyricmode {
55   \set stanza = "1."
56   
57   Sü -- ßes Licht! Aus
58   \ignoreMelisma
59   gol --
60   \ignoreMelismaOff
61
62   de -- nen  Pfor -- ten brichst du __ | 
63   sie -- gend durch __ die Nacht. Schö -- ner Tag, du __ bist er -- wacht. __ 
64 }
65
66 secondVerse = \lyricmode {
67   \set stanza = "2."
68   いろはに כיף та та ほへど ちり  ぬるを
69   
70   Жъл  дю ля זה
71   
72   いろ はに כיף та та ほへ ちり ぬる
73   
74   Жъл дю ля __
75
76 }
77
78 pianoRH =  \relative c''' \repeat volta 2\new Voice {
79   \accidentalStyle modern
80   \voiceOne
81   g16( fis a g fis g f e d c b
82   \oneVoice
83   a ) | 
84   <g e>8( <es fis a> <d e bes'> <c e c'>\arpeggio) r8 r | 
85   r8 c'( e,) f r a |
86   \once \override DynamicLineSpanner.padding =#3
87   r8
88   << { fis( g) } \\
89      << { a4 } { s8\> s8\! } >>
90    >>
91
92   r8 <e c g>8[  <e c g>] |
93   <d c a>4. r8 \clef bass  <d b f> <d b f> |
94                 \crescTextCresc
95                 e,16_" "\<
96                 g c g e g d gis b gis d gis |
97                 c, e a e c e a,-\f\! d fis d a d |
98                 b d g  d b g e16. r32\fermata
99               }
100
101 pianoLH =  \relative c'' \repeat volta 2\new Voice {
102     \accidentalStyle modern
103     \voiceTwo
104     g16( fis a g fis g
105
106     f e d c b
107
108     \change Staff = down
109         \oneVoice
110     d,) | 
111      g4.( b,8) r r
112     \clef treble \grace s16 r8 <bes'>8-> <bes c>8->([ <a c>)] r <f c'> |
113     \clef bass
114     r8 dis( e) r c c |
115     f,4.  g8[ r8 g] |
116     <c, c,>4. <e e,>4. |
117     a,4. <d d,>4. |
118     g,8 r r g16 r16\fermata 
119     }
120
121   \book {
122     \score {
123       << \time 6/8
124          \new Staff \with {
125            fontSize = #-3
126            \override StaffSymbol.staff-space = #(magstep -3)
127          } <<
128            \context Staff \accidentalStyle modern
129            \melody >>
130          \new Lyrics \lyricsto "singer" \firstVerse
131          \new Lyrics \lyricsto "singer" \secondVerse
132          \new PianoStaff << 
133            \set PianoStaff.instrumentName = \markup {
134              \bold
135              \larger\larger\larger\larger
136              \huge
137              "2."
138            }
139            \context Staff = up <<
140              \pianoRH
141              \pianoLH
142            >>
143            \context Staff = down { \clef bass \skip 1*2 }
144          >> 
145        >>
146
147       \layout {
148         \context {
149           \Lyrics
150           \override LyricText.font-size = #-1
151         }
152         \context {
153           \Score
154           \override Beam.beam-thickness = #0.55
155           \override Beam.auto-knee-gap = #4.0
156           \override SpacingSpanner.spacing-increment = #1.0
157           \override Stem.stemlet-length = #0.5
158           \override Slur.height-limit = #1.5
159         }
160       }
161       
162   \midi {
163     \tempo 4 = 70
164     }
165
166
167     }
168   }
169