The LilyPond Snippet Repository ♪♫

…PianoStaff << \new Staff = up \relative c' { << { r4 \override Stem.cross-staff = ##t \override Stem.length = #19 % this is … …lengthened % upwards, so here we must lower the stem by the amount % equal to the lengthening - … …case (19 - 7) / 2 % (7 is default stem length) e e e } { s4 \change Staff = "bottom" \…

…override BarLine.bar-extent = #'(-2 . 2) % stems \override Stem.direction = #-1 \override Stem.length = #11 \override Stem.… …beam position for drag notes \once \override DrumStaff.Stem.length = #7 % end beam position } stopGraceMusic = { %\override Beam.… …#'(-6 . -6) \revert Flag.stroke-style %\revert DrumStaff.Stem.length \normalsize \stemNeutral } %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% %% SPECIAL FUNCTIONS: %%%%%%% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % TRIPLETS & QUINTUPLETS: triplet = …

\relative { \time 2/4 << { \once \hide Stem \once \override Stem.length = #8 b'8 ~ 8\noBeam \once \hide Stem \once \override Stem.length = #8 g8 ~ 8\noBeam } \\ { b8 g g …

fixA = { \once \override Stem.length = #11 } fixB = { \once \override NoteHead.X-offset = #1.7 \once \override Stem.length = #7 \once \override Stem.rotation = #'(45 0 0) \once \override Stem.extra-offset = #'(-0.1 . -0.2) \once \override …

…d' e' f' c'' d'' e'' f'' \override Stem.direction = #down \override Beam.positions = #'(-6 . -6) … …d' e' f' c'' d'' e'' f'' \override Stem.direction = #up \override Beam.positions = #'(6 . 6) … …16 f' c''32 d'' e'' f'' \revert Stem.direction \revert Beam.positions c'16^"revert" d' …

…bes8 bes8 bes8 es2 f bes1 } NoStem = { \hide Stem } NoNoteHead = \hide NoteHead ZeroBeam = \override Beam.positions = #'(… …bar "|." } } AltOn = #(define-music-function (mag) (number?) #{ \override Stem.length = #(* 7.0 mag) \override NoteHead.font-size = … …log 2.0)) (log mag))) #}) AltOff = { \revert Stem.length \revert NoteHead.font-size } BassRhythm = {s4 s8 | c2 …

…markup { \with-color #(x11-color 'navy) Clarinet } %black \override Stem.color = #(rgb-color 0 0 0) gis8 a % white \override Stem.color = #(rgb-color 1 1 1) gis8 a % dark blue \override Stem.color = #(rgb-color 0 0 0.5) gis4 …

…temporary \override NoteHead.stem-attachment = #(lambda (grob) (let* ((stem (ly:grob-object grob 'stem)) (dir (ly:grob-property stem 'direction UP)) (is-up (eqv? dir UP))) (cons dir (…

…bracket)) (first-note (ly:grob-parent tuplet-bracket X)) (first-stem (ly:grob-object first-note 'stem)) (beam (ly:grob-object first-stem 'beam))) (if (and (ly:grob? beam) ; … …beam-gap beam-width)) (* 0.5 beam-width) beam-padding))))))) %% find the stem closest to the tuplet-number #(define (nearest tuplet-number … …bracket)) (first-note (ly:grob-parent tuplet-bracket X)) (first-stem (ly:grob-object first-note 'stem)) (beam (ly:grob-object first-stem 'beam))) (if (and (ly:grob? beam) (…

…up" { \time 4/8 \key c \minor << { \revert Stem.direction \change Staff = down \set subdivideBeams = ##t g16.[ \… …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] << \…