]> git.donarmstrong.com Git - lilypond.git/blob - input/ascii-art/standchen-as5.ly
* scm/paper.scm (set-staff-size): new function: set default
[lilypond.git] / input / ascii-art / standchen-as5.ly
1 #(ly:set-option 'old-relative)
2 \version "2.1.11"
3 % ASCII Art output
4 %
5 % Process as:
6 %
7 %     lilypond -fas foo.ly
8 %     as2text foo.as
9
10
11 \include "paper-as5.ly"
12
13 \score {
14   \context StaffGroup <<
15     \context Staff=upper \notes\relative c{
16       \key f \major
17       \time 3/4
18       r8^"Moderato" %\pp 
19       <<g'-. c-.>> <<c-. es-.>> <<g-. c-.>> <<c-. es-.>> <<g-. c-.>> |
20       r8 <<as-. c-.>> <<c-. es-.>>
21     }
22     \context Staff=lower \notes\relative c{
23       \key f \major
24       \time 3/4
25       \clef "bass"
26       <<c,2 c'>> r4 
27       <<as2 as'>> r4
28     }
29   >>
30   \paper {
31     indent=4.0\char
32     linewidth=78.0\char
33     \translator { \StaffContext Bar \override #'bar-size = #5 }
34     \translator { 
35       \VoiceContext 
36       % horizontal beams
37       Beam \override #'height = #0
38       autoBeamSettings \override #'(begin * * * *) = #(ly:make-moment 0 1)
39       TextScript \set #'no-spacing-rods = ##t
40     }
41   }
42 }
43