release: 1.5.29

[lilypond.git] / ly / property-init.ly

diff --git a/ly/property-init.ly b/ly/property-init.ly
index 84c8d2d46e8baf109ffea30d318f177697ba6f70..4c1eb13019443edfe511af6ea9a2e16e3c68d67e 100644 (file)
--- a/ly/property-init.ly
+++ b/ly/property-init.ly
@@ -44,6 +44,11 @@ scriptBoth = {
   \property Voice.Script \revert #'direction
 }
 
+dotsUp = \property Voice.Dots \override #'direction = #1
+dotsDown = \property Voice.Dots \override #'direction = #-1
+dotsBoth = \property Voice.Dots \revert #'direction 
+
+% why doubly?
 tupletUp  = {
   \property Voice.TupletBracket \override #'direction = #1
   \property Voice.TupletBracket \override #'direction = #1
@@ -84,12 +89,14 @@ voiceOne = {
   \stemUp
   \slurUp
   \tieUp
+  \dotsUp    
 }
 
 voiceTwo = {
   \stemDown
   \slurDown
   \tieDown
+  \dotsDown  
 }
    
 voiceThree = {
@@ -97,6 +104,7 @@ voiceThree = {
   \slurUp
   \tieUp
   \shiftOn
+  \dotsUp
 }
 
 voiceFour = {
@@ -104,6 +112,7 @@ voiceFour = {
   \slurDown
   \tieDown
   \shiftOn
+  \dotsDown
 }
 
 % There's also dash, but setting dash period/length should be fixed.
@@ -147,11 +156,54 @@ autoBeamOn = \property Voice.noAutoBeaming = ##f
 emptyText = \property Voice.textNonEmpty = ##f
 fatText = \property Voice.textNonEmpty = ##t
 
-showStaffSwitch = \property PianoStaff.followVoice = ##t
-hideStaffSwitch = \property PianoStaff.followVoice = ##f
+showStaffSwitch = \property Voice.followVoice = ##t
+hideStaffSwitch = \property Voice.followVoice = ##f
+
+% FIXME: Move this docu (to where?)
+
+% accidentals as they were common in the 18th century.
+defaultAccidentals = {
+  \property Score.extraNatural = ##t
+  \property Score.autoAccidentals = #'((measure-same-octave . 0))
+  \property Score.autoCautionaries = #'()  
+}
+
+% accidentals as suggested by Kurt Stone, Music Notation in the 20th century.
+% This includes all the default accidentals, but accidentals also needs cancelling
+% in other octaves and in the next measure.
+modernAccidentals = {
+  \property Score.extraNatural = ##f
+  \property Score.autoAccidentals = #'((measure-same-octave . 0) (measure-any-octave . 0) (measure-any-octave . 1))
+  \property Score.autoCautionaries = #'()  
+}
+
+% the accidentals that Stone adds to the old standard as cautionaries
+modernCautionaries = {
+  \property Score.extraNatural = ##f
+  \property Score.autoAccidentals = #'((measure-same-octave . 0))
+  \property Score.autoCautionaries = #'((measure-any-octave . 0) (measure-any-octave . 1))  
+}
+
+% Do not reset the key at the start of a measure.  Accidentals will be
+% printed only once and are in effect until overridden, possibly many
+% measures later.
+noResetKey = {
+  \property Score.autoAccidentals = #'((measure-same-octave . #t))
+  \property Score.autoCautionaries = #'()
+}
+
+% do not set localKeySignature when a note alterated differently from
+% localKeySignature is found.
+% Causes accidentals to be printed at every note instead of
+% remembered for the duration of a measure.
+% accidentals not being remembered, causing accidentals always to be typeset relative to the time signature
+forgetAccidentals = {
+  \property Score.autoAccidentals = #'((measure-same-octave . -1))
+  \property Score.autoCautionaries = #'()  
+}
 
 
-% To remove a Volta bracet or some other graphical object,
+% To remove a Volta bracket or some other graphical object,
 % set it to turnOff. Example: \property Staff.VoltaBracket = \turnOff
 
-turnOff = #'((meta .  ((interfaces . ()))))
+turnOff = #'()