X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=Documentation%2Fsnippets%2Fscreech-boink.ly;fp=Documentation%2Fsnippets%2Fscreech-boink.ly;h=4cf5f593450567599b72bd443ba7ff0b0feca0e8;hb=941dff9d2a67080e0dd8474f1e70f0c72ace6424;hp=0000000000000000000000000000000000000000;hpb=5a22d6233a39d3164e1ca043244794c268be4ad0;p=lilypond.git

diff --git a/Documentation/snippets/screech-boink.ly b/Documentation/snippets/screech-boink.ly
new file mode 100644
index 0000000000..4cf5f59345
--- /dev/null
+++ b/Documentation/snippets/screech-boink.ly
@@ -0,0 +1,81 @@
+% DO NOT EDIT this file manually; it is automatically
+% generated from Documentation/snippets/new
+% Make any changes in Documentation/snippets/new/
+% and then run scripts/auxiliar/makelsr.py
+%
+% This file is in the public domain.
+%% Note: this file works from version 2.14.0
+\version "2.14.0"
+\header {
+  lsrtags = "headwords"
+  texidoc = "Random complex notation"
+  doctitle = "Screech and Boink"
+} % begin verbatim
+
+
+\score {
+  \context PianoStaff <<
+    \new Staff = "up" {
+      \time 4/8
+      \key c \minor
+      <<
+        {
+          \revert Stem #'direction
+          \change Staff = down
+          \set subdivideBeams = ##t
+          g16.[
+          \change Staff = up
+          c'''32
+          \change Staff = down
+          g32
+          \change Staff = up
+          c'''32
+          \change Staff = down
+          g16]
+          \change Staff = up
+          \stemUp
+          \set followVoice = ##t
+          c'''32([ b''16 a''16 gis''16 g''32)]
+        }
+        \\
+        { s4 \times 2/3 { d'16[ f' g'] } as'32[ b''32 e'' d''] }
+        \\
+        { s4 \autoBeamOff d''8.. f''32  }
+        \\
+        { s4 es''4 }
+      >>
+    }
+    \new Staff = "down" {
+      \clef bass
+      \key c \minor
+      \set subdivideBeams = ##f
+      \override Stem #'french-beaming = ##t
+      \override Beam #'beam-thickness = #0.3
+      \override Stem #'thickness = #4.0
+      g'16[ b16 fis16 g16]
+      <<
+        \makeClusters {
+          as16 <as b> <g b> <g cis>
+        }
+        \\
+        {
+          \override Staff.Arpeggio #'arpeggio-direction = #DOWN
+          <cis, e, gis, b, cis>4\arpeggio
+        }
+      >>
+    }
+  >>
+  \midi {
+    \context {
+      \Score
+      tempoWholesPerMinute = #(ly:make-moment 60 8)
+    }
+  }
+  \layout {
+    ragged-right = ##t
+    \context {
+      \Staff
+      \consists "Horizontal_bracket_engraver"
+    }
+  }
+}