-\version "1.6.4"
+\version "2.3.4"
-% bagpipe music.
-
-\header
-{
- title="Flower of Scotland"
+\header {
+ texidoc = "@cindex Bagpipe Music
+Here's an example of bagpipe music.
+"
}
\paper {
- linewidth = 14.0 \cm
- indent = 0.0 \cm
- \translator {
- \GraceContext
-
- NoteHead \override #'font-relative-size = #-2
- NoteHead \override #'font-relative-size = #-2
- Stem \override #'stroke-style = #""
- % The following determines the length of stems without beams
- % default is between 2.8 and 4.0 depending on the number of flags
- Stem \override #'length = #6
- Stem \override #'font-relative-size = #-2
- GraceAlignItem \override #'horizontal-space = #1
- Stem \override #'stroke-style = #""
-
- }
- \translator { \StaffContext
- TimeSignature \override #'style = #'C
-% TimeSignature \override #'visibility-function = #begin-of-line-visible
- TimeSignature \override #'break-visibility = #begin-of-line-visible
- }
+ linewidth = 14.0 \cm
+ indent = 0.0 \cm
+ \context {
+ \Staff
+ \override TimeSignature #'style = #'C
+ \override TimeSignature #'break-visibility = #begin-of-line-visible
+ }
}
+taor = { \grace {
+ g32[ d' g e']
+}
+ }
+grip = {
+ \grace {
+ g32[ b g ]
+ }
+}
+thrd = {
+ \grace {
+ g32[ d' c']
+ }
+}
+birl = {
+ \grace {
+ g32[ a g]
+ }
+}
+gstd = {
+ \grace {
+ g'32[ d' g]
+ }
+}
+lgg = {
+ \grace {
+ g32
+ }
+}
+lag = {
+ \grace {
+ a32
+ }
+}
+fgg = {
+ \grace {
+ f32[ g'32]
+ }
+}
+dblb = {
+ \grace {
+ g'32[ b d']
+ }
+}
+dblc = {
+ \grace {
+ g'32[ c' d']
+ }
+}
+dble = {
+ \grace {
+ g'32[ e' f']
+ }
+}
+dblf = {
+ \grace {
+ g'32[ f' g']
+ }
+}
+dblg = {
+ \grace {
+ g'32[ f']
+ }
+}
+dbla = {
+ \grace {
+ a'32[ g']
+ }
+}
+cg = {
+ \grace {
+ c'32
+ }
+}
+eg = {
+ \grace {
+ e'32
+ }
+}
+gg = {
+ \grace {
+ g'32
+ }
+}
+dg = {
+ \grace {
+ d'32
+ }
+}
+hag = {
+ \grace {
+ a'32
+ }
+}
+gefg = {
+ \grace {
+ g'32[ e' f']
+ }
+}
+efg = {
+ \grace {
+ e'32[ f']
+ }
+}
+gdcg = {
+ \grace {
+ g'32[ d' c']
+ }
+}
+gcdg = {
+ \grace {
+ g'32[ c' d']
+ }
+}
+
+\score {
+ {
+ \time 6/8 \partial 4
+ \tieUp
+ \slurUp
+ \transpose a a' {
+ #(add-grace-property 'Voice 'Stem 'length 6)
-\notenames #'(
- (g . ( 0 4 0 ))
- (a . ( 0 5 0 ))
- (b . ( 0 6 0 ))
- (c . ( 1 0 0 ))
- (d . ( 1 1 0 ))
- (e . ( 1 2 0 ))
- (f . ( 1 3 0 ))
-)
-
-
-
-taor = \notes{ \grace { [g32 d g e]}}
-grip = \notes{ \grace { [g32 b g ]}}
-thrd = \notes{ \grace { [g32 d c] }}
-birl = \notes{ \grace { [g32 a g] }}
-gstd = \notes{ \grace { [g'32 d g] }}
- lgg = \notes{ \grace { g32 }}
- lag = \notes{ \grace { a32 }}
- fgg = \notes{ \grace { [f32 g'32] }}
-dblb = \notes{ \grace { [g'32 b d] }}
-dblc = \notes{ \grace { [g'32 c d] }}
-dble = \notes{ \grace { [g'32 e f] }}
-dblf = \notes{ \grace { [g'32 f g'] }}
-dblg = \notes{ \grace { [g'32 f] }}
-dbla = \notes{ \grace { [a'32 g'] }}
-cg = \notes{ \grace { c32 }}
-eg = \notes{ \grace { e32 }}
-gg = \notes{ \grace { g'32 }}
-dg = \notes{ \grace { d32 }}
-hag = \notes{ \grace { a'32 }}
-gefg = \notes{ \grace { [g'32 e f] }}
-efg = \notes{ \grace { [e32 f] }}
-gdcg = \notes{ \grace { [g'32 d c]}}
-gcdg = \notes{ \grace { [g'32 c d]}}
-
-
-
-%
-\score {
- \notes { \time 6/8 \partial 4
- \tieUp
- \slurUp
-f4 |
-\gg f4 e8 \thrd d4. |
-\eg a4.()a4 d8 |
-\gg d4 f8 \dble e4. ( | \noBreak
-)e8 d4 \gg d4 e8 |
+ f'4 |
+ \gg f'4 e'8 \thrd d'4. |
+ \eg a4.(a4) d'8 |
+ \gg d'4 f'8 \dble e'4. ( | \noBreak
+ e'8) d'4 \gg d'4 e'8 |
-\break
-\time 9/8
-\dblf f2.( )f4 d8 |
-\time 6/8
-\dblg g'4 a'8 \gg a'4. |
-\thrd d4.( )d4 \eg a8 |
-\time 9/8
-\dble e4 \lag e8 \gg [e16 d8. e8] \gg f4 g'8 |
+ \break
+ \time 9/8
+ \dblf f'2.( f'4) d'8 |
+ \time 6/8
+ \dblg g'4 a'8 \gg a'4. |
+ \thrd d'4.( d'4) \eg a8 |
+ \time 9/8
+ \dble e'4 \lag e'8 \gg e'16[ d'8. e'8] \gg f'4 g'8 |
-\break
-\time 6/8
-\gg f4 e8 \thrd d4. |
-\eg a4.( )a4 d8 |
-\dblg g'4 a'8 \gg a'4. |
-\thrd d4.( )d4 f8 |
+ \break
+ \time 6/8
+ \gg f'4 e'8 \thrd d'4. |
+ \eg a4.( a4) d'8 |
+ \dblg g'4 a'8 \gg a'4. |
+ \thrd d'4.( d'4) f'8 |
-\break
-\dblg g'4 e4 \dblf [f8. e16] |
-\thrd d4.( )d4 \cg d8 |
-\gg c4 e8 \thrd d4.( |
-)d4. \gdcg d4.
- }
+ \break
+ \dblg g'4 e'8( e'8) \dblf f'8.[ e'16] |
+ \thrd d'4.( d'4) \cg d'8 |
+ \gg c'4 e'8 \thrd d'4.( |
+ d'4.) \gdcg d'4.
+ }
+ }
}