]> git.donarmstrong.com Git - lilypond.git/blob - input/lsr/flamenco-notation.ly
Merge branch 'master' into lilypond/translation
[lilypond.git] / input / lsr / flamenco-notation.ly
1 %% Do not edit this file; it is auto-generated from LSR http://lsr.dsi.unimi.it
2 %% This file is in the public domain.
3 \version "2.11.52"
4
5 \header {
6   lsrtags = "fretted-strings"
7
8   texidoc = "
9 For flamenco guitar, special notations are used:
10
11
12 *  a golpe symbol to indicate a slap on the guitar body with the nail
13 of the ring finger, *  an arrow to indicate (the direction of) strokes,
14 *  different letters for fingering (\"p\": thumb, \"i\": index finger,
15 \"m\": middle finger, \"a\": ring finger and \"x\": little finger)  * 
16 3- and 4-finger rasgueados; stroke upwards with all fingers, ending
17 with an up- and down using the index finger  *  abanicos; strokes (in
18 tuples) with thumb (down), little and index finger (both up). There's
19 also an abanico 2 where middle and ring finger are used instead of the
20 little finger. *  alza pua fast playing with the thumb
21
22
23
24 Most figures use arrows in combination with fingering and with abanicos
25 and rasgueados, noteheads are printed only for the first chord.>This
26 snippet contains some header-like code that can be copied as
27 @samp{flamenco.ly} and included in your source. 
28
29 "
30   doctitle = "Flamenco notation"
31 } % begin verbatim
32 % This snippet was originally made for LilyPond 2.11.41
33
34 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
35 %%%%%%%  Cut here ----- Start 'flamenco.ly' 
36
37 % Text indicators
38 abanico   = \markup { \italic Abanico }
39 rasgueaso = \markup { \italic Ras. }
40 alzapua   = \markup { \italic Alzapua }
41
42 % Finger stroke symbols
43 strokeUp = \markup { \postscript #"
44   0.1     setlinewidth
45   0.5 0   moveto
46   0.5 2   lineto
47   0.2 1.4 lineto
48   0.5 2   moveto
49   0.8 1.4 lineto
50   stroke
51 "}
52
53 strokeDown = \markup { \postscript #"
54   0.1     setlinewidth
55   0.5 2   moveto
56   0.5 0   lineto
57   0.2 0.6 lineto
58   0.5 0   moveto
59   0.8 0.6 lineto
60   stroke
61 "}
62
63
64
65 % Golpe symbol
66 golpe = \markup { \postscript #"
67   0.2 setlinewidth
68   0 0 moveto
69   1 0 lineto
70   1 1 lineto
71   stroke
72   "\postscript #"
73   0.1       setlinewidth
74   -0.6 -0.1  moveto
75   -0.6  1.0 lineto
76   0.5  1.0 lineto
77   stroke
78 "}  
79
80 strokeUpGolpe   = \markup { \column { \golpe \line { \strokeUp }}}
81 iUpGolpe        = \markup { \column { \golpe \line { \small i } \line { \strokeUp }}}
82
83 % Stokes for all fingers
84 pUp   = \markup { \column { \small p \line { \strokeUp }}}
85 pDown = \markup { \column { \small p \line { \strokeDown }}}
86 iUp   = \markup { \column { \small i \line { \strokeUp }}}
87 iDown = \markup { \column { \small i \line { \strokeDown }}}
88 mUp   = \markup { \column { \small m \line { \strokeUp }}}
89 mDown = \markup { \column { \small m \line { \strokeDown }}}
90 aUp   = \markup { \column { \small a \line { \strokeUp }}}
91 aDown = \markup { \column { \small a \line { \strokeDown }}}
92 xUp   = \markup { \column { \small x \line { \strokeUp }}}
93 xDown = \markup { \column { \small x \line { \strokeDown }}}
94
95
96 % Just handy :)
97 tupletOff = {
98   \once \override TupletNumber #'stencil = ##f
99   \once \override TupletBracket #'stencil = ##f
100 }
101
102 tupletsOff = {
103   \override TupletNumber #'stencil = ##f
104   \override TupletBracket #'bracket-visibility = #'if-no-beam
105 }
106
107 tupletsOn = {
108   \override TupletBracket #'bracket-visibility = #'default
109   \revert TupletNumber #'stencil
110 }
111
112 headsOff = {
113   \override TabNoteHead #'transparent = ##t
114   \override NoteHead #'transparent = ##t
115   \override NoteHead #'no-ledgers = ##t
116 }
117
118 headsOn = {
119   \override TabNoteHead #'transparent = ##f
120   \override NoteHead #'transparent = ##f
121   \override NoteHead #'no-ledgers = ##f
122 }
123
124 %%%%%%%  Cut here ----- End 'flamenco.ly' 
125 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
126
127 part = \relative c' {
128   <a, e' a cis e>8^\iUp
129   <a e' a cis e>8^\iDown
130   r4
131   r2^\golpe
132     
133   <a e' a cis e>8^\iUp
134   <a e' a cis e>8^\iDown
135   <a e' a cis e>8^\iUpGolpe
136   <a e' a cis e>8^\iDown
137   r2
138       
139   <a e' a cis e>16^\aUp
140   \headsOff 
141   <a e' a cis e>^\mUp
142   <a e' a cis e>^\iUp
143   <a e' a cis e>^\iDown~
144   \headsOn
145   <a e' a cis e>2
146   r4
147
148   \tupletOff
149   \times 4/5 {
150     <a e' a cis e>16^\xUp
151     \headsOff
152     <a e' a cis e>^\aUp
153     <a e' a cis e>^\mUp
154     <a e' a cis e>^\iUp
155     <a e' a cis e>^\iDown~
156     \headsOn
157   }
158   <a e' a cis e>2
159   r4
160     
161   \tupletsOff
162   \times 2/3 {
163     <a e' a cis e>8^\pDown
164     \headsOff
165     <a e' a cis e>^\xUp
166     <a e' a cis e>^\iUp
167     \headsOn
168   }
169   
170   \times 2/3 {
171     <a e' a cis e>8^\pDown
172     \headsOff
173     <a e' a cis e>^\xUp
174     <a e' a cis e>^\iUp
175     \headsOn
176   }
177     
178   \times 2/3 {
179     <a e' a cis e>8^\pDown
180     \headsOff
181     <a e' a cis e>^\xUp
182     <a e' a cis e>^\iUp
183     \headsOn
184   }
185   \times 2/3 {
186     <a e' a cis e>8^\pDown
187     \headsOff
188     <a e' a cis e>^\xUp
189     <a e' a cis e>^\iUp
190     \headsOn
191   }
192   
193   \tupletsOff
194   \override Beam #'positions = #'(2 . 2)
195   \times 2/3 {
196     a8^\markup{ \small p }
197     <e' a>^\strokeUpGolpe
198     <e a>^\strokeDown
199   }
200   \times 2/3 {
201     a,8^\markup{ \small p }
202     <e' a>^\strokeUpGolpe
203     <e a>^\strokeDown
204   }
205   \times 2/3 {
206     a,8^\markup{ \small p }
207     <e' a>^\strokeUpGolpe
208     <e a>^\strokeDown
209   }
210   \times 2/3 {
211     a,8^\markup{ \small p }
212     <e' a>^\strokeUpGolpe
213     <e a>^\strokeDown
214   }
215   \tupletsOn
216     
217   \once \override TextScript #'extra-offset = #'(0 . -1)
218   <g, b f'>1_\golpe^\mUp
219   \bar "|."
220 }
221
222 \score {
223   \new StaffGroup <<
224     \context Staff = part <<
225       \clef G
226       \transpose c c'
227       {
228         \part
229       }
230     >>
231     \context TabStaff {
232       \part
233     }
234   >>
235   \layout {
236     ragged-right = ##t
237   }
238 }
239