Documentation/snippets/open-string-harmonics-in-tablature.ly

   1 %% DO NOT EDIT this file manually; it is automatically
   2 %% generated from LSR http://lsr.dsi.unimi.it
   3 %% Make any changes in LSR itself, or in Documentation/snippets/new/ ,
   4 %% and then run scripts/auxiliar/makelsr.py
   5 %%
   6 %% This file is in the public domain.
   7 \version "2.16.0"
   8
   9 \header {
  10   lsrtags = "fretted-strings"
  11
  12   texidoc = "
  13 This snippet demonstrates open-string harmonics
  14
  15 "
  16   doctitle = "Open string harmonics in tablature"
  17 } % begin verbatim
  18
  19 openStringHarmonics = {
  20   %first harmonic
  21   \harmonicByFret #12 e,2\6_\markup{"1st harm."}
  22   \harmonicByRatio #1/2 e,\6
  23   %second harmonic
  24   \harmonicByFret #7 e,\6_\markup{"2nd harm. - - - -"}
  25   \harmonicByRatio #1/3 e,\6
  26   \harmonicByFret #19 e,\6
  27   \harmonicByRatio #2/3 e,\6
  28   %\harmonicByFret #19 < e,\6 a,\5 d\4 >
  29   %\harmonicByRatio #2/3 < e,\6 a,\5 d\4 >
  30   %third harmonic
  31   \harmonicByFret #5 e,\6_\markup{"3rd harm. - - - -"}
  32   \harmonicByRatio #1/4 e,\6
  33   \harmonicByFret #24 e,\6
  34   \harmonicByRatio #3/4 e,\6
  35   \break
  36   %fourth harmonic
  37   \harmonicByFret #4 e,\6_\markup{"4th harm. - - - - - - - - - - - - -"}
  38   \harmonicByRatio #1/5 e,\6
  39   \harmonicByFret #9 e,\6
  40   \harmonicByRatio #2/5 e,\6
  41   \harmonicByFret #16 e,\6
  42   \harmonicByRatio #3/5 e,\6
  43   %fifth harmonic
  44   \harmonicByFret #3 e,\6_\markup{"5th harm."}
  45   \harmonicByRatio #1/6 e,\6
  46   \break
  47   %sixth harmonic
  48   \harmonicByFret #2.7 e,\6_\markup{"6th harm."}
  49   \harmonicByRatio #1/7 e,\6
  50   %seventh harmonic
  51   \harmonicByFret #2.3 e,\6_\markup{"7th harm."}
  52   \harmonicByRatio #1/8 e,\6
  53   %eighth harmonic
  54   \harmonicByFret #2 e,\6_\markup{"8th harm."}
  55   \harmonicByRatio #1/9 e,\6
  56 }
  57
  58 \score {
  59   <<
  60     \new Staff {
  61       \new Voice {
  62         \clef "treble_8"
  63         \openStringHarmonics
  64       }
  65     }
  66     \new TabStaff {
  67       \new TabVoice {
  68         \openStringHarmonics
  69       }
  70     }
  71   >>
  72 }