From fc6163a52dc3821bf8d059b5d0bf4d4b17ed9e83 Mon Sep 17 00:00:00 2001 From: fred Date: Tue, 26 Mar 2002 22:28:56 +0000 Subject: [PATCH] lilypond-1.1.62 --- input/keys.ly | 25 --- input/kortjakje.ly | 64 ------ input/part.ly | 38 ---- input/pedal.ly | 52 ----- input/scales.ly | 95 -------- input/scripts.ly | 68 ------ input/test/alphabet.ly | 124 ----------- input/test/beam-repeat.ly | 10 - input/test/beam-tremolo.ly | 8 - input/test/big-test.ly | 16 -- input/test/denneboom.ly | 154 ------------- input/test/find-fifths.ly | 10 - input/test/rhythm-lyric.ly | 12 -- input/test/rhythm-melody.fly | 2 - input/test/rhythm.ly | 7 - input/test/rhythmic.ly | 8 - input/test/slur-swap.ly | 20 -- input/test/unfold.ly | 10 - lily/break.cc | 177 --------------- lily/include/music-list-iterator.hh | 32 --- lily/include/re-rhythmed-music.hh | 27 --- lily/music-list-iterator.cc | 52 ----- lily/re-rhythmed-music.cc | 41 ---- lily/repeated-music-iterator.cc | 121 ----------- mutopia/J.S.Bach/wtk1-prelude2.ly.m4 | 84 -------- mutopia/los-toros-oboe.ly | 311 --------------------------- 26 files changed, 1568 deletions(-) delete mode 100644 input/keys.ly delete mode 100644 input/kortjakje.ly delete mode 100644 input/part.ly delete mode 100644 input/pedal.ly delete mode 100644 input/scales.ly delete mode 100644 input/scripts.ly delete mode 100644 input/test/alphabet.ly delete mode 100644 input/test/beam-repeat.ly delete mode 100644 input/test/beam-tremolo.ly delete mode 100644 input/test/big-test.ly delete mode 100644 input/test/denneboom.ly delete mode 100644 input/test/find-fifths.ly delete mode 100644 input/test/rhythm-lyric.ly delete mode 100644 input/test/rhythm-melody.fly delete mode 100644 input/test/rhythm.ly delete mode 100644 input/test/rhythmic.ly delete mode 100644 input/test/slur-swap.ly delete mode 100644 input/test/unfold.ly delete mode 100644 lily/break.cc delete mode 100644 lily/include/music-list-iterator.hh delete mode 100644 lily/include/re-rhythmed-music.hh delete mode 100644 lily/music-list-iterator.cc delete mode 100644 lily/re-rhythmed-music.cc delete mode 100644 lily/repeated-music-iterator.cc delete mode 100644 mutopia/J.S.Bach/wtk1-prelude2.ly.m4 delete mode 100644 mutopia/los-toros-oboe.ly diff --git a/input/keys.ly b/input/keys.ly deleted file mode 100644 index 5a12cc0bb0..0000000000 --- a/input/keys.ly +++ /dev/null @@ -1,25 +0,0 @@ -\version "1.1.52"; - - -blah = \notes { - -\transpose c'' { - \time 4/4; - \keysignature es; - [cis8 d e f] [e! a b cis'] | - es e f e a a' a a' | - \clef "bass"; } - [es16 c' b a] [g f es d] [c d es d] [c Bes As G] | - -\clef "violin"; - \keysignature c; - cis4 c cis cis | - cis dis2 ~ | - \time 2/4 ; - dis4 dis ~ | c cis~ | c -} - -\score{ - \context Staff \blah - -} diff --git a/input/kortjakje.ly b/input/kortjakje.ly deleted file mode 100644 index 9e06348b70..0000000000 --- a/input/kortjakje.ly +++ /dev/null @@ -1,64 +0,0 @@ -\header{ -filename = "kortjakje.ly"; -title = "Ah vous dirais-je maman (variations)"; -description = "bare bones version. (written down from memory :-)"; -composer = "Mozart KV 265"; -enteredby = "HWN"; -copyright = "public domain"; -} -%{ -Tested Features: example file with comments - -%} -\version "1.1.52"; - - -% the % is a comment. - - -% declare melody (which will be in *one* staff ) for the lead voice -melodie = \notes \relative c' { - % switch Lilypond in note-mode - \clef"violin"; - \time 2/4 ; - %%% theme - c4 c | % the | checks if there is a new measure here. - g' g| - a a| - - g2| % g2 means a "g-1" pitched half-note - f4 f| e e| d d| c2 - g'4 g| f f| e e| d d| g g| f f| e e| d d| - %%% var 1 - c4 r8 c % r8 means an 8th rest. - (| % start a slur - % NOTE: the slurstart should be directly after the note - ) % end a slur. - g'4 r8 g8 () a4 r8 a8 () g4 r4 - f4 r8 f8 () e4 r8 e8 (|) d4 r8 d8 () c4 r4 -} - - % more of this. -begeleiding = \notes \relative c { - \clef "bass"; - \time 2/4 ; - - %%% theme - c4 % before note means one octave lower. - % Similarly: after means one higher. - c' e c f c e c d b c a f g c,2 | - e'4 g, d' g, c g b g e' g, d' g, c g b g - %%%% var 1 - r8 e'8() c4 r8 e8() c4 r8 f8() c4 r8 e8() c4 - r8 d8() b4 r8 c8() a4 r8 a8() f4 r8 e8() c4 -} - -\score{ - \context GrandStaff < - \melodie - \begeleiding - > - \paper{} - \midi{} -} - diff --git a/input/part.ly b/input/part.ly deleted file mode 100644 index b07f963591..0000000000 --- a/input/part.ly +++ /dev/null @@ -1,38 +0,0 @@ -\version "1.1.52"; -part = \notes { - c-1 c c c - r1*3 - c4-5 c c c - c-6 c c c - c-7 c c c - c-8 c c c -} - -a4 = \paper{ - linewidth= 80.\mm; - \translator { - \StaffContext - - \consists "Bar_column_engraver"; - \consists "Bar_number_engraver"; - - } -} - -\score{ - < - \notes{ - \part - } - > - \paper{\a4} -} - -\score{ - < - \notes{ - \part - } - > - \paper{\a4} -} diff --git a/input/pedal.ly b/input/pedal.ly deleted file mode 100644 index 905715b6c9..0000000000 --- a/input/pedal.ly +++ /dev/null @@ -1,52 +0,0 @@ -% -% This file does not work. -% - -% pedal.ly -% -% Johann Sebastian Bach -% preludium en fuga in D -% bwv 532 -% -% fuga --- two bar excerpt of pedal part -% -% example for pedal studies - -% ugh, front and back priority are the same... -% one must use (ugh): -% left front: -% -\front-\l{toe,heel} -% left back: -% -\l{toe,heel}-\back -% rigth front: -% -\r{toe,heel}-\front -% right back: -% -\back-\r{toe,heel} - -% therefore: -% \lheel \ltoe \rheel \rtoe -% \lbheel \lbheel \lfheel \lftoe -% \rbheel \rbtoe \rfheel \rftoe - -\version "1.1.52"; - -\score{ - \notes { - \time 4/4; - \key D; - \clef bass; - % silly chord testing... -% these should be stacked... -% < c,-\ltoe e,-\lheel > < c'-\rtoe e'-\rheel> -% < c,-\lheel e,-\ltoe > < c'-\rheel e'-\rtoe> | - < c,-\ltoe-\lheel e, > < c'-\rtoe-\rheel e' > - < c,-\lheel-\ltoe e, > < c'-\rheel-\rtoe e' > | - % 46 - - [d16-\lfheel e-\rbtoe fis-\ltoe e-\rbtoe] - [d-\lfheel e-\rbtoe fis-\lheel e] [d e fis e] [d e fis e] | - d4 r4 r4 [b16-\rtoe a-\ltoe b-\rtoe fis-\ltoe] | - } - \paper{} -} - diff --git a/input/scales.ly b/input/scales.ly deleted file mode 100644 index a4ea103048..0000000000 --- a/input/scales.ly +++ /dev/null @@ -1,95 +0,0 @@ -% -% This file prints lots of warning messages about scripts-dportato -% - -\header{ -filename = "scales.ly"; -enteredby = "HWN"; -copyright = "public domain"; -} - -%{ - Tested Features: scripts, beams, transposition, -%} - -% -% scales with accents. -% - -\version "1.1.52"; -blah = \notes { - \time 6/8; -\transpose c { - \clef "bass"; - c4. d -} - c d - \clef "violin" ; -\transpose c'' { - \transpose d { e f } } -\transpose c''' { - c4. d - %ugr - |\times 6/9 { [ a8 \< a a a a a a \! a a \ff \> ] } | } - \transpose c'' { - \times 6/9 { [ a a a a a a a a \! a ] } | } - \transpose c''' { - \times 6/9 { [ c,->-.-\fermata \< g,->-.-\fermata - d->-.-\fermata a->-.-\fermata - e'->-.-\fermata b'-. f''-. c'''->-.-\fermata - \! g'''->-.-\fermata \> ] } - - \times 6/9 { [ g'''->-.-\fermata c'''->-.-\fermata - f''->-.-\fermata b'->-.-\fermata e'->-.-\fermata - a->-.-\fermata d->-.-\fermata g,->-.-\fermata \! - c,->-.-\fermata ] } - - \times 6/9 { [ c,->-.-\fermata \< g,->-.-\fermata d->-.-\fermata - a->-.-\fermata - e'->-.-\fermata b'-. f''-. - c'''->-.-\fermata \! g'''->-.-\fermata \> ] } - \times 6/9 { [ g'''->-.-\fermata c'''->-.-\fermata - f''->-.-\fermata b'->-.-\fermata e'->-.-\fermata - a->-.-\fermata d->-.-\fermata - g,->-.-\fermata \! c,->-.-\fermata ] } - } - \transpose c'' { - \times 2/3 { [ c g d' ] } - \times 2/3 { [ d' g c ] } - \times 2/3 { [ f c' g' ] } - \times 2/3 { [ g' c' f ] } - } - \transpose c' { - \times 2/3 { [ c g d' ] } - \times 2/3 { [ d' g c ] } - \times 2/3 { [ f c' g' ] } - \times 2/3 { [ g' c' f ] } - \times 2/3 { [ g' c' f ] } - \time 4/4; - -c1} - - r8-"text" r8^. r8_. r8 r8 r8 r8 r8 - [c-> d-> e-> f->][g-> a-> b-> c'->] % 1 -\transpose c'' { [c'-^ b-^ a-^ g-^][f-^ e-^ d-^ c-^]} - [c'-^ b-^ a-^ g-^][f-^ e-^ d-^ c-^] - [c-. d-. e-. f-.][g-. a-. b-. c'-.] - [c'-- b-- a-- g][f-- e-- d c--] % 5 - [c-\portato d-\portato e-\portato f-\portato] - [g-\portato a-\portato b-\portato c'-\portato] - [c'-\upbow b-\upbow a-\downbow g-\downbow] - [f-\downbow e-\downbow d-\upbow c-\upbow] - [c-| d-| e-| f-|][g-| a-| b-| c'-|] - [c' b a g][f e d c] - [c d e f][g a b c'] % 10 - |[c' b a g][f e d c] - - } - - -\score{ - \notes {\blah} - \paper{ - castingalgorithm = \Wordwrap; - } -} diff --git a/input/scripts.ly b/input/scripts.ly deleted file mode 100644 index 92d4a624af..0000000000 --- a/input/scripts.ly +++ /dev/null @@ -1,68 +0,0 @@ - -\version "1.1.52"; - - -blah = \notes{ \transpose c'' { - - c,4 ->-.-\fermata-"text" - c ->-.-\fermata-"text" - c' ->-.-\fermata-"text" - c'' ->-.-\fermata-"text" - - d, ->-.-\fermata-"text" - d ->-.-\fermata-"text" - d' ->-.-\fermata-"text" - d'' ->-.-\fermata-"text" - - c, ^>^.^\fermata^"text" - c ^>^.^\fermata^"text" - c' ^>^.^\fermata^"text" - c'' ^>^.^\fermata^"text" - - d, ^>^.^\fermata^"text" - d ^>^.^\fermata^"text" - d' ^>^.^\fermata^"text" - d'' ^>^.^\fermata ^"text" - - c, _>_._\fermata _"text" - c _>_._\fermata _"text" - c' _>_._\fermata _"text" - c'' _>_._\fermata _"text" - - d, _>_._\fermata _"text" - d _>_._\fermata _"text" - d' _>_._\fermata _"text" - d'' _>_._\fermata _"text" - - \stemup - b,-. c-. d-. e-. f-. g-. a-. b-. c'-. - \stemdown - a-. b-. c'-. d'-. e'-. f'-. g'-. a'-. b'-. - \stemup - b,-> c-> d-> e-> f-> g-> a-> b-> c'-> - \stemup - b,---. c---. d---. e---. f---. g---. a---. b---. c'---. - \stemboth - \time 4/4; - [c8 \< d e \! f][d' \> e' f' \! g'] - [c-> \< d-> e-> \! f->][d'-> \> e'-> f'-> \! g'->] - [c-^ \< d-^ e-^ \! f-^][d'-^ \> e'-^ f'-^ \! g'-^] - [c-. \< d-. e-. \! f-.][d'-. \> e'-. f'-. \! g'-.] - [c-- \< d-- e-- \! f--][d'-- \> e'-- f'-- \! g'--] - [c-\tenuto \< d-\tenuto e-\tenuto \! f-\tenuto] - [d'-\tenuto \> e'-\tenuto f'-\tenuto \! g'-\tenuto] - [c-\upbow \< d-\upbow e-\upbow \! f-\upbow] - [d'-\upbow \> e'-\upbow f'-\upbow \! g'-\upbow] - [c-| \< d-| e-| \! f-|][d'-| \> e'-| f'-| \! g'-|] - [c-\fermata \< d-\fermata e-\fermata \! f-\fermata] - [d'-\fermata \> e'-\fermata f'-\fermata \! g'-\fermata] - [c-\lheel \< d-\lheel e-\lheel \! f-\lheel] - [d'-\lheel \> e'-\lheel f'-\lheel \! g'-\lheel] - -}} - - -\score{ - \blah - -} diff --git a/input/test/alphabet.ly b/input/test/alphabet.ly deleted file mode 100644 index 9d72e6a90a..0000000000 --- a/input/test/alphabet.ly +++ /dev/null @@ -1,124 +0,0 @@ -\score{ - < - \context Staff \notes{ - \skip 4*27; - \skip 4*27; - \skip 4*27; - \skip 4*27; - } - \context Lyrics \lyrics{ -aaaaaaaaaaaaaaaaaaa -xxx\break -bbbbbbbbbbbbbbbbbbb -xxx\break -ccccccccccccccccccc -xxx\break -ddddddddddddddddddd -xxx\break -eeeeeeeeeeeeeeeeeee -xxx\break -fffffffffffffffffff -xxx\break -ggggggggggggggggggg -xxx\break -hhhhhhhhhhhhhhhhhhh -xxx\break -iiiiiiiiiiiiiiiiiii -xxx\break -jjjjjjjjjjjjjjjjjjj -xxx\break -kkkkkkkkkkkkkkkkkkk -xxx\break -lllllllllllllllllll -xxx\break -mmmmmmmmmmmmmmmmmmm -xxx\break -nnnnnnnnnnnnnnnnnnn -xxx\break -ooooooooooooooooooo -xxx\break -ppppppppppppppppppp -xxx\break -qqqqqqqqqqqqqqqqqqq -xxx\break -rrrrrrrrrrrrrrrrrrr -xxx\break -sssssssssssssssssss -xxx\break -ttttttttttttttttttt -xxx\break -uuuuuuuuuuuuuuuuuuu -xxx\break -vvvvvvvvvvvvvvvvvvv -xxx\break -wwwwwwwwwwwwwwwwwww -xxx\break -xxxxxxxxxxxxxxxxxxx -xxx\break -yyyyyyyyyyyyyyyyyyy -xxx\break -zzzzzzzzzzzzzzzzzzz -xxx\break -................... -xxx\break -AAAAAAAAAAAAAAAAAAA -xxx\break -BBBBBBBBBBBBBBBBBBB -xxx\break -CCCCCCCCCCCCCCCCCCC -xxx\break -DDDDDDDDDDDDDDDDDDD -xxx\break -EEEEEEEEEEEEEEEEEEE -xxx\break -FFFFFFFFFFFFFFFFFFF -xxx\break -GGGGGGGGGGGGGGGGGGG -xxx\break -HHHHHHHHHHHHHHHHHHH -xxx\break -IIIIIIIIIIIIIIIIIII -xxx\break -JJJJJJJJJJJJJJJJJJJ -xxx\break -KKKKKKKKKKKKKKKKKKK -xxx\break -LLLLLLLLLLLLLLLLLLL -xxx\break -MMMMMMMMMMMMMMMMMMM -xxx\break -NNNNNNNNNNNNNNNNNNN -xxx\break -OOOOOOOOOOOOOOOOOOO -xxx\break -PPPPPPPPPPPPPPPPPPP -xxx\break -QQQQQQQQQQQQQQQQQQQ -xxx\break -RRRRRRRRRRRRRRRRRRR -xxx\break -SSSSSSSSSSSSSSSSSSS -xxx\break -TTTTTTTTTTTTTTTTTTT -xxx\break -UUUUUUUUUUUUUUUUUUU -xxx\break -VVVVVVVVVVVVVVVVVVV -xxx\break -WWWWWWWWWWWWWWWWWWW -xxx\break -XXXXXXXXXXXXXXXXXXX -xxx\break -YYYYYYYYYYYYYYYYYYY -xxx\break -ZZZZZZZZZZZZZZZZZZZ -xxx\break - } - > - \paper { - castingalgorithm = \Wordwrap; - linewidth = 40.\mm; - } -} - -\version "1.1.52"; diff --git a/input/test/beam-repeat.ly b/input/test/beam-repeat.ly deleted file mode 100644 index e1c5bf37da..0000000000 --- a/input/test/beam-repeat.ly +++ /dev/null @@ -1,10 +0,0 @@ -\score{ - \notes \relative c''{ - \time 2/4; - c8 - \repeat 2 { % \bar "|:" iknoort-i ook... - c8 c8 - } - c8 - } -} diff --git a/input/test/beam-tremolo.ly b/input/test/beam-tremolo.ly deleted file mode 100644 index f60c9c7e0e..0000000000 --- a/input/test/beam-tremolo.ly +++ /dev/null @@ -1,8 +0,0 @@ - - % broken. - [:32 c16 e] - [:32 c16 e] - [:16 c8 e] - [:16 e4 g] - [:16 e2 g] - [:16 e1 g] diff --git a/input/test/big-test.ly b/input/test/big-test.ly deleted file mode 100644 index 71e43baba5..0000000000 --- a/input/test/big-test.ly +++ /dev/null @@ -1,16 +0,0 @@ - -\score { -\notes \relative c { -\include "noteheadstyle.fly" -}\header { title = "notehead style"; } -} - -\score { -\notes \relative c { -\include "number-staff-lines.fly" -}\header { title = "number of staff lines"; } -} - -\include "bar-scripts.ly" - -\include "font20.ly" diff --git a/input/test/denneboom.ly b/input/test/denneboom.ly deleted file mode 100644 index 3579f8d3d6..0000000000 --- a/input/test/denneboom.ly +++ /dev/null @@ -1,154 +0,0 @@ -\header{ -filename = "denneboom.ly"; -enteredby = "jcn"; -copyright = "public domain"; -TestedFeatures = "This file tests silly line shapes"; -} - -\include "paper20.ly" - -\version "1.1.52"; - -oden = \lyrics{ - O8 | - den-8. ne-16 boom,4. o8 | - den-8. ne-16 boom.4. Wat8 | - zijn uw tak-4 ken | - won-8. der-16 schoon4 _8 -} - -ikheb = \lyrics{ - Ik8 | - heb u laatst4. in_'t8 | - bos8. zien16 staan4 _8 toen8 | - zat- en er4. geen8 | - kaars-8. jes16 aan.4 _8 -} - -ugloeit = \lyrics{ - U8 | - gloeit in bar-4. re8 | - win-8. ter-16 tijd,4 r8 als8 | - sneeuw op aar-4. de8 | - licht8. ge-16 spreid.4 _8 -} - -oboom = \notes\transpose c''{ - g,8 | - c8. c16 c4. d8 | - e8. e16 e4. e8 | - d e f4 b, | - d8. c16 c4 r8 -} - -bos = \notes\transpose c''{ - g8 | - g e a4. g8 | - g8. f16 f4 r8 f8 | - f d g4. f8 | - f8. e16 e4 r8 -} - -global = \notes{ - \time 3/4; - \partial 8; - \skip 4*48; - \bar "|."; -} -melody = \notes{ - \oboom - \oboom - \bos - \oboom -} - -$melody_staff = \context Staff = melody < - \global - \melody -> - -$verse_one = \notes{ - \oden - \oden - \ikheb - \oden -} - -$verse_one_staff = \context Lyrics = one < - \global - \$verse_one -> - -$verse_two = \notes{ - \oden - \oden - \ugloeit - \oden -} - -$verse_two_staff = \context Lyrics = two < - \global - \$verse_two -> - -$denneboom_shape = \paper{ - \paper_twenty - indent = 20. \mm; - \shape = 70. \mm 20. \mm - 65. \mm 30. \mm - 57.5 \mm 45. \mm - 50. \mm 60. \mm - 42.5 \mm 75. \mm - 35. \mm 90. \mm - 27.5 \mm 105. \mm - 20. \mm 120. \mm - 10. \mm 140. \mm - 65. \mm 30. \mm - ; - gourlay_maxmeasures = 30.; -% uhuh, loop if you comment these in -% arithmetic_basicspace = 3.8; -% arithmetic_multiplier = 8.\pt; -} - -\score{ - < - \$melody_staff - \$verse_one_staff - > - \paper{ -% huh? -% \$denneboom_shape - \paper_twenty - indent = 20. \mm; - \shape = 70. \mm 50. \mm - 65. \mm 30. \mm - 57.5 \mm 45. \mm - 50. \mm 60. \mm - 42.5 \mm 75. \mm - 35. \mm 90. \mm - 27.5 \mm 105. \mm - 20. \mm 120. \mm - 10. \mm 140. \mm -% 65. \mm 30. \mm - 65. \mm 40. \mm - ; - gourlay_maxmeasures = 30.; -% uhuh, loop if you comment these in - arithmetic_basicspace = 3.8; -% arithmetic_multiplier = 8.\pt; - arithmetic_multiplier = 7.5\pt; - } - \midi{ \tempo 4 = 90; } -} - -%{ -\score{ - < - \$melody_staff - \$verse_two_staff - > - \paper{ \$denneboom_shape } - \midi{ \tempo 4 = 90; } -} -%} diff --git a/input/test/find-fifths.ly b/input/test/find-fifths.ly deleted file mode 100644 index 8d88c31f39..0000000000 --- a/input/test/find-fifths.ly +++ /dev/null @@ -1,10 +0,0 @@ -\version "1.0.21"; - -\score{ - \notes \relative c { - c d c f c g c b, c g, c f, c c'' c -% run with find-quarts should suggest: -% c d c f c g' c, b c g c f, c' c'' c,, - } -} - diff --git a/input/test/rhythm-lyric.ly b/input/test/rhythm-lyric.ly deleted file mode 100644 index b9413ec88f..0000000000 --- a/input/test/rhythm-lyric.ly +++ /dev/null @@ -1,12 +0,0 @@ -text = \lyrics { Feel the rhy- thm } - -melody = \notes { - e4. d8 e4. c8 -} - -\score{ - < - \context Voice \notes\relative c'' \melody - \context Lyrics \rhythm \melody \text - > -} diff --git a/input/test/rhythm-melody.fly b/input/test/rhythm-melody.fly deleted file mode 100644 index 9ccd77a4bf..0000000000 --- a/input/test/rhythm-melody.fly +++ /dev/null @@ -1,2 +0,0 @@ -%\rhythm { 4. 8 8. 16 } { c'' d e f } -\rhythm { c4. c8 c8. c16 } { c'' d e f } diff --git a/input/test/rhythm.ly b/input/test/rhythm.ly deleted file mode 100644 index 4fe37cb585..0000000000 --- a/input/test/rhythm.ly +++ /dev/null @@ -1,7 +0,0 @@ -\score{ - \context Voice \notes\relative c''{ - % still thinking 'bout this - %c4. 8 4. 8 - c4. c8 c4. c8 - } -} diff --git a/input/test/rhythmic.ly b/input/test/rhythmic.ly deleted file mode 100644 index 9670f5b44b..0000000000 --- a/input/test/rhythmic.ly +++ /dev/null @@ -1,8 +0,0 @@ -\score{ - \context RhythmicStaff { - \notes\relative c''{ - \time 4/4; - r4 r g2 | r4 g r2 | g1:32 | r1 | - } - } -} diff --git a/input/test/slur-swap.ly b/input/test/slur-swap.ly deleted file mode 100644 index ccd6dd0b3a..0000000000 --- a/input/test/slur-swap.ly +++ /dev/null @@ -1,20 +0,0 @@ -\version "1.1.52"; - -% urg, the direction of the slur gets swapped! -\score{ - \notes\relative c{ - \slurup - \stemup - [e'8( c' a b] - \stemdown - [e c a )e] \break - \stemup - [e8( c' a b] - \stemdown - [e c a )e] e1 - } - \paper{ - indent = 0.\mm - linewidth=80.\mm - } -} diff --git a/input/test/unfold.ly b/input/test/unfold.ly deleted file mode 100644 index 4664cfc09f..0000000000 --- a/input/test/unfold.ly +++ /dev/null @@ -1,10 +0,0 @@ -\score{ - \context Staff \notes\relative c'' { - % doesn't quite work yet - % \property Staff.unfoldRepeats = 1 - \repeat 3 { a b c d } - \alternative { { d c b a } { a b c d } } d d d d - } -} - -\version "1.0.16"; diff --git a/lily/break.cc b/lily/break.cc deleted file mode 100644 index 8291f81a23..0000000000 --- a/lily/break.cc +++ /dev/null @@ -1,177 +0,0 @@ -/* - break.cc -- implement Break_algorithm - - source file of the GNU LilyPond music typesetter - - (c) 1996, 1997--1999 Han-Wen Nienhuys -*/ - -#include "score-column.hh" -#include "break.hh" -#include "paper-def.hh" -#include "spring-spacer.hh" -#include "debug.hh" -#include "line-of-score.hh" -#include "paper-score.hh" -#include "paper-column.hh" -#include "cpu-timer.hh" -#include "command-request.hh" - -String -Col_stats::str () const -{ - String s; - if (!count_i_) - s = _ ("0 lines"); - else if (count_i_ == 1) - s = _f ("1 line (of %.0f columns)", (Real)cols_i_/count_i_); - else - s = _f ("%d lines (with an average of %.1f columns)", - count_i_, (Real)cols_i_/count_i_); - return s; -} - -void -Col_stats::add (Line_of_cols const& line) -{ - count_i_++; - cols_i_ += line.size (); -} - - -Col_stats::Col_stats () -{ - count_i_ =0; - cols_i_ =0; -} - -/* **************************************************************** */ - - -Array -Break_algorithm::find_break_indices () const -{ - Line_of_cols all (pscore_l_->col_l_arr_); - Array retval; - - for (int i=0; i < all.size (); i++) - if (all[i]->breakable_b ()) - retval.push (i); - - if (linelength <=0) - while (retval.size () >2) - retval.del (1); - - return retval; -} - - -Line_of_cols -Break_algorithm::find_breaks () const -{ - Line_of_cols all (pscore_l_->col_l_arr_); - Line_of_cols retval; - - for (int i=0; i < all.size (); i++) - if (all[i]->breakable_b ()) - retval.push (all[i]); - - - if (linelength <=0) - while (retval.size () >2) - retval.del (1); - - return retval; -} - - - - - -Line_spacer* -Break_algorithm::generate_spacing_problem (Line_of_cols curline, Interval line) const -{ - // ugh - Spring_spacer * sp= dynamic_cast ((*get_line_spacer) ()); - - sp->paper_l_ = pscore_l_->paper_l_; - sp->add_column (curline[0], true, line[LEFT]); - for (int i=1; i< curline.size ()-1; i++) - sp->add_column (curline[i]); - - if (line.length () > 0) - { - sp->add_column (curline.top (), true, line[RIGHT]); - sp->energy_normalisation_f_ = sqr (line.length ()); - } - else - sp->add_column (curline.top ()); - - sp->prepare (); - return sp; -} - -Break_algorithm::Break_algorithm () -{ - pscore_l_ = 0; - get_line_spacer =0; - linelength = 0; -} - -void -Break_algorithm::set_pscore (Paper_score*s) -{ - pscore_l_ = s; - linelength = s->paper_l_->linewidth_f (); - do_set_pscore (); -} - -bool -Break_algorithm::feasible (Line_of_cols curline) const -{ - if (linelength <= 0) - return true; - - for (int i=0; i < curline.size (); i++) - { - if (i && i < curline.size () -1 - && ((dynamic_cast(curline[i]))->break_penalty_i () >= Break_req::FORCE)) - return false; - } - return true; -} - -void -Break_algorithm::problem_OK () const -{ - if (pscore_l_->col_l_arr_.empty ()) - error (_("score does not have any columns")); - OK (); -} - -void -Break_algorithm::OK () const -{ -} - -Array -Break_algorithm::solve () const -{ - Cpu_timer timer; - - Array h= do_solve (); - - if (approx_stats_.count_i_) - *mlog << '\n' << _f ("approximated %s", approx_stats_.str ()) << endl; - if (exact_stats_.count_i_) - *mlog << _f ("calculated %s exactly", exact_stats_.str ()) << endl; - *mlog << _f ("elapsed time %.2f seconds", timer.read ()) << endl; - - return h; -} - -void -Break_algorithm::do_set_pscore () -{ - -} diff --git a/lily/include/music-list-iterator.hh b/lily/include/music-list-iterator.hh deleted file mode 100644 index 7385230fcf..0000000000 --- a/lily/include/music-list-iterator.hh +++ /dev/null @@ -1,32 +0,0 @@ -/* - music-list-iterator.hh -- declare Music_list_iterator - - source file of the GNU LilyPond music typesetter - - (c) 1998--1999 Jan Nieuwenhuizen -*/ - - -#ifndef MUSIC_LIST_ITERATOR_HH -#define MUSIC_LIST_ITERATOR_HH - -#include "music-iterator.hh" - - -class Music_list_iterator : public Music_iterator -{ -public: - Music_list_iterator (); - virtual ~Music_list_iterator (); - - virtual void construct_children (); - virtual Moment next_moment () const; - virtual Music* next_music_l (); - virtual bool ok () const; - -protected: - virtual void do_print () const; - virtual void do_process_and_next (Moment); -}; - -#endif // MUSIC_LIST_ITERATOR_HH diff --git a/lily/include/re-rhythmed-music.hh b/lily/include/re-rhythmed-music.hh deleted file mode 100644 index 4c258a7be9..0000000000 --- a/lily/include/re-rhythmed-music.hh +++ /dev/null @@ -1,27 +0,0 @@ -/* - re-rhythmed-music.hh -- declare Re_rhythmed_music - - source file of the GNU LilyPond music typesetter - - (c) 1999 Jan Nieuwenhuizen - - */ - -#ifndef RE_RHYTHMED_MUSIC_HH -#define RE_RHYTHMED_MUSIC_HH - -#include "music-wrapper.hh" - -class Re_rhythmed_music : public Music_wrapper -{ -public: - void do_print () const; - Re_rhythmed_music (Music*, Music*); - - VIRTUAL_COPY_CONS(Music); - virtual Music_iterator* to_rhythm (Music_iterator*); -}; - - -#endif /* RE_RHYTHMED_MUSIC_HH */ - diff --git a/lily/music-list-iterator.cc b/lily/music-list-iterator.cc deleted file mode 100644 index 2be250faea..0000000000 --- a/lily/music-list-iterator.cc +++ /dev/null @@ -1,52 +0,0 @@ -/* - Music_list-iterator.cc -- implement Music_list_iterator - - source file of the GNU LilyPond music typesetter - - (c) 1998--1999 Jan Nieuwenhuizen -*/ - -#include "music-list-iterator.hh" -#include "music-list.hh" - -Music_list_iterator::Music_list_iterator () -{ -} - -Music_list_iterator::~Music_list_iterator () -{ -} - -void -Music_list_iterator::construct_children () -{ -} - -void -Music_list_iterator::do_print() const -{ -} - -void -Music_list_iterator::do_process_and_next (Moment) -{ -} - -Moment -Music_list_iterator::next_moment () const -{ - return 0; -} - -Music* -Music_list_iterator::next_music_l () -{ - return 0; -} - -bool -Music_list_iterator::ok () const -{ - return false; -} - diff --git a/lily/re-rhythmed-music.cc b/lily/re-rhythmed-music.cc deleted file mode 100644 index e2ba452819..0000000000 --- a/lily/re-rhythmed-music.cc +++ /dev/null @@ -1,41 +0,0 @@ -/* - re-rhythmed-music.cc -- implement Re_rhythmed_music - - source file of the GNU LilyPond music typesetter - - (c) 1999 Jan Nieuwenhuizen - - */ - -#include "re-rhythmed-music.hh" -#include "music-iterator.hh" -#include "global-translator.hh" - -// urg -class Foo_translator : public Global_translator -{ -}; - -Music_iterator* -Re_rhythmed_music::to_rhythm (Music_iterator* r) -{ - return r; -} - -Re_rhythmed_music::Re_rhythmed_music (Music* m, Music* r) - : Music_wrapper (m) -{ - Music_iterator* i = Music_iterator::static_get_iterator_p (r); - Global_translator*t = new Foo_translator (); - i->init_translator (r, t); - i->construct_children (); - element_l ()->to_rhythm (i); -} - -void -Re_rhythmed_music::do_print () const -{ - Music_wrapper::do_print (); -} - - diff --git a/lily/repeated-music-iterator.cc b/lily/repeated-music-iterator.cc deleted file mode 100644 index 03854fd5e0..0000000000 --- a/lily/repeated-music-iterator.cc +++ /dev/null @@ -1,121 +0,0 @@ -/* - new-repeated-music-iterator.cc -- implement Folded_repeat_iterator - - source file of the GNU LilyPond music typesetter - - (c) 1999 Han-Wen Nienhuys - - */ - -#include "folded-repeat-iterator.hh" -#include "new-repeated-music.hh" -#include "music-list.hh" -#include "simultaneous-music-iterator.hh" -#include "translator-group.hh" - -Folded_repeat_iterator::Folded_repeat_iterator () -{ - main_iter_p_ = 0; - alternative_iter_p_ = 0; -} - -bool -Folded_repeat_iterator::ok () const -{ - return main_iter_p_ || alternative_iter_p_; -} - -Folded_repeat_iterator::~Folded_repeat_iterator () -{ - delete main_iter_p_; - delete alternative_iter_p_; -} - -Moment -Folded_repeat_iterator::next_moment () const -{ - if (main_iter_p_) - { - return main_iter_p_->next_moment (); - } - else - return main_length_mom_ + alternative_iter_p_->next_moment (); -} - -void -Folded_repeat_iterator::construct_children () -{ - Repeated_music const * mus = dynamic_cast (music_l_); - main_iter_p_ = get_iterator_p (mus->repeat_body_p_); - if (!main_iter_p_->ok()) - { - leave_body (); - enter_alternative (); - } -} - -void -Folded_repeat_iterator::do_process_and_next (Moment m) -{ - if (!m) - { - bool success = report_to_l ()->try_music (music_l_); - if (!success) - music_l_->warning ( _("No one to print a volta bracket")); - } - - Repeated_music const * mus = dynamic_cast (music_l_); - - if (main_iter_p_) - { - main_iter_p_->process_and_next (m); - if (!main_iter_p_->ok ()) - leave_body (); - } - - if (!main_iter_p_ && !alternative_iter_p_) - { - enter_alternative (); - } - - if (alternative_iter_p_) - { - alternative_iter_p_->process_and_next (m - main_length_mom_); - if (!alternative_iter_p_->ok ()) - { - delete alternative_iter_p_; - alternative_iter_p_ =0; - } - } -} - -void -Folded_repeat_iterator::leave_body () -{ - Repeated_music const * mus = dynamic_cast (music_l_); - delete main_iter_p_; - main_iter_p_ = 0; - main_length_mom_ += mus->repeat_body_p_->length_mom (); -} - -void -Folded_repeat_iterator::enter_alternative () -{ - Repeated_music const * mus = dynamic_cast (music_l_); - if (mus->alternatives_p_) - { - Simultaneous_music_iterator * s = new Simultaneous_music_iterator; - s->separate_contexts_b_ = true; - s->init_translator (mus->alternatives_p_, report_to_l ()); - - alternative_iter_p_ = s; - alternative_iter_p_->construct_children (); - } -} - -void -Folded_repeat_iterator::do_print () const -{ -#ifndef NPRINT -#endif -} diff --git a/mutopia/J.S.Bach/wtk1-prelude2.ly.m4 b/mutopia/J.S.Bach/wtk1-prelude2.ly.m4 deleted file mode 100644 index 617f681e58..0000000000 --- a/mutopia/J.S.Bach/wtk1-prelude2.ly.m4 +++ /dev/null @@ -1,84 +0,0 @@ -%% under construction - -define(preludepattern, `[' $1 $2 $3 $2 `]') -define(preludehalfmeasure, preludepattern($1, $2, $3) - preludepattern($4, $2, $3)) - -define(intromeasure, - preludehalfmeasure($1, $2, $3, $4) - preludehalfmeasure($1, $2, $3, $4)| -) -define(handymeasure, `intromeasure(translit($*,` ', `,'))') - - - -trebleIntro=\notes \transpose c'' { -handymeasure(c' es d c) -handymeasure(as f e c) -handymeasure(b f es d) -handymeasure(c g f es) -handymeasure(es' as g es) -handymeasure(d' fis e d) -handymeasure(d' g fis d) -handymeasure(c' e d c) -handymeasure(c' f e c) -handymeasure(bes f es d) -handymeasure(bes g f es) -handymeasure(as g f es) -handymeasure(as d c Bes) -handymeasure(g Bes As es) -handymeasure(f c Bes A) -handymeasure(f d c B) -handymeasure(es c B G) -handymeasure(F es d f) -handymeasure(Fis c b es) -handymeasure(es c B G) -handymeasure(fis c B A) -handymeasure(g c B d) -handymeasure(as c B d) -} - -bassIntro = \notes { -handymeasure(c g f es) -handymeasure(c as g f) -handymeasure(c as g f) -handymeasure(c es d g) -handymeasure(c c' bes as) -handymeasure(c a g fis) -handymeasure(Bes bes a g) -handymeasure(Bes g f e) -handymeasure(As as g f) -handymeasure(As d c f) -handymeasure(G es d g) -handymeasure(c es d As) -handymeasure(d f es as) -handymeasure(es g f as) -handymeasure(es a g f) -handymeasure(d f es as) -handymeasure(c f e as) -preludehalfmeasure(c, es, d, f) -preludehalfmeasure(bes, es, d, f)| -handymeasure(As c b d) -handymeasure(A es d c) -handymeasure(G es d f) -handymeasure(G es d c) -handymeasure(G es d f) -handymeasure(G es d f) -} - - -middlepiece = \notes -{ - \stemdown - [G B d] - \stemup f [as f ef] [b f d' b'] [as f e f] | - \stemdown [G c es]] - \stemup g [c' g fis g ] [es' c' g' es'] [c' as g as]| - \stemdown [G A fis] - \translator Staff=treble - \stemsboth \transpose c'' { c [es c B c] [fis c a fis] [es c B c] } -} - - - - diff --git a/mutopia/los-toros-oboe.ly b/mutopia/los-toros-oboe.ly deleted file mode 100644 index 6152042ead..0000000000 --- a/mutopia/los-toros-oboe.ly +++ /dev/null @@ -1,311 +0,0 @@ -\header{ -filename = "los-toros-oboe.ly"; -title = "La Feria"; -subtitle = "Los Toros"; -opus = ""; -composer = "Paul Lac\\^ome dEstalenx (1838-1920)"; -enteredby = "jcn"; -copyright = "public domain"; -latexheaders= "headers"; -} -\version "1.1.52"; - - - -\include "paper16.ly" - -hoboonestart = \notes - \relative c'{ -% ugh: cant copy: allegro/primo tempo - \property Voice . textStyle = "large" - [es''16-.^"Allegro" es-. es-. es-.] [es8-. d-.] | - \property Voice . textStyle = "italic" -} - -hobooneintro = \notes \relative c'{ - -% \property Voice . textStyle = "roman" -% [es''16-.-"Allegro" es-. es-. es-.] [es8-. d-.] | -% \property Voice . textStyle = "italic" - [f''8.-> es16(] [)d8 c-.] | - [bes16( c d es] [)d8 c-.] | - [bes-. as->~] [as16( g f g] | - [as bes c d] [)es8 c-.] | - [d8-. c16( bes] )as4 ~ | - [as16 g( f g] [as c bes as] | -% [)g8 as16 g(] [)f8 g16( f] | - [)g8 as16 g(] [)f8 g16( f] | - [)es8 f16-. g-.] [as-. bes-. c-. d-.] | - [es-. es-. es-. es-.] [es8-. d-.] | - [f8.-> es16(] [)d8 c-.] | - [bes16( c d es] [)d8 c-.] | - [bes8 a->~] [a16 g( fis g] | - [a bes c d] [)es8 d16()c] | - [bes-. g-. bes-. d-.] g4-> ~ | - [g16 f( es d] [c es d c] | - [)bes8 c16( bes] [)a8 bes16( a] | - [)g8 r d'] r | -} - -hoboonemid = \notes \relative c'{ - - [g'16-. g-. g-. g-.] [g8-. f-.] | - as2-> | - [as16-. as-. as-. as-.] [as8-. g-.] | - bes2-> | - [bes16-. bes-. bes-. bes-.] [bes8-. c] | - - r-"cresc." [d8-. r c-.] | - r\f [d-. es-. f-.] | - [g8.-> es16] [bes8 g] | - - % four measures copied from 8 measures back... - [g16-.\p g-. g-. g-.] [g8-. f-.] | - as2-> | - [as16-. as-. as-. as-.] [as8-. g-.] | - bes2-> | - [b16-. b-. b-. b-.] [b8-. c-.] | - - % same measure - [b16-. b-. b-. b-.] [b8-. c-.] | - - [b8-.-"cresc." c-. b-. c-.] | - [d-. es-. d-. es-.] | - [f\f-. g-. f-. g-.] | - [as-.\< g-. as-. bes-.] | - [\!g16\ff-. g-. g-. g-.] [g8-. g-.] | - [g8.-> g16] [g8 g] | - [g8.-> g16] [g8 g] | - [f8.-> f16] [f8 f] | - [f8.-> f16] [f8 f] | - [bes8-. as16( g] )f4 ~ | - [f16 es( d es] [f as g )f] | - [es( g f es] [d f es d] | - [c es d c] [b d c b] | - [a c bes a] [g bes a g] | - [fis a g fis] [e g fis )e] | - % `a deux - [d8 d'] [es8.-> c16] | - [a8 bes g es] | - [c' d es8. bes16] | - [g8 es bes' c,] | - [d16-. d-. d-. d-.] [d8.-. es16->] | - [d'16-.-"cresc." d-. d-. d-.] [d8.-. es16->] | - [d16-. d-. d-. d-.] [d8.-. es16->] | - [d16 d d d] [d8 es16-.] r16-\fermata^"court"^"tr\\`es" | - % Un peu plus lent. - \property Voice . textStyle = "bold" - -% ugh -% d4(\<^"Un peu plus lent" \property Voice . textStyle = "italic _"tr\\`es \\'el\\'egant" -% d4(\^"Un peu plus lent et \\'el\\'egant"< - \property Voice . textStyle = "italic" - d4(\< - [e8 \!fis8] | -% [)b-. a-.] [g16( fis e )d] | - \property Voice . textStyle = "bold" - [)b-.^"Un peu plus lent et \\'el\\'egant" a-.] [g,,16( fis' e )d] | - \property Voice . textStyle = "italic" - [d( c b\< c] [)\!fis'8-. e-.] | - d,,4-> ~ [d16 e( fis g] | - [a b\< d fis] [)\!a8-. g-.] | - [fis16( e a, )c] e4 ~ | - [e16 d( e, c'] [)b8-. a-.] | - g2 ~ | - [g8 \times 2/3 { d16( e fis ] } [)g8 d'-.] | - b2-> ~ | - [b8 \times 2/3 { d,16( e fis ] } [)g8-"cresc. poco" e'-.] | - e2-> ~ | - [e8 \times 2/3 { d,,16( e fis ] } [)g8\f d'-.] | - [d8.-> b'16-.] [g16-. d-. b-. c-.] | - [d-. e-. fis-. a-.] [g8-. e-.] | - fis2-> ~ | - [fis16 g-.\< a-. b-.] [\!c8-. c,-.] | - [es8.->(-"espress.") d16] d4 ~ | - [d16 e( fis a] [)g8 b,-.] | - [b8.->( )c16] c4 ~ | - [c16\< cis( d \!dis] [)e8-.-"dim." fis,-.] | - [fis8.->( g16] )g4 ~ | - - % (only notes! of) five measures copied from 14 measures above - [g8 \times 2/3 { d16( e fis ] } [)g8 d'-.] | - b2->-"cresc." ~ | - [b8 \times 2/3 { d,16( e fis ] } [)g8 e'-.] | - e2-> ~ | - [e8 \times 2/3 { d,,16(_"h\\^atez" e fis ] } [)g8\f d'-.] | - [d8.-> b16-.] [g16-.-"cresc." d'-. b-. c-.] | - [d16\f\< e-. fis-. g-.] [a-. b,-. c-. \!d-.] -} - - -hoboonesecondstart = \notes \relative c'{ - -% ugh: cant copy: allegro/primo tempo - \property Voice . textStyle = "large" - [es''16-.\ff^"Tempo 1$^o$" es-. es-. es-.] [es8-. d-.] | - \property Voice . textStyle = "italic" - -} - -hoboonelast = \notes \relative c'{ - % could transpose/copy from measure 19... - [d''16-.\p d-. d-. d-.] [d8-. c-.] | - es2-> | - [es16-. es-. es-. es-.] [es8-. d-.] | - f2-> | - [f16-. f-. f-. f-.] [f8-. g-.] | - r8 [a-.-"cresc." r g-.] | - r [a-.\f bes-.\< \!c-.] | - [d8.->\> \!bes16] [f8 d] | - - % four measures copied from 8 measures back... - [d16-.\p d-. d-. d-.] [d8-. c-.] | - es2-> | - [es16-. es-. es-. es-.] [es8-. d-.-"cresc."] | - f2-> | - [fis16-.\p fis-. fis-. fis-.] [fis8-. g-.] | - % same measure - [fis16-.\p fis-. fis-. fis-.] [fis8-. g-.] | - [fis8-. g-. fis-. g-.] | - [a-. bes-. a-. bes-. ] | - [a-.\f bes-. a-. bes-. ] | - [c-.-"cresc." f,-. g-. a-.] | - [bes-. bes-. ces8.-> as16] | - [f8-. ges-. es-. ces-.] | - % `a deux - [as-. bes-. ces8.-> ges16] | - [es8-. ces'-. ges-. as-.] | - bes\p r r4 | - [bes16-.-"cresc." bes-. bes-. bes-.] [bes8-. ces->] | - % same measure - [bes16-. bes-. bes-. bes-.] [bes8-. ces->] | - [bes'16-.\ff bes-. bes-. bes-.] [bes8-. ces16->] r16^"court"-\fermata | - % ugh: eight measures rest (ugh: r1 -> four beats...) - % eiht measures rest.. - \property Voice . textStyle = "bold" -% r2^"Un peu plus lent et \\'el\\'egant" - R2*8 -% r4 r8\p bes | - r4^"Un peu plus lent et \\'el\\'egant" - r8\p bes,, | -% g2->^"Un peu plus lent et \\'el\\'egant" ~ | - g2-> ~ | - \property Voice . textStyle = "italic" - g8 r r c | - c2-> ~ | - c8 r r bes'\f | - [bes8.->\f g16-.] [es16-. bes-. g-. as-.] | - [bes-.-"dim." c-. d-. f-.] [es8-. c-.] | - d2-> ~ | - [d16-"dim."( es f g] [)as,8 as-.] | - [ces8.->\p( )bes16-.] bes4 ~ | - [bes16( c! d f] [)es8 g,-.] | - [g8.->( )as16] as4 ~ | - [as16( a bes b] [)c8-. d,-.] | - % a deux - [d8.->( ) es16] es4 ~ | - es4 r8 bes'-. | - g2-> ~ | - g8 r r c | - c2 ~ | - c8 r r bes' | - [bes8.-> g16-.] [es16-. bes-. g-. as-.] | - [bes-. c-. d-. es-.] [f-. g-. as-. bes-.] | - d8-. r c4-> ~ | - [c16 f,-. g-. a-.] [bes-. c,-. d-. es-.] | - g8-. r f4-> ~ | - [f16 bes,-. c-. d-.] [es-. f-. g-. as-.] | - c8 r bes4 ~ | - [bes8 as-. g8.-. e16-.] | - g8-. r f4-> ~ | - [f8 es-. ces8.-. as16-.] | - % `a deux - \property Voice . textStyle = "large" - [ces8.->^"Plus vite" bes16-.(] [a bes es d] | - \property Voice . textStyle = "italic" - [)c!8.-> bes16] [a( bes es )d] | - [c->( bes es )d] [c->( bes es )d] | - % same measure - [c->( bes es )d] [c->( bes es )d] | - [c( bes a bes] [c d es e] | - [g )f d( es] [f g as a] | - [c )bes bes,( c] [d es f g] | - [as g f g] [as bes c d] | - \property Voice . textStyle = "large" - [)es-.^"Tempo 1$^o$" g,-. g-. g-.] [g8-. g-.] | - \property Voice . textStyle = "italic" - bes4.-> g8-. | - gis2->( | - )as! | - [g16-. g-. g-. g-.] [g8-. g-.] | - bes4.-> g8-. | - gis2->( | -% )as! | - )as | - [bes16-. bes-. bes-. bes-.] [bes8-. bes-.] | - bes4.-> g8-. | - [g16-._"h\\^atez" g-. g-. g-.] [g8-. g-.] | - g4.-> g8-. | - es4.-> es8-. | - bes4.-> bes8-. | - \property Voice . textStyle = "large" - g'4.->^"Presto" g8-. | - \property Voice . textStyle = "italic" - es4.-> es8-. | - [bes-. bes-. es-. g-.] | - [bes-. bes,-. es-. g-.] | - bes-. r r4 | - g8-. r r4 | - g8-. r r4 | -} - -hoboone = \notes { - \hoboonestart - \hobooneintro - \hoboonemid - \hoboonesecondstart - \hobooneintro - \hoboonelast -} - -global = \notes{ - \key es; - \time 2/4; - \skip 4*110; - \key g; | - \bar "||"; - \skip 4*58; - \key es; | - \bar "||"; - \skip 4*220; - \bar "|."; -} - - -$staff_hoboone = \context Staff = hoboonestaff < - \global - \property Staff.instrument = "oboe" - % don't expand multi-bar rest - \property Score.skipBars = 1 - \hoboone -> - -a4 = \paper{ - \translator{ \BarNumberingStaffContext } -} - -a4sixteen = \paper{ - \paper_sixteen - linewidth= 193.\mm; - \translator { \BarNumberingStaffContext } -} - -\score{ - \$staff_hoboone - \paper{ \a4 } - \midi{ - \tempo 4 = 80; - } -% \paper{ \a4sixteen } -} - -- 2.39.5