]> git.donarmstrong.com Git - lilypond.git/blob - input/test/markup.ly
8ef49ed00d190694fc7e9dfa242170ec94d7cb31
[lilypond.git] / input / test / markup.ly
1
2 \version "1.3.117";
3
4 %
5 % Test new font selection and scm text markup
6 %
7
8 \score{
9         \notes\relative c''{
10                 \stemUp
11 % {
12                 a-"text"
13                 b-#"texta"
14                 c-#'(bold "textb")
15
16                 d-#'(lines "one" "two" "three")
17                 e-#'(lines (bold "one") 
18                   (rows "and" "there" "is" ((font-family . number) "2"))
19                   (italic "three"))
20                 f-#'(finger "3")
21                 g-#'(music (named "noteheads-2" "flags-u3"))
22                 b-#'(rows "a" (((kern . 3) (raise . 2)) "b") "c")
23                 c-#'(rows "1" (((raise . -2) (kern . -1)) "2") "3")
24 % }
25                 d-#'(lines "Violoncello" "    e" "Contrabasso")
26                 e-#'((lines (baselineskip . 0) (kern . 1.5)) "Violoncello" "    e" "Contrabasso")
27                 e-#'(((baselineskip . 0) (kern . 1.5) lines) "Violoncello" "    e" "Contrabasso")
28                 }
29         \paper{
30                 linewidth = -1.\mm;
31                 \translator{
32                         \ScoreContext
33                         TextScript \override #'font-family = #'roman
34                         TextScript \override #'font-shape = #'upright
35                         TextScript \revert #'no-spacing-rods
36                         TextScript \override #'direction = #1
37                 }
38         }
39 }