-\version "1.7.18"
-\header {
-texidoc="You can get ugly slurs, if you want.
-"
+\version "2.1.28"
+
+\header { texidoc="@cindex Slur Ugly
+Strange slurs can be produced by setting properties by hand. "
}
baseWalk = \notes \relative c {
- d,8( a' d f a d f d a f d a-)
+ d,8( a' d f a d f d a f d a)
}
\score {
- \notes \context PianoStaff <
+ \notes \context PianoStaff <<
\time 6/4
\context Staff=up { s1 * 6/4 }
- \context Staff=down <
+ \context Staff=down <<
\clef bass
- \autochange Staff \context Voice \baseWalk
- >
- >
+ #(override-auto-beam-setting '(end * * * *) 1 2 'Score)
+ \autochange \context Voice \baseWalk
+ >>
+ >>
\paper {
raggedright = ##t
\translator {
\VoiceContext
- Slur \override #'beautiful = #5.0
- Slur \override #'direction = #1
- Stem \override #'direction = #-1
- autoBeamSettings \override #'(end * * * *)
- = #(ly:make-moment 1 2)
+ \override Slur #'beautiful = #5.0
+ \override Slur #'direction = #1
+ \override Stem #'direction = #-1
}
\translator {
\PianoStaffContext
- VerticalAlignment \override #'threshold = #'(5 . 5)
+ \override VerticalAlignment #'threshold = #'(5 . 5)
}
}
}
-%% new-chords-done %%
+