Han-Wen:
> Sorry for looking at this so late.
>
> General comments:
>
> - you're adding an enormous bunch of code to the instrument name
> engraver. That's a bad idea. If this idea merits an engraver, it
> should be a separate one.
...
> - If I'm reading this correctly, this is all a grand hack to add a
> little staff to an instrument name. I don't see the essential
> difference between this and
>
> \set instrumentName = \markup { \score { .. } the-real-name }
>
> except that this is longer, more error prone and less flexible. Again,
> what problem are you trying to solve?
>
> 2008/2/9, Nicolas Sceaux <[EMAIL PROTECTED]>:
> > > Here is draft patch: the Instrument_name engraver is used to create an
> > > Incipit grob before the first line when an incipit has been specified.
> > > There are several problems in it:
...
> > Both these problems are solved in the following patch.
> > Do core developpers see a problem with it?
Inicipits can be done with the code below.
Regards,
/Karl
%-----------------------------------
\version "2.6.4"
men = {
\override Accidental #'style = #'mensural
\override NoteHead #'style = #'petrucci
\override Rest #'style = #'neomensural
\override Staff.TimeSignature #'style = #'mensural
\override Stem #'flag-style = #'mensural
\override Stem #'thickness = #0.8
% \set Score.timing = ##f
\set Staff.defaultBarType = ""
#(set-accidental-style 'forget)
}
nor = {
\override Accidental #'style = #'default
\override NoteHead #'style = #'default
\override Rest #'style = #'default
\override Staff.TimeSignature #'style = #'default
\override NoteHead #'font-size = #'0
\override Stem #'flag-style = #'default
\override Stem #'thickness = #1.9
\override TimeSignature #'style = #'default
#(set-accidental-style 'default)
% \set Score.timing = ##t
}
staa = {
\override Score.SpanBar #'print-function = ##f
\override Score.BarLine #'print-function = ##f
\men
}
jump = {
\stopStaff
\once \override Score.TimeSignature #'print-function = ##f
\nor
\time 3/8
s4.
\revert Score.SpanBar #'print-function
\revert Score.BarLine #'print-function
\startStaff
\once \override Score.TimeSignature #'print-function = ##f
\time 1/16
s16
\override Score.SpanBar #'print-function = ##f
\once \override Staff.Clef #'full-size-change = ##t
\set Staff.forceClef = ##t
\clef bass
\time 4/4
\bar ""
}
%----------------------------------------
% Music and lyrics
clefic = { \clef "petrucci-c1" }
vic = \relative c' { c1 c }
lic = \lyricmode { A B }
clefmc = { \clef soprano }
vmc = \relative c' { \vic d }
lmc = \lyricmode { \lic c d e f g }
clefib = { \clef "petrucci-f" }
vib = \relative c { a1 a }
lib = \lyricmode { A B }
clefmb = { \clef bass }
vmb = \relative c { \vib g }
lmb = \lyricmode { \lib c d e f g }
%----------------------------------------
\score {
\new ChoirStaff \with {
% a pain to set? Thats Right!!!
\override SystemStartBracket #'extra-offset = #'( 38.8 . 0 )
} {
<<
\new Staff {
\set Staff.instrument = \markup { "Cantus" }
\context Voice = vc { \clefic \staa \vic \jump \clefmc \vmc }
}
\context Lyrics = lc \lyricsto vc { \lic \lmc }
\new Staff {
\set Staff.instrument = \markup { "Bassus" }
\context Voice = vb { \clefib \staa \vib \jump \clefmb \vmb }
}
\context Lyrics = lb \lyricsto vb { \lib \lmb }
>>
}
\layout {
\context {
\Score
\consists Span_bar_engraver
\remove System_start_delimiter_engraver
}
}
}
c.pdf
Description: c.pdf
_______________________________________________ lilypond-devel mailing list lilypond-devel@gnu.org http://lists.gnu.org/mailman/listinfo/lilypond-devel
