]> git.donarmstrong.com Git - lilypond.git/blob - ly/gregorian-init.ly
* input/test/divisiones.ly: added
[lilypond.git] / ly / gregorian-init.ly
1 \version "1.7.16"
2
3 %%%%%%%%
4 %%%%%%%% shortcuts common for all styles of gregorian chant notation
5 %%%%%%%%
6
7 %
8 % declare head prefix shortcuts
9 %
10 virga =
11   \once \property Voice.LigatureHead \override #'virga = ##t
12 stropha =
13   \once \property Voice.LigatureHead \override #'stropha = ##t
14 inclinatum =
15   \once \property Voice.LigatureHead \override #'inclinatum = ##t
16 auctum =
17   \once \property Voice.LigatureHead \override #'auctum = ##t
18 aucta =
19   \once \property Voice.LigatureHead \override #'auctum = ##t
20 descendens =
21   \once \property Voice.LigatureHead \override #'descendens = ##t
22 ascendens =
23   \once \property Voice.LigatureHead \override #'ascendens = ##t
24 pes =
25   \once \property Voice.LigatureHead \override #'pes-or-flexa = ##t
26 flexa =
27   \once \property Voice.LigatureHead \override #'pes-or-flexa = ##t
28 semivocalis =
29   \once \property Voice.LigatureHead \override #'semivocalis = ##t
30 oriscus =
31   \once \property Voice.LigatureHead \override #'oriscus = ##t
32 quilisma =
33   \once \property Voice.LigatureHead \override #'quilisma = ##t
34 deminutum =
35   \once \property Voice.LigatureHead \override #'deminutum = ##t
36
37 %
38 % declare divisiones shortcuts
39 %
40 virgula = {
41   \once \property Voice.BreathingSign \override #'text = #"scripts-rcomma"
42   \once \property Voice.BreathingSign \override #'font-relative-size = #-1
43   \breathe
44 }
45 caesura = {
46   \once \property Voice.BreathingSign \override #'text = #"scripts-rvarcomma"
47   \once \property Voice.BreathingSign \override #'font-relative-size = #-1
48   \breathe
49 }
50 divisioMinima = {
51   \once \property Voice.BreathingSign \override #'molecule-callback = #Breathing_sign::divisio_minima
52   \breathe
53 }
54 divisioMaior = {
55   \once \property Voice.BreathingSign \override #'molecule-callback = #Breathing_sign::divisio_maior
56   \once \property Voice.BreathingSign \override #'Y-offset-callbacks = #'()
57   \breathe
58 }
59 divisioMaxima = {
60   \once \property Voice.BreathingSign \override #'molecule-callback = #Breathing_sign::divisio_maxima
61   \once \property Voice.BreathingSign \override #'Y-offset-callbacks = #'()
62   \breathe
63 }
64 finalis = {
65   \once \property Voice.BreathingSign \override #'molecule-callback = #Breathing_sign::finalis
66   \once \property Voice.BreathingSign \override #'Y-offset-callbacks = #'()
67   \breathe
68 }