More Scheme vector quoting.
[lilypond.git] / input / lsr / broken-crescendo-hairpin.ly
blobb308dbd3927758fbacbf41f5edffad123e47cc56
1 %% Do not edit this file; it is auto-generated from input/new
2 %% This file is in the public domain.
3 \version "2.11.52"
5 \header {
6 texidoces = "
7 Para hacer invisibles partes de un regulador de crescendo, se usa
8 el método de dibujar un rectángulo blanco encima de la parte
9 respectiva del regulador, tapándola. El rectángulo se define como
10 código PostScript dentro de un elemento de marcado de texto.
12 Para realizar un ajuste fino de la posición y el tamaño del
13 elemento de marcado, se puede establecer el número que precede a
14 @code{setgray} en la definición de PostScript a un valor menor que
15 la unidad, haciendo que sea de color gris. Los dos números que
16 están antes de @code{scale} en el código PostScript son los
17 responsables del ancho y la altura del rectángulo, y los dos
18 números que están antes de @code{translate} cambian las
19 coordenadas X e Y de origen del rectángulo.
21 Asegúrse de poner el regulador en una capa más baja que el
22 elemento de marcado de texto para trazar el rectángulo encima del
23 regulador.
26 doctitlees = "Regulador interrumpido"
28 lsrtags = "expressive-marks"
29 texidoc = "
30 In order to make parts of a crescendo hairpin invisible, the following
31 method is used: A white rectangle is drawn on top of the respective
32 part of the crescendo hairpin, making it invisible. The rectangle is
33 defined as postscript code within a text markup.
35 To fine-tune the position and size of the markup, the number
36 preceding @code{setgray} in the postscript definition can be set to a
37 value less than one, making it grey. The two numbers before @code{scale}
38 in the postscript code are responsible for the width and height of the
39 rectangle, the two numbers before @code{translate} change the x- and
40 y-origin of the rectangle.
42 Make sure to put the hairpin in a lower layer than the text markup to
43 draw the rectangle over the hairpin.
45 doctitle = "Broken crescendo hairpin"
46 } % begin verbatim
48 \relative c' {
49 << {
50 \dynamicUp
51 \override DynamicLineSpanner #'staff-padding = #4
52 r2 r16 c'8.\pp r4
53 } \\ {
54 \override DynamicLineSpanner #'layer = #0
55 des,2\mf\< ~
56 \override TextScript #'layer = #2
57 des16_\markup {
58 \postscript #"1.9 -8 translate 5 4 scale 1 setgray 0 0 moveto 0 1
59 lineto 1 1 lineto 1 0 lineto 0 0 lineto fill"
61 r8. des4 ~ des16->\sff
62 } >>