I'm setting an incipit where the original key signature has 1 flat and
the key signature for the piece has no flats.  I would like to not
have the original key signature cancelled by putting a natural on the B.

I have looked at the documentation, and it isn't explicit enough for
me.  It looks like there's some kind of visibility property that can
be set, but I can't find an example of how to do it.

The example is attached.

#(set! point-and-click line-location)
#(set! point-and-click line-location)
\header {
        composer = "Claudin de Sermisy"
        crossRefNumber = "1"
        footnotes = "\\\\Original clef, C on third line"
        origin = "Edited by Courtney S. Adams, A-R Editions, Inc. Madison, Wisconsin"
        tagline = "Lily was here 1.4.3 -- automatically converted from ABC"
        title = "[6] Au pre de vous secretement demeure\\\\Cantus"
}
% incipit for cantus.abc
% written by writeincipit.sh on Wed Jun 27 09:06:38 EDT 2001
originalclef=\notes{\clef "mensural2_c3"}
firstnote=\notes{  f'\breve    }
range=\notes{<a4 d''4>}
modernclef=\notes{\clef "treble"}
originalkey=\notes{\key d \minor }
keysignature=\notes{\key a \minor }
timesignature=\notes{\time 2/2  }
%incipit template /home/lconrad/incipit.ly 
incipitwords=\lyrics{ _ _ }
%use this only if necessary
%\property Score.barAlways=##t
incipit = \notes {
\property Voice.NoteHead \override #'style = #'mensural
\originalclef
    \property Staff.TimeSignature \override #'style = #'old
\originalkey
\timesignature
\firstnote
\bar "|"
% now draw modern clef and key signature in normal font
\property Voice.NoteHead \override #'style = #'baroque
\modernclef
\keysignature
\property Staff.fontSize = #-1
\property Voice.Stem \override #'transparent = ##t
\range
\property Staff.fontSize \unset
\property Voice.Stem \revert #'transparent
\bar "|."
\context Staff \outputproperty #(make-type-checker 'clef-interface) #'full-size-change 
= ##t
\property Staff.forceClef = ##t
\modernclef
}

%end incipit

wordsdefaultVA = \lyrics  {
\incipitwords
Au pres de vous  _   _   _   _   _   _   _   _  
 _  se-  cre-  te-  ment de-  meu-  re, se-  cre-  te-  ment  _   _   _   _  de-   
 _   _   _   _   _   _   _   _  meu-  _  re Mon po-  vre cueur sans que nul  
le con-  for-  _   _   _   _   _   _   _  te, Et si lan-  guis  
 _   _   _  pour la dou-  leur qui por-  _   _   _   _   _   _   _   _   _  te,  
Puis que vou-  lés  _   _   _   _   _   _   _   _   _  qu'en  
ce tour-  ment il meu-  re, qu'en ce tour-  ment  _   _  il  
 _   _   _   _   _   _   _   _  meu-  _  re, Puis re.  
}
voicedefault = \notes {
\property Staff.noAutoBeaming = ##t
\property Score.breakAlignOrder = #'(
Left_edge_item
Span_bar
Breathing_sign
Clef_item
Key_item
time_signature
Staff_bar
)
\property Staff.forgetAccidentals = ##t
\property Voice.NoteHead \override  #'style = #'baroque
\property Staff.Custos \override #'style = #'mensural
\property Score.defaultBarType="empty"
\incipit
% %gchordfont Helvetica 12 box
 % %MIDI nobarlines
 % %MIDI ratio 2 1
 \property Staff.TimeSignature \override #'style = #'C
 \time 2/2 \key a \minor   c''1    b'2.    b'4    a'4.    g'8    a'8    b'8    
c''4.    b'8    a'8    g'8    a'2      g'2    r4   g'4    a'4    a'4    c''4    
c''4    b'2    a'2    r4   g'4    g'4    g'4    a'8    g'8    a'8    b'8    
c''4    b'4.      a'8    g'8    f'8    e'8    d'8    c'8    b8    a4    a'2    
g'4    a'2    r4   e'4    e'4    e'4    g'2    r4   g'4    g'4    g'4      a'4  
  a'4    g'4.    f'8    e'4    a'4    g'4    f'2    e'2    d'4    e'2    r4   
a'4    a'4    a'4    c''2.      b'8    a'8    g'4    g'4    a'4    a'4    g'4   
 f'4    e'8    f'8    g'8    a'8    b'8    c''8    d''4.    c''8    c''2    b'4 
   c''2    r2     c''1    \repeat volta 2 {   b'2.    b'4    a'4.    g'8    a'8 
   b'8    c''4.    b'8    a'8    g'8    a'2    g'2    r4   g'4      a'4    a'4  
  c''4    c''4    b'2    a'2    r4   g'4    g'4    g'4    a'4      b'4 -.   
c''4    b'4.      a'8    g'8    f'8    e'8    d'8    c'8    b8    a4    a'2    
g'4    } \alternative{{   a'1    c''1    } {   a'1 ^\fermata   \bar "|."   }}
}\score{
        \notes <

        \addlyrics
        \context Staff="default"
        {
            \voicedefault 
        }

        \context Lyrics="default" 
        <       
          { \wordsdefaultVA }
        >

    >
        \paper {
           \translator{
\StaffContext
\consists Custos_engraver
}          \translator{
\StaffContext
\consists Custos_engraver
}       }
        \midi {}
}

-- 
Laura (mailto:[EMAIL PROTECTED] , http://www.laymusic.org/ )
(617) 661-8097  fax: (801) 365-6574 
233 Broadway, Cambridge, MA 02139

Reply via email to