]> git.donarmstrong.com Git - lilypond.git/blob - ly/property.ly
0ac31ec8c632622e91d65a7790decad9f36447a4
[lilypond.git] / ly / property.ly
1 % property.ly
2 % list of properties that lily recognises
3 % and some shorthands (ugh)
4
5 %{
6
7 SEE THE REFERENCE MANUAL FOR EXPLANATIONS.
8
9 %}
10
11 \version "1.3.59";
12
13
14 %{
15 stemup =        \property Voice.verticalDirection = \up 
16 stemboth=       \property Voice.verticalDirection = \center
17 stemdown =      \property Voice.verticalDirection = \down
18 %}
19
20 stemup = \property Voice.basicStemProperties \push #'direction = #1
21 stemdown = \property Voice.basicStemProperties \push #'direction = #-1 
22 stemboth= \property basicStemProperties \pop #'direction
23
24 slurup   = \property Voice.slurVerticalDirection = \up 
25 slurboth = \property Voice.slurVerticalDirection = \center
26 slurdown = \property Voice.slurVerticalDirection = \down
27 shifton  = \property Voice.horizontalNoteShift = #1
28 shiftoff = \property Voice.horizontalNoteShift = #0
29
30 cadenzaOn = \property Score.timing = ##f
31 cadenzaOff = { \property Score.timing = ##t
32         \property Score.measurePosition = #(make-moment 0 1)
33         }
34
35         
36 onevoice = {    
37         \stemboth \shiftoff     
38 }
39
40 voiceone = \stemup
41 voicetwo = \stemdown
42 voicethree = {
43         \stemup
44         \shifton
45 }
46
47 voicefour = {
48         \stemdown
49         \shifton
50 }
51
52 % ugh, cluttering global namespace...
53
54 % ugh2. 
55 infinity=10000
56
57 beamslopeproportional = 
58         \property Score.beamSlopedamping = 0
59
60 beamslopedamped = 
61         \property Score.beamSlopedamping = 1
62
63
64 beamslopezero = 
65         \property Score.beamSlopedamping = \infinity
66
67
68 % this sucks, you'd want to pass an array, at least
69 % (or embedded code: you still can't dictate the slope / stemlength)
70 beamposfree = 
71         \property Score.beamQuantisation = 0
72
73
74 beamposnormal = 
75         \property Score.beamQuantisation = 1
76
77
78 beampostraditional = 
79         \property Score.beamQuantisation = 2
80
81
82 slurnormal = 
83         \property Voice.slurDash = ##f
84
85
86 slurdotted =                            
87         \property Voice.slurDash = 1
88
89
90 tupletoff =
91         \property Voice.tupletVisibility = 0
92
93 tupleton = 
94         \property Voice.tupletVisibility = 3
95
96 tiny  = 
97         \property Voice.fontSize= -2
98
99
100 small  = 
101         \property Voice.fontSize= -1
102
103
104 normalsize = {
105         \property Voice.fontSize= 0
106 }
107
108 normalkey = {
109         \property Staff.keyOctaviation = ##f
110 }
111
112 specialkey = {
113         \property Staff.keyOctaviation = ##t
114 }
115
116 % End the incipit and print a ``normal line start''.
117 endincipit = \notes{
118     \partial 16; s16  % Hack to handle e.g. \bar ".|"; \endincipit
119     \property Staff.clefStyle = #"fullSizeChanges" 
120     \bar "";
121 }
122
123 autoBeamOff = \property Voice.noAutoBeaming = ##t
124 autoBeamOn = \property Voice.noAutoBeaming = ##f
125
126
127 emptyText = \property Voice.textNonEmpty = ##f
128 fatText = \property Voice.textNonEmpty = ##t
129