release: 1.3.103

[lilypond.git] / input / scarlatti-properties.ly

diff --git a/input/scarlatti-properties.ly b/input/scarlatti-properties.ly
index 3a86facf1c7dd6857f76d410bd846a2f8b46ec5f..5584a545213b37a297551a46a80e4e85a81b0b72 100644 (file)
--- a/input/scarlatti-properties.ly
+++ b/input/scarlatti-properties.ly
@@ -1,15 +1,34 @@
 
 
-rh=\property Thread.noteHeadStyle=##f 
-lh=\property Thread.noteHeadStyle = #'diamond
-n=\property Thread.fontSize=#0  
-sm=\property Thread.fontSize=#-1 
-su=\property Voice.verticalDirection=#1  
-sd=\property Voice.verticalDirection=#-1
-zs=\property Voice.forceHorizontalShift=#0.0
+
+\version "1.3.96";
+
+rh=\property Thread.NoteHead \push #'style = #'default
+lh=\property Thread.NoteHead \push #'style = #'diamond
+
+n = \property Thread.NoteHead \pop #'font-relative-size % = #'diamond %\property Thread.fontSize=#0  
+sm=\property Thread.NoteHead \push #'font-relative-size = #-1 
+
+% su=\property Voice.verticalDirection=#1  
+% sd=\property Voice.verticalDirection=#-1
+
+su=\property Voice.Stem \push #'direction = #1
+sd=\property Voice.Stem \push #'direction = #-1  
+
+
+%{
 ls=\property Voice.forceHorizontalShift=#-0.6
 sls=\property Voice.forceHorizontalShift=#-0.22
 rs=\property Voice.forceHorizontalShift=#0.6
 srs=\property Voice.forceHorizontalShift=#0.22
+%}
+zs = \property Voice.NoteColumn \pop #'force-hshift  % #0.0
+ls = \property Voice.NoteColumn \push #'force-hshift = #-0.6
+sls= \property Voice.NoteColumn \push #'force-hshift = #-0.22
+rs = \property Voice.NoteColumn \push #'force-hshift = #0.6
+srs= \property Voice.NoteColumn \push  #'force-hshift = #0.22
+
+
+
 ab=\property Voice.noAutoBeaming=##f
 xb=\property Voice.noAutoBeaming=##t