How about using
version "2.12.3"
score {
new Staff {
clef "G_8"
time 3/4
key e minor
stemDown
times 2/3 { override Stem #'length-fraction = #(magstep -2)
g'8[ e' b] }
times 2/3 {g'[ e' b] }
times 2/3 {g'[ e' b] }
times 2/3 { revert Stem #'length-fraction
g'8[ e' b] }
times 2/3 {g'[ e' b] }
times 2/3 {g'[ e' b] }
time 4/4
override Stem #'length-fraction = #(magstep -2)
g'8[ e' b' e']
revert Stem #'length-fraction
g'8[ e' b' e']
}
}
Nick
On Thu 03/06/10 11:31 AM , David Raleigh Arnold [email protected]
sent:
% I need to shorten some beams.
% beamed-stem-shorten doesn't seem to work
% at all: TIA daveA
version "2.12.3"
score {
new Staff {
clef "G_8"
time 3/4
key e minor
stemDown
times 2/3 { override Stem #'(beamed-stem-shorten) = #'( 2.0 )
g'8[ e' b] }
times 2/3 {g'[ e' b] }
times 2/3 {g'[ e' b] }
times 2/3 { revert Stem #'(beamed-stem-shorten)
g'8[ e' b] }
times 2/3 {g'[ e' b] }
times 2/3 {g'[ e' b] }
time 4/4
override Stem #'(beamed-stem-shorten) = #'( 1.0 )
g'8[ e' b' e']
revert Stem #'(beamed-stem-shorten)
g'8[ e' b' e']
}
}
%--------------------------------------
_______________________________________________
lilypond-user mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/lilypond-user [1]
Links:
------
[1]
http://webmail.internode.on.net/parse.php?redirect=http%3A%2F%2Flists.gnu.org%2Fmailman%2Flistinfo%2Flilypond-user
_______________________________________________
lilypond-user mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/lilypond-user
