input/regression/new-markup-scheme.ly

   1
   2 \header {
   3
   4     texidoc = "There is a Scheme macro @code{markup} to produce markup
   5     texts using a similar syntax as @code{\\markup}.
   6
   7 "
   8
   9     }
  10 \version "2.5.2"
  11 \score {
  12      {
  13         \fatText
  14         f'1-\markup {
  15             foo
  16             \raise #0.2 \hbracket \bold bar
  17             \override #'(baseline-skip . 4)
  18
  19             \bracket \column { baz bazr bla }
  20             \hspace #2.0
  21             \override #'(font-encoding . fetaMusic) {
  22                 \lookup #"noteheads-0"
  23             }
  24             \musicglyph #"accidentals.-1"
  25             \combine "X" "+"
  26             \combine "o" "/"
  27             \box \column { \line { "string 1" } \line { "string 2" } }
  28             "$\\emptyset$"
  29             \italic Norsk
  30             \super "2"
  31             \dynamic sfzp
  32             \huge { "A" \smaller "A" \smaller \smaller "A"
  33                     \smaller \smaller \smaller "A" }
  34             \sub "alike"
  35         }
  36         \break
  37         f'1-#(markup*
  38               "foo"
  39               #:raise 0.2 #:hbracket #:bold "bar"
  40               #:override '(baseline-skip . 4)
  41               #:bracket #:column ( "baz" "bazr" "bla" )
  42               #:hspace 2.0
  43               #:override '(font-encoding . fetaMusic) #:line (#:lookup "noteheads-0"
  44                                                        )
  45               #:musicglyph "accidentals.-1"
  46               #:combine "X" "+"
  47               #:combine "o" "/"
  48               #:box #:column ("string 1" "string 2")
  49               "$\\emptyset$"
  50               #:italic "Norsk"
  51               #:super "2"
  52               #:dynamic "sfzp"
  53               #:huge #:line ("A" #:smaller "A" #:smaller #:smaller "A"
  54                              #:smaller #:smaller #:smaller "A")
  55               #:sub "alike")
  56     }
  57     \layout {
  58         raggedright = ##t
  59         indent = #0
  60         \context {
  61             \Staff
  62             \remove Time_signature_engraver
  63         }
  64     }
  65 }