]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/test/accid.ly
* VERSION (MY_PATCH_LEVEL): make 1.7.0
[lilypond.git] / input / test / accid.ly
index ec686fadc0f9258aeb8def24df3b23ac2f2401f8..d26f5292bf66b3f2776ee293090b87faa55fd6b7 100644 (file)
@@ -1,7 +1,42 @@
+\version "1.5.68"
+
 \score { 
   \context Voice \notes\relative c {
-    \time 3/4;
-       cisis'' cisis! cisis? |
+    \time 3/4
+       \property Staff.Accidental \set #'style = #'default
+       cisis''^"Accidental style = \#'default" cisis! cisis? |
+       cis cis! cis? | 
+       c c! c? |
+       ces ces! ces? |
+       ceses ceses! ceses? |
+       \break
+       
+       \property Staff.Accidental \set #'style = #'hufnagel
+       cisis^"Accidental style = \#'hufnagel" cisis! cisis? |
+       cis cis! cis? | 
+       c c! c? |
+       ces ces! ces? |
+       ceses ceses! ceses? |
+       \break
+       
+       \property Staff.Accidental \set #'style = #'medicaea
+       cisis^"Accidental style = \#'medicaea" cisis! cisis? |
+       cis cis! cis? | 
+       c c! c? |
+       ces ces! ces? |
+       ceses ceses! ceses? |
+       \break
+       
+       \property Staff.Accidental \set #'style = #'vaticana
+       cisis^"Accidental style = \#'vaticana" cisis! cisis? |
+       cis cis! cis? | 
+       c c! c? |
+       ces ces! ces? |
+       ceses ceses! ceses? |
+       \break
+       
+       \property Staff.Accidental \set #'style = #'mensural
+       cisis^"Accidental style = \#'mensural" cisis! cisis? |
        cis cis! cis? | 
        c c! c? |
        ces ces! ces? |