From 4ba1432a7beada099fc871057f984d2c9e8dc391 Mon Sep 17 00:00:00 2001 From: fred Date: Wed, 27 Mar 2002 01:08:45 +0000 Subject: [PATCH] lilypond-1.3.138 --- input/tricks/ophee-slurs.ly | 19 -- input/tutorial/orchestral-score.ly | 275 ----------------------------- 2 files changed, 294 deletions(-) delete mode 100644 input/tricks/ophee-slurs.ly delete mode 100644 input/tutorial/orchestral-score.ly diff --git a/input/tricks/ophee-slurs.ly b/input/tricks/ophee-slurs.ly deleted file mode 100644 index 663856a909..0000000000 --- a/input/tricks/ophee-slurs.ly +++ /dev/null @@ -1,19 +0,0 @@ - -\header{ -texidoc=" -Slurs can be forced to always attach to note heads. -"; -} - -fragment = \notes { - \property Voice.Slur \set #'direction = #1 - \property Voice.Slur \set #'attachment = #'(head . head) - g''16()g()g()g()d'()d()d()d -} - -\paper { linewidth = -1.; } - -\score { - \notes\relative c \fragment - \paper { } -} diff --git a/input/tutorial/orchestral-score.ly b/input/tutorial/orchestral-score.ly deleted file mode 100644 index aad42f87e0..0000000000 --- a/input/tutorial/orchestral-score.ly +++ /dev/null @@ -1,275 +0,0 @@ - - -\include "paper13.ly"; - -% #(set! point-and-click #t) - -% Coriolan 218-222 -flautoI = \notes\relative c'' { - \property Score.currentBarNumber = #218 - des2.()c4|e(f e)f|\break - r2 des4\sf()c|r2 des4\sf()c| -} -flautoII = \notes\relative c'' { - g2.()as4|bes(as bes)as| - R1*2 -} -oboeI = \notes\relative c'' { - e2.()f4|e(f e)f| - r2 as|r as\sf| -} -oboeII = \notes\relative c'' { - g2.()as4|bes(as bes)as| - r2 as'|r as\sf| -} -clarinettoI = \notes\relative c' { - es2.()d4|c(bis c)bes| -% r2 es4\sf()d|r2 es4\sf()d| -} -clarinettoII = \notes\relative c' { - es2.()d4|c(bes c)bes| -% r2 es'4\sf()d|r2 es4\sf()d| -} -fagottoI = \notes\relative c' { - bes2.()as4|g(f g)f| - r r8 des' des4\sf()es|r r8 des des4\sf()es| -} -fagottoII = \notes\relative c' { - bes2.()as4 | g(f g)f| - f4 r r2 | f4 r r2| -} -cornoI = \notes\relative c''' { - g2. f4|g f g f| -% r4 r8 f f2|r4 r8 f f2| -} -cornoII = \notes\relative c''' { - g,2. d'4|g, d' g, d'| - r4 r8 d d4\sf()es|r4 r8 d d4\sf()es| -} -tromboI = \notes\relative c'' { - c2. c4|c c c c| - R1*2| -} -tromboII = \notes\relative c' { - c2. c4|c c c c| - R1*2| -} -timpani = \notes\relative c { - c2:16 c4 c|c c c c | - R1*2| -} -violinoI = \notes\relative c' { - des'2:16\ff des4: c:|e,: f: e: f:| - r8 as des,4\sf~des()c |r8 as' des,4\sf~des()c| -} -violinoII = \notes\relative c' { - des2:16\ff des4: c: | bes: as: bes: as:| -% r8 as des,4\sf ~ des()c| r8 as' des,4\sf ~ des()c| -} -violaI = \notes\relative c' { - e2:16\ff e4: f:|b,: c: b: c:| - r4 r8 as as2\sf|r4 r8 as as2\sf| -} -violaII = \notes\relative c' { - bes2:16\ff bes4: as:|g: f: g: f: | - r4 r8 f f4\sf()ges|r4 r8 f f4\sf()ges| -} -violoncello = \notes\relative c { - bes2.\ff()as4|g( f g )f | - r4 r8 f' f4\sf()ges |r4 r8 f f4\sf()ges | -} -contrabasso = \notes\relative c { - bes2.\ff()as4|g( f g )f| - f4 r r2 |f'4 r r2| -} - - -#(define text-flat '((font-relative-size . -2) (music "accidentals--1"))) - -staffCombinePianoStaffProperties = { - \property PianoStaff.devNullThread = #'() - \property PianoStaff.soloADue = ##t - \property PianoStaff.soloText = #"" - \property PianoStaff.soloIIText = #"" - % This is non-conventional, but currently it is - % the only way to tell the difference. - \property PianoStaff.aDueText = #"\\`a2" - \property PianoStaff.splitInterval = #'(1 . 0) - \property PianoStaff.changeMoment = #`(,(make-moment 1 1) . ,(make-moment 1 1)) - \property PianoStaff.noDirection = ##t -} - -%% -%% Hmm, can't we move this to a `template.ly' -%% -\score { - < - \context StaffGroup = wood < - \context Staff = flauti < - \property Staff.midiInstrument = #"flute" - \property Staff.instrument = "2 Flauti" - \property Staff.instr = "Fl." - \context Voice=one \partcombine Voice - \context Thread=one \flautoI - \context Thread=two \flautoII - > - \context Staff = oboes < - \property Staff.midiInstrument = #"oboe" - \property Staff.instrument = "2 Oboi" - \property Staff.instr = "Ob." - \context Voice=one \partcombine Voice - \context Thread=one \oboeI - \context Thread=two \oboeII - > - \context Staff = clarinets < - \property Staff.midiInstrument = #"clarinet" - \property Staff.instrument = #`(lines - "2 Clarinetti" (rows "(B" ,text-flat ")")) - \property Staff.instr = #`(lines - "Cl." (rows "(B" ,text-flat ")")) - \property Staff.transposing = #-2 - \notes \key f \major; - \context Voice=one \partcombine Voice - \context Thread=one \clarinettoI - \context Thread=two \clarinettoII - > - \context Staff = bassoons < - \property Staff.midiInstrument = #"bassoon" - \property Staff.instrument = "2 Fagotti" - \property Staff.instr = "Fg." - \clef bass; - \context Voice=one \partcombine Voice - \context Thread=one \fagottoI - \context Thread=two \fagottoII - > - > - \context StaffGroup = brass < - \context Staff = frenchHorns < - \property Staff.midiInstrument = #"french horn" - \property Staff.instrument = #`(lines - "2 Corni" (rows "(E" ,text-flat ")")) - \property Staff.instr = #`(lines - "Cor." (rows "(E" ,text-flat ")")) - \property Staff.transposing = #3 - \notes \key c \major; - \context Voice=one \partcombine Voice - \context Thread=one \cornoI - \context Thread=two \cornoII - > - \context Staff = trumpets < - \property Staff.midiInstrument = #"trumpet" - \property Staff.instrument = #`(lines - "2 Trombe" (rows "(C)")) - \property Staff.instr = #`(lines - "Tbe." (rows "(C)")) - \context Voice=one \partcombine Voice - \context Thread=one \tromboI - \context Thread=two \tromboII - > - > - \context StaffGroup = timpani < - \context Staff = timpani < - \property Staff.midiInstrument = #"timpani" - \property Staff.instrument = #'(lines - "2 Timpani" "(C-G)") - \property Staff.instr = #"Timp." - \clef bass; - \timpani - > - > - \context StaffGroup = strings < - \context GrandStaff = violins < - \context Staff = viI < - \property Staff.midiInstrument = #"violin" - \property Staff.instrument = "Violino I" - \property Staff.instr = "Vi. I" - \violinoI - > - \context Staff = viII < - \property Staff.midiInstrument = #"violin" - \property Staff.instrument = "Violino II" - \property Staff.instr = "Vi. II" - \violinoII - > - > - \context Staff = vla < - \property Staff.midiInstrument = #"viola" - \property Staff.instrument = "Viola" - \property Staff.instr = "Vla." - \clef alto; - \context Voice=one \partcombine Voice - \context Thread=one \violaI - \context Thread=two \violaII - > - \context PianoStaff=bass < - \staffCombinePianoStaffProperties - \context Staff=one < - \property Staff.midiInstrument = #"cello" - \property Staff.instrument = #'(lines - "Violoncello" " e" "Contrabasso") - \property Staff.instr = "Vc." - \clef bass; - > - \context Staff=two < - \property Staff.midiInstrument = #"contrabass" - \property Staff.instrument = "Contrabasso" - \property Staff.instr = "C.B." - \clef bass; - \skip 1*4; % sustain clef - > - \context Staff=one \partcombine Staff - \context Voice=one \violoncello - \context Voice=two \contrabasso - > - > - > - \paper { - \paperThirteen - linewidth = 80 * \staffspace; - textheight = 200 * \staffspace; - \translator{ - \ThreadContext - \consists "Rest_engraver"; - - % Set value for engraver at thread level, - % to override the default that is set in ScoreContext - % for added engraver at Voice level - devNullThread = #'() - } - \translator{ - \VoiceContext - \remove "Rest_engraver"; - - % The staff combine (bassi part) needs a - % thread_devnull_engraver here. - % Instead of maintaining two separate hierarchies, - % we switch add it, but switch it off immediately. - % --> move to Score level to be able to override - % The staff combine part switches it on. - - %% devNullThread = #'never - \consists "Thread_devnull_engraver"; - } - \translator{ - \HaraKiriStaffContext - \consists "Mark_engraver"; - } - \translator { - \OrchestralScoreContext - % skipBars = ##t - - soloText = #"I." - soloIIText = #"II." - % By default, turn off the Thread_devnull_engraver - % at Voice level - devNullThread = #'never - - % Hmm - currentBarNumber = #218 - BarNumber \override #'padding = #3 - RestCollision \override #'maximum-rest-count = #1 - TimeSignature \override #'style = #'C - } - } -} - -- 2.39.5