lilypond-user-fr
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: guitare : percu, notes étouffées...


From: Martial R
Subject: Re: guitare : percu, notes étouffées...
Date: Wed, 21 Jun 2023 17:16:27 +0200



Petite question : est-il possible d'incorporer un glyphe externe ? Par  exemple pour "etouffer" une petite main ou un petit pouce pour une percu
"pouce".... Comment ça peut se faire, si c'est possible, et si ça aurait de l'intérêt ? EPS ? quelle taille ?...

Un truc comme ça :
pouce (fichier eps joint)   trouvé sur  internet et retravaillé avec Inkscape

%=================================
% https://lsr.di.unimi.it/LSR/Snippet?id=1068
%fonction pour faire un cercle avec un markup
#(define-markup-command
  (circled-pattern-iterative layout props radius angle num arg)
  (number? number? number? markup?)
  (interpret-markup layout props
                    (let ((rep (abs num)))
                      (cond
                       ((= num 0) (markup ""))
                       ((= num 1) arg)
                       (#t (do ((i 0 (1+ i))
                                (res (markup (#:null))
                                     (markup
                                      (#:combine
                                       (#:rotate
                                        (* i (/ angle rep))
                                        (#:concat (#:null #:hspace radius arg)))
                                       res))))
                             ((= i (1+ rep)) res)))))))


%-----------------------------
%on fabrique les formes - à tester d'autre caractère
Pouce = \markup\epsfile #X #3 "pouce.eps" % ajuster la taille 

pouce  = #(define-music-function
              (note)
              (ly:music?)
              #{
                \override  NoteHead.stencil = #ly:text-interface::print
                \override  NoteHead.text = \markup { \raise #-1.5 \Pouce }
             
                #note
              #})

% revenire à une tête de note normale
rNH = \revert NoteHead.stencil
%---------------------------------
\relative c' {
    \pouce g4 c e g
}

\markup { \raise #3  \score {
  { \stopStaff \omit Staff.Clef \omit Staff.TimeSignature \pouce d'1 } } "tirer les cordes avec le pouce"  
}
%===============================


--
Martial Rameaux


Attachment: pouce.eps
Description: PostScript document

Attachment: pouce.svg
Description: image/svg


reply via email to

[Prev in Thread] Current Thread [Next in Thread]