within normal staves and tablature."
}
-deadnotes = \relative c,, {
- e8. \deadNotesOn e16 \deadNotesOff g4 a b |
+mynotes = \relative c,, {
+ \deadNotesOn
+ e8. e16
+ \deadNotesOff
+ g4 a b |
e8. \deadNote e16 g4 a b |
e,4. \deadNote { e8 e e } e4 |
< e, \deadNote b' e >8 < e \deadNote b' e > < e \deadNote b' e >4 < e \deadNote b' e >4 r
}
\context StaffGroup <<
- \context Staff <<
- \clef "bass_8"
- \deadnotes
- >>
- \context TabStaff <<
- \set TabStaff.stringTunings = #bass-tuning
- \deadnotes
- >>
+ \context Staff {
+ \context Voice { % Warning: explicit voice instantiation is required
+ % to have deadNotesOff work properly
+ % when deadNotesOn comes at the beginning
+ % of the piece
+ \clef "bass_8"
+ \mynotes
+ }
+ }
+ \context TabStaff {
+ \context TabVoice { % Warning: explicit voice instantiation is
+ % required to have deadNotesOff work properly
+ % when deadNotesOn comes at the beginning
+ % of the piece
+ \set TabStaff.stringTunings = #bass-tuning
+ \mynotes
+ }
+ }
>>
palmmute = \relative c, {
\time 4/4
+ \palmMuteOn
e8^\markup { \musicglyph #"noteheads.u2do" = palm mute }
- \palmMuteOn e e \palmMuteOff e e \palmMute e e e |
+ e e
+ \palmMuteOff e e \palmMute e e e |
e8 \palmMute { e e e } e e e e |
\palmMuteOn < e b' e >8 e e e < e b' e >2 \palmMuteOff |
< \palmMute e b' e >8 \palmMute { e e e } < \palmMute e b' e >2
}
\context StaffGroup <<
- \context Staff <<
- \clef "G_8"
- \palmmute
- >>
+ \context Staff {
+ \context Voice { % Warning: explicit Voice instantiation is
+ % required to have palmMuteOff work properly
+ % when palmMuteOn comes at the beginning of
+ % the piece.
+ \clef "G_8"
+ \palmmute
+ }
+ }
\context TabStaff <<
\palmmute
>>
(ly:set-option 'point-and-click #t)
(make-music 'SequentialMusic 'void #t))
-palmMuteOn = {
- #(override-head-style 'NoteHead 'do)
-}
+palmMuteOn =
+#(define-music-function (parser location) ()
+ (override-head-style 'NoteHead 'do))
-palmMuteOff = {
- #(revert-head-style 'NoteHead)
-}
+palmMuteOff =
+#(define-music-function (parser location) ()
+ (revert-head-style 'NoteHead))
palmMute =
#(define-music-function (parser location note) (ly:music?)
(style-note-heads 'NoteHead 'do note))
-deadNotesOn = {
- #(override-head-style '(TabNoteHead NoteHead) 'cross)
-}
+deadNotesOn =
+#(define-music-function (parser location) ()
+ (override-head-style '(TabNoteHead NoteHead) 'cross))
-deadNotesOff = {
- #(revert-head-style '(TabNoteHead NoteHead))
-}
+deadNotesOff =
+#(define-music-function (parser location) ()
+ (revert-head-style '(TabNoteHead NoteHead)))
deadNote =
#(define-music-function (parser location note) (ly:music?)