input/regression/flags-straight.ly

   1 \version "2.17.6"
   2
   3 \header {
   4   texidoc = "Straight flag styles."
   5 }
   6
   7
   8 % test notes, which will be shown in different styles:
   9 testnotes = { \autoBeamOff c'8 d'16 c'32 d'64 \acciaccatura {c'8} d'64
  10    c''8 d''16 c''32 d''64 \acciaccatura {\stemDown c''8 \stemNeutral} d''64  }
  11
  12 {
  13   \override Score.RehearsalMark.self-alignment-X = #LEFT
  14   \time 2/4
  15   \mark "modern straight"
  16   \override Flag.stencil = #modern-straight-flag
  17   \testnotes
  18
  19   \mark "old straight (large angles)"
  20   \override Flag.stencil = #old-straight-flag
  21   \testnotes
  22
  23   \mark "flat"
  24   \override Flag.stencil = #flat-flag
  25   \testnotes
  26 %
  27 %   \mark "custom slant"
  28 % %   Custom straight flag. The parameters are:
  29 % %                flag thickness and spacing
  30 % %                up-flag angle and length
  31 % %               down-flag angle and length
  32 %   \override Flag.stencil = #(straight-flag 0.35 0.8 -5 0.5 60 2.0)
  33 %   \testnotes
  34 }