]> git.donarmstrong.com Git - lilypond.git/blob - input/regression/tablature-micro-tone.ly
Merge branch 'master' into translation
[lilypond.git] / input / regression / tablature-micro-tone.ly
1 \version "2.19.31"
2
3 \header {
4   texidoc = "The @code{TabStaff} will print micro-tones as mixed numbers of
5 fret-number and a fraction.
6 @code{noteToFretFunction = #(my-determine-frets #t)} needs to be set in Score.
7 @code{FretBoards} will print those micro-tones only if they can be found in the
8 chosen settings for @code{stringTunings}, otherwise a warning (surpressed here)
9 will be printed and an empty @code{FretBoard} returned.  Which should be the
10 case here for the first pitch: @code{gih}"
11 }
12
13 #(ly:set-option 'warning-as-error #f)
14 #(ly:expect-warning (_ "No string for pitch ~a (given frets ~a)") #{ gih #} '())
15
16 \layout {
17   \context {
18     \Score
19     noteToFretFunction = #(determine-frets #t)
20   }
21 }
22
23 custom-tuning = \stringTuning <e, a, d ges beh eeh'>
24
25 mus = \relative {
26   gih4
27   eeses'
28   eeseh
29   ees
30   eeh
31   e
32   eih
33   eis
34   eisih
35   eisis
36 }
37
38 <<
39   \new Staff << \clef "G_8" \mus >>
40   \new FretBoards \with { stringTunings = \custom-tuning } \mus
41   \new TabStaff \with { stringTunings = \custom-tuning } \mus
42 >>