input/test/markup.ly

   1 %
   2 % Test new font selection and scm text markup
   3 %
   4
   5 \score{
   6         \notes\relative c''{
   7                 a-"text"
   8                 b-\textscript #"texta"
   9                 c-\textscript #'(bold "textb")
  10                 d-\textscript #'(lines "een" "twee" "drie")
  11                 e-\textscript #'(lines (bold "een")
  12                   (rows "en" "dat" "is" ((family . "orator") "2"))
  13                   (italic "drie"))
  14         }
  15         \paper{
  16                 linewidth = -1.\mm;
  17                 \translator{
  18                         \ScoreContext
  19                         TextScript \push #'style-sheet = #'paper16
  20                         TextScript \push #'font-family = #'roman
  21                         TextScript \pop #'no-spacing-rods
  22                 }
  23         }
  24 }