input/regression/note-head-style.ly

   1 \version "1.3.146"
   2 \header{
   3 texidoc="
   4 Note head shapes are settable.  The stem endings should be adjusted
   5 per note head.  If you want different note head styles on one stem,
   6 you must create a special context called Thread.
   7
   8 Harmonic notes have a different shape and different
   9 dimensions. Nevertheless, noteheads in both styles can be combined, on
  10 either up or down stems.
  11 "
  12 }
  13
  14
  15 \include "paper23.ly"
  16
  17 \score { \notes \relative c''{
  18 % \property Voice.Stem \override #'thickness = #5.0
  19 \property Voice.NoteHead \set #'style = #'default
  20 c4 c2 c8  c16 c16 c1 c\breve b4 b2 b8  b16 b16 b1 b\breve \break
  21 \property Voice.NoteHead \set #'style = #'diamond
  22 c4 c2 c8  c16 c16 c1 c\breve b4 b2 b8  b16 b16 b1 b\breve \break
  23 \property Voice.NoteHead \set #'style = #'transparent
  24 c4 c2 c8  c16 c16 c1 c\breve b4 b2 b8  b16 b16 b1 b\breve \break
  25 \property Voice.NoteHead \set #'style = #'cross
  26 c4 c2 c8  c16 c16 c1 c\breve b4 b2 b8  b16 b16 b1 b\breve \break
  27 \property Voice.NoteHead \set #'style = #'xcircle
  28 c4 c2 c8  c16 c16 c1 c\breve b4 b2 b8  b16 b16 b1 b\breve \break
  29 \property Voice.NoteHead \set #'style = #'slash
  30 c4 c2 c8  c16 c16 c1 c\breve b4 b2 b8  b16 b16 b1 b\breve \break
  31 \property Voice.NoteHead \set #'style = #'mensural
  32 c4 c2 c8  c16 c16  c1 c\breve c\longa b4 b2 b8  b16 b16 b1 b\breve b\longa \break
  33 \property Voice.NoteHead \set #'style = #'harmonic
  34 c4 c2 c8  c16 c16 c1 c\breve b4 b2 b8  b16 b16 b1 b\breve \break
  35 \property Voice.NoteHead \set #'style = #'baroque
  36 c4 c2 c8  c16 c16  c1 c\breve c\longa b4 b2 b8  b16 b16 b1 b\breve b\longa \break
  37
  38
  39    \context Voice = another <
  40     \context Thread = TA
  41       {
  42         \property Thread.NoteHead \set #'style = #'cross
  43         \property Voice.Stem \set #'direction = #1
  44         c16
  45        }
  46     \context Thread = TB
  47       { \property Thread.NoteHead \set #'style = #'default a16  }
  48
  49     \context Thread = TC
  50       { \property Thread.NoteHead \set #'style = #'mensural d16 }
  51
  52   >
  53
  54
  55    \context Voice <
  56      \context Thread = TA {
  57        \property Thread.NoteHead \set #'style = #'cross
  58        c4 c4 c4 c4 }
  59      \context Thread = TB {
  60        \property Thread.NoteHead \set #'style = #'mensural
  61        c'4 \stemDown c
  62        \property Thread.NoteHead \set #'style = #'slash
  63        \stemUp c4 \stemDown c
  64 } >
  65
  66 }
  67
  68     \paper {}
  69 }