input/test/ancient-accidentals.ly

   1 \header {
   2 texidoc = "Accidentals are available in different ancient styles. This
   3 files lists all of them."
   4
   5 }
   6
   7 \version "1.7.6"
   8
   9 \score {
  10   \context Voice \notes\relative c {
  11     \time 3/4
  12         \property Staff.Accidental \set #'style = #'default
  13         cisis''^"Accidental style = \#'default" cisis! cisis? |
  14         cis cis! cis? |
  15         c c! c? |
  16         ces ces! ces? |
  17         ceses ceses! ceses? |
  18         \break
  19
  20         \property Staff.Accidental \set #'style = #'hufnagel
  21         cisis^"Accidental style = \#'hufnagel" cisis! cisis? |
  22         cis cis! cis? |
  23         c c! c? |
  24         ces ces! ces? |
  25         ceses ceses! ceses? |
  26         \break
  27
  28         \property Staff.Accidental \set #'style = #'medicaea
  29         cisis^"Accidental style = \#'medicaea" cisis! cisis? |
  30         cis cis! cis? |
  31         c c! c? |
  32         ces ces! ces? |
  33         ceses ceses! ceses? |
  34         \break
  35
  36         \property Staff.Accidental \set #'style = #'vaticana
  37         cisis^"Accidental style = \#'vaticana" cisis! cisis? |
  38         cis cis! cis? |
  39         c c! c? |
  40         ces ces! ces? |
  41         ceses ceses! ceses? |
  42         \break
  43
  44         \property Staff.Accidental \set #'style = #'mensural
  45         cisis^"Accidental style = \#'mensural" cisis! cisis? |
  46         cis cis! cis? |
  47         c c! c? |
  48         ces ces! ces? |
  49         ceses ceses! ceses? |
  50
  51   }
  52   \paper { }
  53   \midi { }
  54 }
  55 %% new-chords-done %%