From: Han-Wen Nienhuys Date: Wed, 6 Nov 2002 00:05:46 +0000 (+0000) Subject: *** empty log message *** X-Git-Tag: release/1.7.7~21 X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=d2b5b76a608ca785f21d861515a647bd0d0c7633;p=lilypond.git *** empty log message *** --- diff --git a/buildscripts/new-chords.py b/buildscripts/new-chords.py index 47f4023ae0..a2aa3c0768 100644 --- a/buildscripts/new-chords.py +++ b/buildscripts/new-chords.py @@ -109,8 +109,12 @@ if old_syntax: chordend = '>>' +marker_str = '%% new-chords-done %%' def sub_chords (str): + if re.search (marker_str,str): + return str + str= re.sub (r'\\<', '@STARTCRESC@', str) str= re.sub (r'\\>', '@STARTDECRESC@', str) str= re.sub (r'([_^-])>', r'\1@ACCENT@', str) @@ -126,4 +130,4 @@ def sub_chords (str): return str -print sub_chords (open (sys.argv[1]).read()) +print sub_chords (open (sys.argv[1]).read()) + marker_str diff --git a/input/tutorial/flowing.ly b/input/tutorial/flowing.ly index 84a9d48504..cc2345e34d 100644 --- a/input/tutorial/flowing.ly +++ b/input/tutorial/flowing.ly @@ -10,8 +10,8 @@ melody = \notes \relative c' { \partial 8 g8 | - c4 c8 d [es () d] c4 | f4 f8 g [es() d] c g | - c4 c8 d [es () d] c4 | d4 es8 d c4. + c4 c8 d es-[ ( d-]-) c4 | f4 f8 g es-(-[ d-)-] c g | + c4 c8 d es-[ ( d-]-) c4 | d4 es8 d c4. \bar "|." } diff --git a/input/tutorial/sammartini.ly b/input/tutorial/sammartini.ly index 28199b8b54..23036b5e98 100644 --- a/input/tutorial/sammartini.ly +++ b/input/tutorial/sammartini.ly @@ -3,7 +3,7 @@ \include "paper16.ly" viola = \notes \relative c' \context Voice = viola { - + <>4-\arpeggio \voiceTwo g'8. b,16 s1 s2. r4 @@ -12,18 +12,18 @@ viola = \notes \relative c' \context Voice = viola { oboes = \notes \relative c'' \context Voice = oboes { \voiceOne - s4 g8. b,16 c8 r - \grace - \times 2/3 { } + s4 g8. b,16 c8 r <>8. <>16 + \grace <>8-( <>4-) <>2 + \times 2/3 { <>8 <> <> } < { \times 2/3 { a8 g c } c2 } \\ { f,8 e e2 } > - \grace <)b8. d8.-\trill> | - [ < )f8. a>] <)b,8 d> r [ ] r | - [ < )e8. g>] + \grace <>8-( <>8.-)-\trill <>16 | + [<>-( << f a>>8.-)] <>8 r [<>16-( <>8.-)] <>8 r | + [<>16-( << e g>>8.-)] <>8 } hoomPah = \repeat unfold 8 \notes @@ -42,8 +42,8 @@ bassvoices = \notes \relative c' { \stemBoth [c8 c'8] r4 - r4 - < { r2 <> <> } \\ + <> r4 + < { r2 <>4 <>8 } \\ { g2-~ | g4 c8 } > } @@ -62,3 +62,5 @@ bassvoices = \notes \relative c' { indent = 0.0 linewidth = 15.0 \cm } } +%% new-chords-done %% + diff --git a/ly/engraver-init.ly b/ly/engraver-init.ly index dfc6008aad..da2571f6bc 100644 --- a/ly/engraver-init.ly +++ b/ly/engraver-init.ly @@ -162,7 +162,7 @@ VoiceContext = \translator { \consists "Phrasing_slur_engraver" \consists "Slur_engraver" \consists "Tie_engraver" - %%\consists "New_tie_engraver" + \consists "New_tie_engraver" \consists "Porrectus_engraver" \consists "Tuplet_engraver" \consists "A2_engraver"