Documentation/snippets/modern-tab-text-clef.ly

   1 %% Do not edit this file; it is automatically
   2 %% generated from LSR http://lsr.dsi.unimi.it
   3 %% This file is in the public domain.
   4 \version "2.13.4"
   5
   6 \header {
   7   lsrtags = "staff-notation, fretted-strings"
   8
   9   texidoc = "
  10 Use a markup text to replace the (TAB) clef glyph with a modern font.
  11
  12 "
  13   doctitle = "Modern TAB text clef"
  14 } % begin verbatim
  15
  16 TAB = \markup {
  17   \raise #1.5
  18   \sans
  19   \bold
  20   \huge
  21   \override #'(baseline-skip . 2.5)
  22   \left-align
  23   \center-column {
  24     T
  25     A
  26     B
  27   }
  28 }
  29
  30 \new TabStaff {
  31   \override Staff.Clef #'stencil = #(lambda (grob)
  32     (grob-interpret-markup grob TAB))
  33   a
  34 }