Walter Garcia-Fontes wrote
> I get an error in your code for "slanting" the font: [...]
Hi Walter,
The ly:stencil-outline command did not exist in 2.18.2 yet.
Here's a downgraded version of \slanted:
%%%%% BEGIN OF SNIPPET
#(define-markup-command
(slanted layout props arg)
(markup?)
#:category font
#:properties ((slant-angle 12))
"Fake a slanted font"
(let* ((alpha-rad (* 0.5 (acos (tan (* (/ PI -180) slant-angle)))))
(alpha-deg (* (/ 180 PI) alpha-rad))
(stencil
(if (markup? arg)
(interpret-markup layout props arg)
empty-stencil))
(x-ext (ly:stencil-extent stencil X))
(y-ext (ly:stencil-extent stencil Y)))
(ly:make-stencil
(ly:stencil-expr
(ly:stencil-scale
(ly:stencil-rotate
(ly:stencil-scale
(ly:stencil-rotate
(ly:make-stencil (ly:stencil-expr stencil) (cons 0 0) (cons 0 0))
45 0 0)
1
(* (tan alpha-rad)))
(* (- alpha-deg)) 0 0)
(* (sqrt 2) (cos alpha-rad)) (/ 0.5 (sqrt 0.5) (sin alpha-rad))))
x-ext y-ext)))
%%%%% END OF SNIPPET
HTH,
Torsten
--
Sent from: http://lilypond.1069038.n5.nabble.com/User-f3.html
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user
