]> git.donarmstrong.com Git - lilypond.git/blobdiff - Documentation/snippets/flamenco-notation.ly
Imported Upstream version 2.19.45
[lilypond.git] / Documentation / snippets / flamenco-notation.ly
index db142cd9d2ab90cb9dd68d9c0da9380927a7ca17..c3cfd54623b28efdbbfbf24e5d3533b1268492dd 100644 (file)
@@ -1,10 +1,10 @@
 %% DO NOT EDIT this file manually; it is automatically
-%% generated from LSR http://lsr.dsi.unimi.it
+%% generated from LSR http://lsr.di.unimi.it
 %% Make any changes in LSR itself, or in Documentation/snippets/new/ ,
 %% and then run scripts/auxiliar/makelsr.py
 %%
 %% This file is in the public domain.
-\version "2.17.30"
+\version "2.18.0"
 
 \header {
   lsrtags = "fretted-strings, specific-notation, stylesheet, version-specific"
@@ -34,66 +34,34 @@ This snippet contains some header-like code that can be copied as
   doctitle = "Flamenco notation"
 } % begin verbatim
 
-
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %%%%%%%  Cut here ----- Start 'flamenco.ly'
 
-% 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 } } }
-
-% Strokes 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 } } }
+% Text indicators :
+abanico = ^\markup\small { \italic Abanico }
+rasgueado = ^\markup\small { \italic Ras. }
+alzapua = ^\markup\small { \italic Alzapua }
+
+% Finger stroke symbols :
+strokeUp = \markup\combine\override #'(thickness . 1.3) \draw-line #'(0 . 2)\raise #2 \arrow-head #Y #UP ##f
+strokeDown = \markup\combine\arrow-head #Y #DOWN ##f \override #'(thickness . 1.3) \draw-line #'(0 . 2)
+
+% Golpe symbol :
+golpe = \markup {
+  \filled-box #'(0 . 1) #'(0 . 1) #0
+  \hspace #-1.6
+  \with-color #white
+  \filled-box #'(0.15 . 0.85) #'(0.15 . 0.85) #0
+}
 
+% Strokes, fingers and golpe command :
+RHp = \rightHandFinger #1
+RHi = \rightHandFinger #2
+RHm = \rightHandFinger #3
+RHa = \rightHandFinger #4
+RHx = \rightHandFinger #5
+RHu = \rightHandFinger \strokeUp
+RHd = \rightHandFinger \strokeDown
+RHg = \rightHandFinger \golpe
 
 % Just handy :)
 tupletOff = {
@@ -127,105 +95,98 @@ headsOn = {
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 
 part = \relative c' {
-  <a, e' a cis e>8^\iUp
-  <a e' a cis e>8^\iDown
+  \set strokeFingerOrientations = #'(up)
+  \override StrokeFinger.add-stem-support = ##t
+  \key a\major
+  <a, e' a cis e\RHu\RHi>8
+  <a e' a cis e\RHd\RHi>8
   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^\markup\golpe
+  <a e' a cis e\RHu\RHi>8
+  <a e' a cis e\RHd\RHi>8
+  <a e' a cis e\RHu\RHi\RHg>8
+  <a e' a cis e\RHd\RHi>8
   r2
-
-  <a e' a cis e>16^\aUp
+  <a e' a cis e\RHu\RHa>16\rasgueado
   \headsOff
-  <a e' a cis e>^\mUp
-  <a e' a cis e>^\iUp
-  <a e' a cis e>^\iDown~
+  <a e' a cis e\RHu\RHm>
+  <a e' a cis e\RHu\RHi>
+  <a e' a cis e\RHd\RHi>~
   \headsOn
   <a e' a cis e>2
   r4
-
   \tupletOff
   \tuplet 5/4 {
-    <a e' a cis e>16^\xUp
+    <a e' a cis e\RHu\RHx>16\rasgueado
     \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~
+    <a e' a cis e\RHu\RHa>
+    <a e' a cis e\RHu\RHm>
+    <a e' a cis e\RHu\RHi>
+    <a e' a cis e\RHd\RHi>~
     \headsOn
   }
   <a e' a cis e>2
   r4
-
   \tupletsOff
   \tuplet 3/2 {
-    <a e' a cis e>8^\pDown
+    <a e' a cis e\RHd\RHp>8\abanico
     \headsOff
-    <a e' a cis e>^\xUp
-    <a e' a cis e>^\iUp
+    <a e' a cis e\RHu\RHx>
+    <a e' a cis e\RHu\RHi>
     \headsOn
   }
-
   \tuplet 3/2 {
-    <a e' a cis e>8^\pDown
+    <a e' a cis e\RHd\RHp>8
     \headsOff
-    <a e' a cis e>^\xUp
-    <a e' a cis e>^\iUp
+    <a e' a cis e\RHu\RHx>
+    <a e' a cis e\RHu\RHi>
     \headsOn
   }
-
   \tuplet 3/2 {
-    <a e' a cis e>8^\pDown
+    <a e' a cis e\RHd\RHp>8
     \headsOff
-    <a e' a cis e>^\xUp
-    <a e' a cis e>^\iUp
+    <a e' a cis e\RHu\RHx>
+    <a e' a cis e\RHu\RHi>
     \headsOn
   }
   \tuplet 3/2 {
-    <a e' a cis e>8^\pDown
+    <a e' a cis e\RHd\RHp>8
     \headsOff
-    <a e' a cis e>^\xUp
-    <a e' a cis e>^\iUp
+    <a e' a cis e\RHu\RHx>
+    <a e' a cis e\RHu\RHi>
     \headsOn
   }
-
   \tupletsOff
   \override Beam.positions = #'(2 . 2)
   \tuplet 3/2 {
-    a8^\markup{ \small p }
-    <e' a>^\strokeUpGolpe
-    <e a>^\strokeDown
+    a8\RHp\alzapua
+    <e' a\RHu\RHg>
+    <e a\RHd>
   }
   \tuplet 3/2 {
-    a,8^\markup{ \small p }
-    <e' a>^\strokeUpGolpe
-    <e a>^\strokeDown
+    a,8\RHp
+    <e' a\RHu\RHg>
+    <e a\RHd>
   }
   \tuplet 3/2 {
-    a,8^\markup{ \small p }
-    <e' a>^\strokeUpGolpe
-    <e a>^\strokeDown
+    a,8\RHp
+    <e' a\RHu\RHg>
+    <e a\RHd>
   }
   \tuplet 3/2 {
-    a,8^\markup{ \small p }
-    <e' a>^\strokeUpGolpe
-    <e a>^\strokeDown
+    a,8\RHp
+    <e' a\RHu\RHg>
+    <e a\RHd>
   }
   \tupletsOn
-
-  \once \override TextScript.extra-offset = #'(0 . -1)
-  <g, b f'>1_\golpe^\mUp
+  <a, e' a\RHu\RHm>1
   \bar "|."
 }
 
 \score {
   \new StaffGroup <<
     \context Staff = "part" <<
-      \clef G
-      \transpose c c'
+      \clef "G_8"
       {
         \part
       }