input/regression/fret-diagrams-dots.ly

   1 \version "2.14.0"
   2
   3 \header {
   4   texidoc="
   5 Dots indicating fingerings can be changed in location,
   6 size, and coloring.
   7
   8 "
   9 }
  10
  11 \layout { ragged-right = ##t }
  12
  13 <<
  14   \chords {
  15     c1 |
  16     c1 |
  17     c1 |
  18     c1
  19   }
  20
  21   \new Voice {
  22     \textLengthOn
  23
  24      %% C major for guitar,  verbose style
  25     c'1 ^\markup {
  26             \fret-diagram-verbose #'((mute 6)
  27                                      (place-fret 5 3 1)
  28                                      (place-fret 4 5 2)
  29                                      (place-fret 3 5 3)
  30                                      (place-fret 2 5 4)
  31                                      (place-fret 1 3 1)
  32                                      (barre 5 1 3))}
  33
  34      %% C major for guitar, verbose style
  35     \override TextScript #'fret-diagram-details
  36         #'dot-radius = #0.3
  37     c' ^\markup {
  38             \fret-diagram-verbose #'((mute 6)
  39                                      (place-fret 5 3 1)
  40                                      (place-fret 4 5 2)
  41                                      (place-fret 3 5 3)
  42                                      (place-fret 2 5 4)
  43                                      (place-fret 1 3 1)
  44                                      (barre 5 1 3))}
  45
  46      %% C major for guitar, verbose style
  47     \revert TextScript #'fret-diagram-details #'dot-radius
  48     \once \override TextScript #'fret-diagram-details
  49         #'dot-color = #'white
  50     c' ^\markup {
  51             \fret-diagram-verbose #'((mute 6)
  52                                      (place-fret 5 3 1)
  53                                      (place-fret 4 5 2)
  54                                      (place-fret 3 5 3)
  55                                      (place-fret 2 5 4)
  56                                      (place-fret 1 3 1)
  57                                      (barre 5 1 3))}
  58
  59      %% C major for guitar,  verbose style
  60     \once \override TextScript #'fret-diagram-details
  61         #'dot-position = #0.5
  62     c'1 ^\markup {
  63             \fret-diagram-verbose #'((mute 6)
  64                                      (place-fret 5 3 1)
  65                                      (place-fret 4 5 2)
  66                                      (place-fret 3 5 3)
  67                                      (place-fret 2 5 4)
  68                                      (place-fret 1 3 1)
  69                                      (barre 5 1 3))}
  70
  71  }
  72 >>
  73
  74