input/regression/tablature-harmonic-functions.ly

   1 \version "2.14.0"
   2
   3 \header {
   4   texidoc = "
   5 Harmonics can be specified either by ratio or by fret number.
   6 "
   7 }
   8
   9 test = {
  10  e,4
  11  \harmonicByRatio #1/2  e,\6
  12  \harmonicByRatio #1/3  a,\5
  13  \harmonicByRatio #2/3  d,\4 |
  14  \harmonicByRatio #1/4 { g8\3 b\2 e'\1 b\2 < g b e >2 } |
  15  e,1 | % check whether tab note head is restored
  16  \harmonicByFret #12 e'4\1 ~
  17  \harmonicByFret #12 e'4\1 (
  18  \ottava #1
  19  \harmonicByFret #7 e'4\1)
  20  \harmonicByFret #5 e'8\1
  21  \ottava #2
  22  \harmonicByFret #4 < b\2 e'\1 >8 |
  23  \harmonicByFret #3 < g\3 b\2 e'\1 >4
  24  \harmonicByFret #2.7 < g\3 b\2 e'\1 >4
  25  \harmonicByFret #2.3 < g\3 b\2 e'\1 >4
  26  \harmonicByFret #2 < g\3 b\2 e'\1 >4 |
  27  \ottava #0
  28  e,1 | % check whether tab note head is restored
  29 }
  30
  31 \paper {
  32   ragged-right = ##f
  33 }
  34
  35 \score {
  36   <<
  37     \new Staff {
  38       \new Voice {
  39         \clef "treble_8"
  40         \override Voice.StringNumber #'transparent = ##t
  41         \test
  42       }
  43     }
  44     \new TabStaff {
  45       \new TabVoice {
  46         \test
  47       }
  48     }
  49   >>
  50 }