Documentation/snippets/new/screech-boink.ly

   1 \version "2.14.0"
   2 \header {
   3   lsrtags = "headwords"
   4   texidoc = "Random complex notation"
   5   doctitle = "Screech and Boink"
   6 }
   7
   8 \score {
   9   \context PianoStaff <<
  10     \new Staff = "up" {
  11       \time 4/8
  12       \key c \minor
  13       <<
  14         {
  15           \revert Stem #'direction
  16           \change Staff = down
  17           \set subdivideBeams = ##t
  18           g16.[
  19           \change Staff = up
  20           c'''32
  21           \change Staff = down
  22           g32
  23           \change Staff = up
  24           c'''32
  25           \change Staff = down
  26           g16]
  27           \change Staff = up
  28           \stemUp
  29           \set followVoice = ##t
  30           c'''32([ b''16 a''16 gis''16 g''32)]
  31         }
  32         \\
  33         { s4 \times 2/3 { d'16[ f' g'] } as'32[ b''32 e'' d''] }
  34         \\
  35         { s4 \autoBeamOff d''8.. f''32  }
  36         \\
  37         { s4 es''4 }
  38       >>
  39     }
  40     \new Staff = "down" {
  41       \clef bass
  42       \key c \minor
  43       \set subdivideBeams = ##f
  44       \override Stem #'french-beaming = ##t
  45       \override Beam #'beam-thickness = #0.3
  46       \override Stem #'thickness = #4.0
  47       g'16[ b16 fis16 g16]
  48       <<
  49         \makeClusters {
  50           as16 <as b> <g b> <g cis>
  51         }
  52         \\
  53         {
  54           \override Staff.Arpeggio #'arpeggio-direction = #DOWN
  55           <cis, e, gis, b, cis>4\arpeggio
  56         }
  57       >>
  58     }
  59   >>
  60   \midi {
  61     \context {
  62       \Score
  63       tempoWholesPerMinute = #(ly:make-moment 60 8)
  64     }
  65   }
  66   \layout {
  67     ragged-right = ##t
  68     \context {
  69       \Staff
  70       \consists "Horizontal_bracket_engraver"
  71     }
  72   }
  73 }