of a real balkan song!).
" }
% begin verbatim
-#(define (compound-time one two three four five six seven eight nine ten num)
- (markup #:override '(baseline-skip . 0) #:number
- (#:line ((#:column (one num)) #:vcenter "+" (#:column (two num)) #:vcenter "+" (#:column (three num)) #:vcenter "+" (#:column (four num)) #:vcenter "+" (#:column (five num)) #:vcenter "+" (#:column (six num)) #:vcenter "+" (#:column (seven num)) #:vcenter "+" (#:column (eight num)) #:vcenter "+" (#:column (nine num)) #:vcenter "+" (#:column (ten num))))))
+#(define (compound-time one two three four five six seven eight nine ten
+eleven num)
+ (markup #:override '(baseline-skip . 0) #:number
+ (#:line ((#:column (one num)) #:vcenter "+" (#:column (two num))
+#:vcenter "+" (#:column (three num)) #:vcenter "+" (#:column (four num))
+#:vcenter "+" (#:column (five num)) #:vcenter "+" (#:column (six num))
+#:vcenter "+" (#:column (seven num)) #:vcenter "+" (#:column (eight
+num)) #:vcenter "+" (#:column (nine num)) #:vcenter "+" (#:column (ten
+num)) #:vcenter "+" (#:column (eleven num))))))
melody =
{ \relative c'' {
- \set Staff.instrumentName = "Bb Sop."
- \key g \major \time 25/8
- \override Staff.TimeSignature #'stencil = #ly:text-interface::print
- \override Staff.TimeSignature #'text = #(compound-time "3" "2" "2" "3" "2" "2" "2" "3" "2" "2" "8" )
- c8[ c c] d4 c8[ c] b[ c b] a4 g fis8[ e d c] b'[ c d] e4-^ fis8[ g] | \break
- c,4. d4 c4 d4. c4 d c2 d4. e4-^ d4 |
- c4. d4 c4 d4. c4 d c2 d4. e4-^ d4 | \break
- c4. d4 c4 d4. c4 d c2 d4. e4-^ d4 |
- c4. d4 c4 d4. c4 d c2 d4. e4-^ d4 | \break }
+ \set Staff.instrumentName = "Bb Sop."
+ \key g \major \time 25/8
+ \override Staff.TimeSignature #'stencil = #ly:text-interface::print
+ \override Staff.TimeSignature #'text = #(compound-time "3" "2" "2" "3"
+"2" "2" "2" "2 " "3" "2" "2" "8" )
+ \set Staff.beatGrouping = #'(3 2 2 3 2 2 2 2 3 2 2)
+ #(override-auto-beam-setting '(end * * 25 8) 3 8)
+ #(override-auto-beam-setting '(end * * 25 8) 5 8)
+ #(override-auto-beam-setting '(end * * 25 8) 7 8)
+ #(override-auto-beam-setting '(end * * 25 8) 10 8)
+ #(override-auto-beam-setting '(end * * 25 8) 12 8)
+ #(override-auto-beam-setting '(end * * 25 8) 14 8)
+ #(override-auto-beam-setting '(end * * 25 8) 16 8)
+ #(override-auto-beam-setting '(end * * 25 8) 18 8)
+ #(override-auto-beam-setting '(end * * 25 8) 21 8)
+ #(override-auto-beam-setting '(end * * 25 8) 23 8)
+
+ c8 c c d4 c8 c b c b a4 g fis8 e d c b' c d e4-^ fis8 g | \break
+ c,4. d4 c4 d4. c4 d c2 d4. e4-^ d4 |
+ c4. d4 c4 d4. c4 d c2 d4. e4-^ d4 | \break
+ c4. d4 c4 d4. c4 d c2 d4. e4-^ d4 |
+ c4. d4 c4 d4. c4 d c2 d4. e4-^ d4 | \break }
}
drum = {
- \new DrumStaff \drummode
- {
- \bar "|:" bd4. ^\markup { "Drums" } sn4 bd \bar ":" sn4. bd4 sn \bar ":"
- bd sn bd4. sn4 bd \bar ":|"
- }
+ \new DrumStaff \drummode
+ {
+ \bar "|:" bd4. ^\markup { "Drums" } sn4 bd \bar ":" sn4.
+bd4 sn \bar ":"
+ bd sn bd4. sn4 bd \bar ":|"
+ }
}
{
- \melody
- \drum
+ \melody
+ \drum
}
--- /dev/null
+%% Do not edit this file; it is auto-generated from LSR http://lsr.dsi.unimi.it
+%% This file is in the public domain.
+\version "2.11.38"
+
+\header {
+ lsrtags = "rhythms"
+ texidoc = "
+Tuplet brackets can be made to run to prefatory matter or the next
+note. Default tuplet brackets end at the right edge of the final note
+of the tuplet; full-length tuplet brackets extend farther to the right,
+either to cover all the non-rhythmic notation up to the following note,
+or to cover only the whitespace before the next item of notation, be
+that a clef, time signature, key signature, or another note. The
+example shows how to switch tuplets to full length mode and how to
+modify what material they cover.
+" }
+% begin verbatim
+\new RhythmicStaff {
+
+ % Set tuplets to be extendable ..
+
+ \set tupletFullLength = ##t
+
+ % .. to cover all items up to the next note
+
+ \set tupletFullLengthNote = ##t
+ \time 2/4
+ \times 2/3 { c4 c c }
+
+ % .. or to cover just whitespace
+
+ \set tupletFullLengthNote = ##f
+ \time 4/4
+ \times 4/5 { c4 c1 }
+ \time 3/4
+ c4
+}
altering-the-number-of-stems-in-a-beam.ly
adding-beams,-slurs,-ties-etc.-when-using-tuplet-and-non-tuplet-rythms..ly
+modifying-tuplet-bracket-length.ly
+changing-time-signatures-inside-a-polymetric-section-using--compressmusic.ly
+making-an-object-invisible-with-the-transparent-property.ly
+manually-controlling-beam-positions.ly
+controlling-tuplet-bracket-visibility.ly
+adding-drum-parts.ly
+rest-styles.ly
+skips-in-lyric-mode-2.ly
+chant-or-psalms-notation.ly
conducting-signs,-measure-grouping-signs.ly
heavily-customized-polymetric-time-signatures.ly
-skips-in-lyric-mode.ly
+compound-time-signatures.ly
rhythmic-slashes.ly
-skips-in-lyric-mode-2.ly
-manually-controlling-beam-positions.ly
-chant-or-psalms-notation.ly
-changing-time-signatures-inside-a-polymetric-section-using--compressmusic.ly
automatic-beams-two-per-two-in-4-4-or-2-2-time-signature.ly
-making-an-object-invisible-with-the-transparent-property.ly
automatic-beam-subdivisions.ly
-rest-styles.ly
+entering-several-tuplets-using-only-one--times-command.ly
forcing-rehearsal-marks-to-start-from-a-given-letter-or-number.ly
-controlling-tuplet-bracket-visibility.ly
beam-across-line-breaks.ly
printing-music-with-different-time-signatures.ly
-adding-drum-parts.ly
-entering-several-tuplets-using-only-one--times-command.ly
-compound-time-signatures.ly
+skips-in-lyric-mode.ly
" }
% begin verbatim
tsMarkup = \markup {
- \number {
- \bracket \column { "2" "4" }
- }
+ \override #'(baseline-skip . 2) \number {
+ \bracket \column { "2" "4" }
+ }
}
\score {
- \relative c'' {
+ \relative c'' {
+ \override Staff.TimeSignature #'stencil = #ly:text-interface::print
+ \override Staff.TimeSignature #'text = #tsMarkup
+ \time 2/4
-% FIXME: Gee, it doesn't work with 2.10 -vv
-
-%{
-
- \override Staff.TimeSignature #'print-function = #Text_interface::print
- \override Staff.TimeSignature #'text = #tsMarkup
-
-%}
-
- \time 2/4
-
- a4 b8 c |
- }
+ a4 b8 c |
+ }
}
-
projects / lilypond.git / commitdiff