input/regression/fret-diagrams-dots.ly

   1 \version "2.17.6"
   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.dot-radius = #0.3
  36     c' ^\markup {
  37             \fret-diagram-verbose #'((mute 6)
  38                                      (place-fret 5 3 1)
  39                                      (place-fret 4 5 2)
  40                                      (place-fret 3 5 3)
  41                                      (place-fret 2 5 4)
  42                                      (place-fret 1 3 1)
  43                                      (barre 5 1 3))}
  44
  45      %% C major for guitar, verbose style
  46     \revert TextScript.fret-diagram-details.dot-radius
  47     \once \override TextScript.fret-diagram-details.dot-color = #'white
  48     c' ^\markup {
  49             \fret-diagram-verbose #'((mute 6)
  50                                      (place-fret 5 3 1)
  51                                      (place-fret 4 5 2)
  52                                      (place-fret 3 5 3)
  53                                      (place-fret 2 5 4)
  54                                      (place-fret 1 3 1)
  55                                      (barre 5 1 3))}
  56
  57      %% C major for guitar,  verbose style
  58     \once \override TextScript.fret-diagram-details.dot-position = #0.5
  59     c'1 ^\markup {
  60             \fret-diagram-verbose #'((mute 6)
  61                                      (place-fret 5 3 1)
  62                                      (place-fret 4 5 2)
  63                                      (place-fret 3 5 3)
  64                                      (place-fret 2 5 4)
  65                                      (place-fret 1 3 1)
  66                                      (barre 5 1 3))}
  67
  68  }
  69 >>
  70
  71