]> git.donarmstrong.com Git - lilypond.git/blob - input/typography-demo.ly
Docs: Some more link fixing
[lilypond.git] / input / 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.11.51"
12
13 ignoreMelisma = \set ignoreMelismata = ##t
14 ignoreMelismaOff = \unset ignoreMelismata 
15
16 #(set-global-staff-size 21)
17
18 \paper  {
19                                 %#(set-global-staff-size (* 5.8 mm))
20   indent = #(* mm 4)
21   line-width = #(* mm 140)
22   interscoreline = 2.\mm
23   between-system-space = 15\mm
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   s1*0^\markup {  \bigger { \hspace #-3.0 Lieblich, etwas geschwind } }
38   R2.
39   r4 r8 c4 g8 |
40   \acciaccatura { f16 }  e4 c8
41   <<
42     \new Voice { \stemUp f8. g16 }
43     { \stemDown f8.[ g16] } >> \stemNeutral a8 |
44   fis4  g8 c16[ b a g] f[ e] |
45   d4 f8
46   \transpose a' e' \relative c'' { a16[ g fis! g] f![ d]  } |
47   g4. r8 gis gis |
48   a4 a16.[ b32] c8[( a]) fis8 |
49   g4.~ g8-\fermata
50 }
51
52
53 firstVerse = \lyricmode {
54   \set stanza = "1."
55   
56   Sü -- ßes Licht! Aus
57   \ignoreMelisma
58   gol --
59   \ignoreMelismaOff
60
61   de -- nen  Pfor -- ten brichst du __ | 
62   sie -- gend durch __ die Nacht. Schö -- ner Tag, du __ bist er -- wacht. __ 
63 }
64
65 secondVerse = \lyricmode {
66   \set stanza = "2."
67   いろはに כיף та та ほへど ちり  ぬるを
68   
69   Жъл  дю ля זה
70   
71   いろ はに כיף та та ほへ ちり ぬる
72   
73   Жъл дю ля __
74
75 }
76
77 pianoRH =  \relative c''' \repeat volta 2\new Voice {
78   #(set-accidental-style 'modern)
79   \voiceOne
80   g16( fis a g fis g f e d c b
81   \oneVoice
82   a ) | 
83   <g e>8( <es fis a> <d e bes'> <c e c'>\arpeggio) r8 r | 
84   r8 c'( e,) f r a |
85   \once \override DynamicLineSpanner   #'padding =#3
86   r8
87   << { fis( g) } \\
88      << { a4 } { s8\> s8\! } >>
89    >>
90
91   r8 <e c g>8[  <e c g>] |
92   <d c a>4. r8 \clef bass  <d b f> <d b f> |
93                 \crescTextCresc
94                 e,16_" "\<
95                 g c g e g d gis b gis d gis |
96                 c, e a e c e a,-\f\! d fis d a d |
97                 b d g  d b g e16. r32\fermata
98               }
99
100 pianoLH =  \relative c'' \repeat volta 2\new Voice {
101     #(set-accidental-style 'modern)
102     \voiceTwo
103     g16( fis a g fis g
104
105     f e d c b
106
107     \change Staff = down
108         \oneVoice
109     d,) | 
110      g4.( b,8) r r
111     \clef treble \grace s16 r8 <bes'>8-> <bes c>8->([ <a c>)] r <f c'> |
112     \clef bass
113     r8 dis( e) r c c |
114     f,4.  g8[ r8 g] |
115     <c, c,>4. <e e,>4. |
116     a,4. <d d,>4. |
117     g,8 r r g16 r16\fermata 
118     }
119
120   \book {
121     \score {
122       << \time 6/8
123          \new Staff \with {
124            fontSize = #-3
125            \override StaffSymbol #'staff-space = #(magstep -3)
126          } <<
127            \context Staff #(set-accidental-style 'modern)
128            \melody >>
129          \lyricsto "singer" \new Lyrics \firstVerse
130          \lyricsto "singer" \new Lyrics \secondVerse
131          \new PianoStaff << 
132            \set PianoStaff.instrumentName = \markup {
133              \bold
134              \bigger\bigger\bigger\bigger
135              \huge
136              "2."
137            }
138            \context Staff = up <<
139              \pianoRH
140              \pianoLH
141            >>
142            \context Staff = down { \clef bass \skip 1*2 }
143          >> 
144        >>
145
146       \layout {
147         \context {
148           \Lyrics
149           \override VerticalAxisGroup #'minimum-Y-extent = #'(-0.85 . 2.2)
150           \override LyricText #'font-size = #-1
151         }
152         \context {
153           \Score
154           \override 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     \context {
164       \Score
165       tempoWholesPerMinute = #(ly:make-moment 70 4)
166       }
167     }
168
169
170     }
171   }
172