\version "2.12.0" \include "italiano.ly" #(ly:set-option 'delete-intermediate-files #t) \header { title = "Mesure simple à deux temps" } Rythme = \relative sol'{ sol4 sol sol sol sol r sol r sol sol r sol sol r sol sol \break sol2 sol2 sol4 sol sol r sol2 sol4 sol r sol sol r \bar "||" } Metronome = \drummode { \repeat unfold 16 % Autant de répétitions que de mesures dans le morceau { \override Score.GridLine #'thickness = #2.0 % Épaisseur globale des pulsations \once \override Score.GridLine #'thickness = #4.0 % Épaisseur de la pulsation du premier temps bassdrum4 sidestick } } Structure = { \time 2/4 \tempo 4=60 \mark "" %% Texte afiché à l'aplomb de la barre de mesure (nom de la partie) % s4^"1" s^"2" s^"1" s^"2" s^"1" s^"2" %% Indication des temps sur trois mesures } \layout { \context { \DrumStaff \consists "Grid_point_engraver" gridInterval = #(ly:make-moment 1 8) %adapter au tempo \override GridPoint #'Y-extent = #'(7.5 . 0) % Hauteur du trait de pulsation } } #(define drums-sonjon '( (bassdrum () #f -1) (sidestick () #f -1) )) \new Score \with { \consists "Grid_line_span_engraver" \override NoteColumn #'X-offset = #-0.5 % Centrage de la pulsation par rapport à la tête de note } << \new Staff \with { \override Staff #'TimeSignature #'style = #'() fontSize = #1 \override StaffSymbol #'staff-space = #(magstep 1) } << \override Score.MetronomeMark #'extra-offset = #'(-10 . 2.5) \override Staff.Clef #'transparent = ##t \numericTimeSignature \override Score.MetronomeMark #'transparent = ##t \new Voice { #(override-auto-beam-setting '(end * * * *) 1 4 'Score) #(override-auto-beam-setting '(end * * * *) 2 4 'Score) #(override-auto-beam-setting '(end * * * *) 3 4 'Score) \Structure } \new Voice { \Rythme } \override Staff.NoteCollision #'merge-differently-headed = ##t \override Staff.NoteCollision #'merge-differently-dotted = ##t >> \new DrumStaff { \override Score.GridLine #'extra-offset = #'( 0.0 . -4.0 ) % Placement des pulsations sous la portée \override NoteHead #'transparent = ##t % Masquage des notes bidon et de leur portée pour ne laisser apparaître que les hampes \override NoteHead #'no-ledgers = ##t \override Beam #'transparent = ##t \override DrumStaff.BarLine #'transparent = ##t \override DrumStaff.StaffSymbol #'line-count = #0 \override DrumStaff.TimeSignature #'transparent = ##t \override DrumStaff.Clef #'transparent = ##t \set DrumStaff.drumStyleTable = #(alist->hash-table drums-sonjon) \Metronome } >> \layout{ indent = #0 \context { \Score \remove "Bar_number_engraver" \override TimeSignature #'break-visibility = #end-of-line-invisible } } \midi { } \paper { TailleGlobale = #20 #(set-paper-size "a5" 'landscape) ragged-right = ##f between-system-padding = 10\mm % ragged-last-bottom = ##f page-count = #1 % Partition en une seule page #(define fonts (make-pango-font-tree "Liberation Sans" "Liberation Sans" "Liberation Mono" (/ TailleGlobale 20) )) }