@end ignore
+@item
+A half-open articulation was added:
+@lilypond[quote,relative=2]
+c4\halfopen
+@end lilypond
+This is sometimes used to indicate half-open hi-hats.
+
@item
The Unicode Bidirectional Algorithm is now fully supported for
single-line markup due to enhanced integration with Pango.
@cindex Orgelpedalbezeichnung
@cindex Triller
@cindex Offen
+@cindex Halboffen
@cindex Flageolet
@cindex Praller
@cindex Mordent
@lilypond[quote,verbatim]
#(define mydrums '(
- (bassdrum default #f -1)
- (snare default #f 0)
- (hihat cross #f 1)
- (pedalhihat xcircle "stopped" 2)
- (lowtom diamond #f 3)))
-up = \drummode { hh8 hh hh hh hhp4 hhp }
+ (bassdrum default #f -1)
+ (snare default #f 0)
+ (hihat cross #f 1)
+ (halfopenhihat cross "halfopen" 1)
+ (pedalhihat xcircle "stopped" 2)
+ (lowtom diamond #f 3)))
+up = \drummode { hh8 hh hhho hhho hhp4 hhp }
down = \drummode { bd4 sn bd toml8 toml }
\new DrumStaff <<
@cindex marcato
@cindex mordent
@cindex open
+@cindex halfopen
@cindex organ pedal marks
@cindex pedal, indicaciones de
@cindex portato
@lilypond[quote,verbatim]
#(define mydrums '(
- (bassdrum default #f -1)
- (snare default #f 0)
- (hihat cross #f 1)
- (pedalhihat xcircle "stopped" 2)
- (lowtom diamond #f 3)))
-up = \drummode { hh8 hh hh hh hhp4 hhp }
+ (bassdrum default #f -1)
+ (snare default #f 0)
+ (hihat cross #f 1)
+ (halfopenhihat cross "halfopen" 1)
+ (pedalhihat xcircle "stopped" 2)
+ (lowtom diamond #f 3)))
+up = \drummode { hh8 hh hhho hhho hhp4 hhp }
down = \drummode { bd4 sn bd toml8 toml }
\new DrumStaff <<
@lilypond[quote,ragged-right,verbatim]
#(define mydrums '(
- (bassdrum default #f -1)
- (snare default #f 0)
- (hihat cross #f 1)
- (pedalhihat xcircle "stopped" 2)
- (lowtom diamond #f 3)))
-up = \drummode { hh8 hh hh hh hhp4 hhp }
+ (bassdrum default #f -1)
+ (snare default #f 0)
+ (hihat cross #f 1)
+ (halfopenhihat cross "halfopen" 1)
+ (pedalhihat xcircle "stopped" 2)
+ (lowtom diamond #f 3)))
+up = \drummode { hh8 hh hhho hhho hhp4 hhp }
down = \drummode { bd4 sn bd toml8 toml }
\new DrumStaff <<
c''\staccato c''\tenuto c''\portato
c''\upbow c''\downbow c''\flageolet
c''\thumb c''^\lheel c''\rheel
- c''^\ltoe c''\rtoe c''\open
+ c''^\ltoe c''\rtoe c''\open c''\halfopen
c''\stopped c''\snappizzicato c''\turn c''\reverseturn
c''\trill c''\prall c''\mordent
c''\prallprall c''\prallmordent c''\upprall
staccato tenuto portato
upbow downbow flageolet
thumb lheel rheel
- ltoe rtoe open
+ ltoe rtoe open halfopen
stopped snappizzicato turn reverseturn
trill prall mordent
prallprall prallmordent upprall
@cindex organ pedal marks
@cindex turn
@cindex open
+@cindex halfopen
@cindex stopped
@cindex flageolet
@cindex reverseturn
@lilypond[quote,verbatim]
#(define mydrums '(
- (bassdrum default #f -1)
- (snare default #f 0)
- (hihat cross #f 1)
- (pedalhihat xcircle "stopped" 2)
- (lowtom diamond #f 3)))
-up = \drummode { hh8 hh hh hh hhp4 hhp }
+ (bassdrum default #f -1)
+ (snare default #f 0)
+ (hihat cross #f 1)
+ (halfopenhihat cross "halfopen" 1)
+ (pedalhihat xcircle "stopped" 2)
+ (lowtom diamond #f 3)))
+up = \drummode { hh8 hh hhho hhho hhp4 hhp }
down = \drummode { bd4 sn bd toml8 toml }
\new DrumStaff <<
espressivo = #(make-articulation "espressivo")
fermata = #(make-articulation "fermata")
flageolet = #(make-articulation "flageolet")
+halfopen = #(make-articulation "halfopen")
lheel = #(make-articulation "lheel")
lineprall = #(make-articulation "lineprall")
longfermata = #(make-articulation "longfermata")
fet_endchar;
+fet_beginchar ("halfopen (unstopped)", "halfopen");
+ save thin, height, width, thick, factor, slash;
+
+ factor = 5/4;
+ height# = 5/4 width#;
+ height# = staff_space#;
+ thin = 0.6 linethickness + 0.06 staff_space;
+ slash# = 1.05 linethickness#;
+
+ set_char_box (width# / 2, width# / 2, height# / 2, height# / 2);
+
+ define_pixels (width, height, slash);
+
+ 2 thick + 0.6 (height - 2 thin) = width;
+
+ penpos1 (thick, 0);
+ penpos2 (thin, 90);
+ penpos3 (thick, 180);
+ penpos4 (thin, 270);
+ z1r = (w, 0);
+ z2r = (0, h);
+ z3r = (-w, 0);
+ z4r = (0, -h);
+
+ penlabels (1, 2, 3, 4);
+
+ penstroke z1e{up}
+ .. z2e{left}
+ .. z3e{down}
+ .. z4e{right}
+ .. cycle;
+
+ draw_brush ((-w * factor, -h * factor), slash,
+ (w * factor, h * factor), slash);
+fet_endchar;
+
+
fet_beginchar ("plus (stopped)", "stopped");
save hthick, vthick, size, outer_hsize, outer_vsize;
(direction . ,UP)))
+ ("halfopen"
+ . (
+ (avoid-slur . outside)
+ (padding . 0.20)
+ (script-stencil . (feta . ("halfopen" . "halfopen")))
+ (direction . ,UP)))
+
+
("ictus"
. (
(script-stencil . (feta . ("ictus" . "ictus")))