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