Thanks again Mats!

I no-one has any suggestions for improvements, this is my final version
(I'm working with the attached flamenco.ly).

The result of the inline test is again at
http://vaneyck.terra-terra.com/flamenco.pdf

Take care,
Oscar

On Wed, 2008-03-19 at 09:47 +0100, Mats Bengtsson wrote:
> An even simpler solution is to just revert the previous setting:
> \revert TupletNumber #'stencil

\version "2.11.41"

\include "flamenco.ly"

part = \relative c' {
  <a, e' a cis e>8^\iUp
  <a e' a cis e>8^\iDown
  r4
  r2^\golpe
    
  <a e' a cis e>8^\iUp
  <a e' a cis e>8^\iDown
  <a e' a cis e>8^\iUpGolpe
  <a e' a cis e>8^\iDown
  r2
      
  <a e' a cis e>16^\aUp
  \headsOff 
  <a e' a cis e>^\mUp
  <a e' a cis e>^\iUp
  <a e' a cis e>^\iDown~
  \headsOn
  <a e' a cis e>2
  r4


  \tupletOff
  \times 4/5 {
    <a e' a cis e>16^\xUp
    \headsOff
    <a e' a cis e>^\aUp
    <a e' a cis e>^\mUp
    <a e' a cis e>^\iUp
    <a e' a cis e>^\iDown~
    \headsOn
  }
  <a e' a cis e>2
  r4

    
  \tupletsOff
  \times 2/3 {
    <a e' a cis e>8^\pDown
    \headsOff
    <a e' a cis e>^\xUp
    <a e' a cis e>^\iUp
    \headsOn
  }
  
  \times 2/3 {
    <a e' a cis e>8^\pDown
    \headsOff
    <a e' a cis e>^\xUp
    <a e' a cis e>^\iUp
    \headsOn
  }
    
  \times 2/3 {
    <a e' a cis e>8^\pDown
    \headsOff
    <a e' a cis e>^\xUp
    <a e' a cis e>^\iUp
    \headsOn
  }
  \times 2/3 {
    <a e' a cis e>8^\pDown
    \headsOff
    <a e' a cis e>^\xUp
    <a e' a cis e>^\iUp
    \headsOn
  }
  \tupletsOn
    

  \tupletsOff
  \override Beam #'positions = #'(2 . 2)
  \times 2/3 {
    a8^\markup{\small p}
    <e' a>^\strokeUpGolpe
    <e a>^\strokeDown
  }
  \times 2/3 {
    a,8^\markup{\small p}
    <e' a>^\strokeUpGolpe
    <e a>^\strokeDown
  }
  \times 2/3 {
    a,8^\markup{\small p}
    <e' a>^\strokeUpGolpe
    <e a>^\strokeDown
  }
  \times 2/3 {
    a,8^\markup{\small p}
    <e' a>^\strokeUpGolpe
    <e a>^\strokeDown
  }
  \tupletsOn
    
  \once \override TextScript #'extra-offset = #'(0 . -1)
  <g, b f'>1_\golpe^\mUp

  \bar "|."
}

\score {
  \new StaffGroup <<
    \context Staff=part <<
      \clef G
      \transpose c c'
      {
        \part
      }
    >>
    \context TabStaff {
      \part
    }
  >>
  \layout {
    ragged-right = ##t
  }
}


\version "2.11.41"
%
% LilyPond template voor flamenco gitaar notaties
%
% $id$

% Text indicators
abanico   = \markup{\italic Abanico}
rasgueaso = \markup{\italic Ras.}
alzapua   = \markup{\italic Alzapua}

% Finger stroke symbols
strokeUp = \markup {\postscript #"
  0.1     setlinewidth
  0.5 0   moveto
  0.5 2   lineto
  0.2 1.4 lineto
  0.5 2   moveto
  0.8 1.4 lineto
  stroke
"}

strokeDown = \markup {\postscript #"
  0.1     setlinewidth
  0.5 2   moveto
  0.5 0   lineto
  0.2 0.6 lineto
  0.5 0   moveto
  0.8 0.6 lineto
  stroke
"}



% Golpe symbol
golpe = \markup {\postscript #"
  0.2 setlinewidth
  0 0 moveto
  1 0 lineto
  1 1 lineto
  stroke
  "\postscript #"
  0.1       setlinewidth
  -0.6 -0.1  moveto
  -0.6  1.0 lineto
  0.5  1.0 lineto
  stroke
"}  

strokeUpGolpe   = \markup {\column { \golpe \line { \strokeUp }}}
iUpGolpe        = \markup {\column { \golpe \line { \small i } \line { 
\strokeUp }}}

% Stokes for all fingers
pUp   = \markup {\column { \small p \line {\strokeUp}}}
pDown = \markup {\column { \small p \line {\strokeDown}}}
iUp   = \markup {\column { \small i \line {\strokeUp}}}
iDown = \markup {\column { \small i \line {\strokeDown}}}
mUp   = \markup {\column { \small m \line {\strokeUp}}}
mDown = \markup {\column { \small m \line {\strokeDown}}}
aUp   = \markup {\column { \small a \line {\strokeUp}}}
aDown = \markup {\column { \small a \line {\strokeDown}}}
xUp   = \markup {\column { \small x \line {\strokeUp}}}
xDown = \markup {\column { \small x \line {\strokeDown}}}


% Just handy :)
tupletOff = {
  \once \override TupletNumber #'stencil = ##f
  \once \override TupletBracket #'stencil = ##f
}

tupletsOff = {
  \override TupletNumber #'stencil = ##f
  \override TupletBracket #'bracket-visibility = #'if-no-beam
}

tupletsOn = {
  \override TupletBracket #'bracket-visibility = #'default
  \revert TupletNumber #'stencil
}

headsOff = {
  \override TabNoteHead #'transparent = ##t
  \override NoteHead #'transparent = ##t
  \override NoteHead #'no-ledgers = ##t
}

headsOn = {
  \override TabNoteHead #'transparent = ##f
  \override NoteHead #'transparent = ##f
  \override NoteHead #'no-ledgers = ##f
}
              
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
http://lists.gnu.org/mailman/listinfo/lilypond-user

Reply via email to