input/test/ancient-accidentals.ly

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