input/lsr/defining-predefined-fretboards-for-other-instruments.ly

   1 %% Do not edit this file; it is auto-generated from input/new
   2 %% This file is in the public domain.
   3 \version "2.11.65"
   4 \header {
   5   texidoces = "
   6
   7 Se pueden añadir diagramas de posiciones predefinidas para
   8 instrumentos nuevos además de los estándar que se usan para la
   9 guitarra.  Este archivo muestra cómo se hace, definiendo una afinación
  10 nueva y unas cuantas posiciones para el cuatro venezolano.
  11
  12 Este archivo también muestra cómo se pueden incluir las digitaciones
  13 en los acordes que se usan como puntos de referencia para la búsqueda
  14 de acordes en la tabla, y mostrarse en el diagrama de posiciones y la
  15 tablatura @code{TabStaff}, pero no en la música.
  16
  17 Estas posiciones no se pueden transportar porque contienen información
  18 de las cuerdas.  Hay planes para corregir esto en un futuro.
  19
  20 "
  21   doctitlees = "Definición de posiciones predefinidas para otros instrumentos"
  22
  23   lsrtags = "fretted-strings"
  24   texidoc = "Predefined fret diagrams can be added for new instruments
  25 in addition to the standards used for guitar.  This file shows how
  26 this is done by defining a new string-tuning and a few predefined
  27 fretboards for the Venezuelan cuatro.
  28
  29 This file also shows how fingerings can be included in the chords
  30 used as reference points for the chord lookup, and displayed in
  31 the fret diagram and the @code{TabStaff}, but not the music.
  32
  33 These fretboards are not transposable because they contain string
  34 information.  This is planned to be corrected in the future.
  35
  36 "
  37   doctitle = "Defining predefined fretboards for other instruments"
  38 } % begin verbatim
  39
  40 % add FretBoards for the Cuatro
  41 %   Note: This section could be put into a separate file
  42 %      predefined-cuatro-fretboards.ly
  43 %      and \included into each of your compositions
  44
  45 cuatroTuning = #'(11 18 14 9)
  46
  47 dSix = { <a\4 b\1 d\3 fis\2> }
  48 dMajor = { <a\4 d\1 d\3 fis \2> }
  49 aMajSeven = { <a\4 cis\1 e\3 g\2> }
  50 dMajSeven = { <a\4 c\1 d\3 fis\2> }
  51 gMajor = { <b\4 b\1 d\3 g\2> }
  52
  53 \storePredefinedDiagram \dSix
  54                         #cuatroTuning
  55                         #"o;o;o;o;"
  56 \storePredefinedDiagram \dMajor
  57                         #cuatroTuning
  58                         #"o;o;o;3-3;"
  59 \storePredefinedDiagram \aMajSeven
  60                         #cuatroTuning
  61                         #"o;2-2;1-1;2-3;"
  62 \storePredefinedDiagram \dMajSeven
  63                         #cuatroTuning
  64                         #"o;o;o;1-1;"
  65 \storePredefinedDiagram \gMajor
  66                         #cuatroTuning
  67                         #"2-2;o;1-1;o;"
  68
  69 % end of potential include file /predefined-cuatro-fretboards.ly
  70
  71
  72 #(set-global-staff-size 16)
  73
  74 primerosNames = \chordmode {
  75   d:6 d a:maj7 d:maj7
  76   g
  77 }
  78 primeros = {
  79   \dSix \dMajor \aMajSeven \dMajSeven
  80   \gMajor
  81 }
  82
  83 \score {
  84   <<
  85     \new ChordNames {
  86       \set chordChanges = ##t
  87       \primerosNames
  88     }
  89
  90     \new Staff {
  91       \new Voice \with {
  92         \remove "New_fingering_engraver"
  93       }
  94       \relative c'' {
  95         \primeros
  96       }
  97     }
  98
  99     \new FretBoards {
 100       \set stringTunings = #cuatroTuning
 101       \override FretBoard
 102         #'(fret-diagram-details string-count) = #'4
 103       \override FretBoard
 104         #'(fret-diagram-details finger-code) = #'in-dot
 105       \primeros
 106     }
 107
 108     \new TabStaff \relative c'' {
 109       \set TabStaff.stringTunings = #cuatroTuning
 110       \primeros
 111     }
 112
 113   >>
 114
 115   \layout {
 116     \context {
 117       \Score
 118       \override SpacingSpanner
 119         #'base-shortest-duration = #(ly:make-moment 1 16)
 120     }
 121   }
 122   \midi { }
 123 }