release: 1.0.17

[lilypond.git] / init / property.ly

diff --git a/init/property.ly b/init/property.ly
index 9520dbb86f8b59d77a3b41e368dfcc309faef5b7..4ab97b920fdd1b5f975e37a11e8859b9cb83da14 100644 (file)
--- a/init/property.ly
+++ b/init/property.ly
@@ -14,13 +14,26 @@ ydirection          0       stem direction free     \stemboth
 ydirection             1       force stem up           \stemup
 pletvisibility         0       show nothing
 pletvisibility         1       show number
-pletvisibility         2       show number, and bracket-if-no-beam
+pletvisibility         2       show (number and bracket)-if-no-beam
+pletvisibility         3       show number, and bracket-if-no-beam
 pletvisibility         4       show number, and bracket
 
 slurdash               0       normal slurs
 slurdash               1       dotted slurs
 slurdash               >1      dashed slurs
 
+slurydirection         -1      force stem down         \slurdown
+slurydirection         0       stem direction free     \slurboth
+slurydirection         1       force stem up           \slurup
+
+slurydirection         -1      force stem down         \slurdown
+slurydirection         0       stem direction free     \slurboth
+slurydirection         1       force stem up           \slurup
+
+textalignment          -1      left alignment of text
+textalignment          0       center alignment of text
+textalignment          1       right alignment of text
+
 [Score?]
 beamslopedamping       0       no damping              \beamslopeproportional  
 beamslopedamping       1       damping1)               \beamslopedamped
@@ -31,6 +44,18 @@ beamquantisation     0       no quantisations        \beamposfree
 beamquantisation       1       quantise pos and slope  \beamposnormal
 beamquantisation       2       quantise avoide wedge2) \beampostraditional
 
+[Staff]
+keyoctaviation 0       Key signature only for specified octave \specialkey
+keyoctaviation 1       Key signature for all octaves   \normalkey
+
+timeSignatureStyle     C       Use C and stroked C for 4/4,2/2
+timeSignatureStyle     old     Use old style mensuration marks
+timeSignatureStyle     1       Use single number
+timeSignatureStyle     ""      Use normal two-digit time signature
+timeSignatureStyle     Cn/m    Set symbol explicitly, n/m=2/2 or 4/4   
+timeSignatureStyle     oldn/m  Set symbol explicitly,
+                               n/m=2/2,3/2,3/4,4/4,6/4 or 9/4.
+
 
 [Staff?]
 instrument             ascii   midi instrument table lookup
@@ -66,36 +91,83 @@ stemdown = {
        \skip 1*0;
        \property Voice.ydirection = \down
 }
+slurup = {
+       \skip 1*0;
+       \property Voice.slurydirection = \up 
+       }
+slurboth= {
+       \skip 1*0;
+       \property Voice.slurydirection = \center
+}
+slurdown = {   
+       \skip 1*0;
+       \property Voice.slurydirection = \down
+}
+
+shifton =      \property Voice.hshift = 1
+shiftoff =     \property Voice.hshift = 0
 
 onevoice = {   
-       \property Voice.ydirection = \center
-       \property Voice.hshift = 0
+       \stemboth \shiftoff     
 }
 
 voiceone = {   
        \type Voice = one 
        \skip 1*0;
-       \property Voice.ydirection = \up
+       \stemup
 }
 
 voicetwo = {   
        \type Voice = two
        \skip 1*0;
-       \property Voice.ydirection = \down
+       \stemdown
 }
 
 voicethree = {         
        \type Voice = three
        \skip 1*0;
-       \property Voice.ydirection = \up
-       \property Voice.hshift = 1
+       \stemup
+
 }
 
 voicefour = {  
        \type Voice = four
        \skip 1*0;
-       \property Voice.ydirection = \down
-       \property Voice.hshift = 1
+       \stemdown
+       \shifton
+}
+
+onestaff = {   
+       \translator Staff=one
+       \skip 1*0;
+}
+
+staffone = {   
+       \translator Staff=one
+       \skip 1*0;
+       \property Staff.ydirection = \center
+       \property Staff.hshift = 0
+}
+
+stafftwo = {   
+       \translator Staff=two
+       \skip 1*0;
+       \property Staff.ydirection = \center
+       \property Staff.hshift = 0
+}
+
+staffthree = {         
+       \translator Staff=three
+       \skip 1*0;
+       \property Staff.ydirection = \center
+       \property Staff.hshift = 0
+}
+
+stafffour = {  
+       \translator Staff=four
+       \skip 1*0;
+       \property Staff.ydirection = \center
+       \property Staff.hshift = 0
 }
 
 % ugh, cluttering global namespace...
@@ -139,3 +211,63 @@ slurdotted = {
        \property Voice.slurdash = 1
 }
 
+%{
+ for grace note hack, see input/test/grace.ly
+%}
+pletoff = {
+       \property Voice.pletvisibility = 0
+}
+pleton = {
+       \property Voice.pletvisibility = 3
+}
+tiny  = {
+       \property Voice.fontsize= "-2"
+       \pletoff %urg
+}
+
+small  = {
+       \property Voice.fontsize= "-1"
+}
+
+normalsize = {
+       \property Voice.fontsize= "0"
+       \pleton %urg
+}
+
+%{
+  [urg: try at] temporary grace note hack
+  the total visible duration of the grace notes must be half
+  the duration of the 'at' note: e.g.:
+
+  \grace b8 \graceat c4 \ecarg
+  \grace c16 b16 \graceat c4 \ecarg
+
+grace = {
+       \tiny
+% it would be so cool not to have to specify these factors each time...
+% :-(
+       \property Voice.pletvisibility = 0
+       \[1/16
+}
+
+graceat = \melodic {
+       \normalsize
+       \property Voice.pletvisibility = 0
+       \] \[31/32
+}
+
+ecarg =  \melodic {
+       \property Voice.pletvisibility = 0
+       \]
+       \property Voice.pletvisibility = 3
+}
+%}
+
+normalkey = {
+       \property Staff.keyoctaviation = 1
+}
+
+specialkey = {
+       \property Staff.keyoctaviation = 0
+}
+