1 %% Do not edit this file; it is automatically
2 %% generated from LSR http://lsr.dsi.unimi.it
3 %% This file is in the public domain.
10 A template to write a score for a diatonic accordion.
12 - There is a horizontal staff indicating if the accordion must be
13 pushed (thick line) or pulled (thin line)
15 - There is a small rhythmic staff with lyrics that describes the bass
16 buttons to press. The bar lines are made from gridlines
18 - The tabulator staff for diatonic accordions shows the geographic
19 position of the buttons and not (as for every other instrument) the
20 pitch of the notes; the keys on the melody-side of the accordion are
21 placed in three columns and about 12 rows
24 In the tabulator staff notation the outermost column is described with
25 notes between lines, the innermost column is described with notes
26 between lines and a cross as accidental, and the middle column is
27 described with notes on a line, whereby the row in the middle is
28 represented on the middle line in the staff.
31 Some words to transpose piano notes to the diatonic accordion:
34 1. Every diatonic accordion is built for some keys only (for example,
35 for the keys of C major and F major), so it is important to transpose a
36 piano melody to match one of these keys. Transpose the source code, not
37 only the output because this code is required later on to translate it
38 once more to the tabulator staff. This can be done with the command
39 @code{displayLilyMusic}.
42 2. You have to alternate the push- and pull-direction of the accordion
43 regularly. If the player has a too long part to pull the accordion gets
44 broken. On the other hand, some harmonies are only available in one
45 direction. Considering this, decide which parts of the melody are the
46 push-parts and which the pull-parts.
49 3. For each pull- or push-part translate the piano notes to the
50 according tabulature representation.
53 This snippet comes with a useful optional macro for the jEdit text
57 doctitle = "Score for diatonic accordion"
60 verse = \lyricmode { Wie gross bist du! Wie gross bist du! }
62 harmonies = \new ChordNames \chordmode {
64 \set chordChanges = ##t
70 NoStem = \override Stem #'transparent = ##t
71 NoNoteHead = \override NoteHead #'transparent = ##t
72 ZeroBeam = \override Beam #'positions = #'(0 . 0)
74 staffTabLine = \new Staff \with {
75 \remove "Time_signature_engraver"
76 \remove "Clef_engraver"
78 \override Staff.StaffSymbol #'line-positions = #'(0)
79 % Shows one horizontal line. The vertical line (simulating a bar-line) is simulated with a gridline
80 \set Staff.midiInstrument = #"choir aahs"
84 % disable the following line to see the the noteheads while writing the song
86 \override NoteHead #'no-ledgers = ##t
88 % The beam between 8th-notes is used to draw the push-line
89 %How to fast write the push-lines:
90 % 1. write repeatedly 'c c c c c c c c |' for the whole length of the song
91 % 2. uncomment the line \NoNoteHead
93 % 4. Mark the positions on which push/pull changes.
94 % In the score-picture click on the position the push- or pull-part starts
95 % (on the noteHead, the cursor will change to a hand-icon).
96 % The cursor in the source code will jump just at this position.
97 % a) If a push-part starts there, replace the 'c' by an 'e['
98 % b) If a pull-part starts there, replace the 'c' by an 's'
99 % 5. Switch into 'overwrite-mode' by pressing the 'ins' key.
100 % 6. For the pull-parts overwrite the 'c' with 's'
101 % 7. For every push-part replace the last 'c' with 'e]'
102 % 8. Switch into 'insert-mode' again
103 % 9. At last it should look lik e.g. (s s e[ c | c c c c c c c c | c c c c c c e] s s)
104 % 10. re-enable the line \NoNoteHead
107 s8 s s e[ c c c c c c e] | s s s s s
114 % Accordion melody in tabulator score
115 % 1. Place a copy of the piano melody below
116 % 2. Separate piano melody into pull- and push-parts according to the staffTabLine you've already made
117 % 3. For each line: Double the line. Remark the 1st one (Keeps unchanged as reference) and then change the second line using the transformation paper
118 % or the macros 'conv2diaton push.bsh' and 'conv2diaton pull.bsh'
120 % - In jEdit Search & Replace mark the Option 'Keep Dialog'
122 AccordionTabTwoCBesDur = {
124 %<f' bes'>8 <f' a'>8 <d' bes'>8 |
125 <g'' a''>8 <g'' b''>8 <e'' a''>8 |
127 %<g' c''>4 <f' d''> <g' ees''> <f' a'> |
128 <g'' a''>4 <d'' eisis''> <g'' bisis''> <d'' f''> |
133 AccordionTab= { \dynamicUp
134 % 1. Place a copy of the piano melody above
135 % 2. Separate piano melody into pull- and push-parts according to the staffTabLine you've already made
136 % 3. For each line: Double the line. Remark the 1st one (Keeps unchanged as reference) and then
137 % change the second line using the transformation paper
139 % - In jEdit Search & Replace mark the Option 'Keep Dialog'
141 \AccordionTabTwoCBesDur
149 % The vertical line (simulating a bar-line) in
150 % the staffBassRhytm is a gridline
151 \consists "Grid_line_span_engraver"
155 \consists "Grid_point_engraver"
156 gridInterval = #(ly:make-moment 4 4) % 4/4 - tact. How many beats per bar
157 % The following line has to be adjusted O-F-T-E-N.
158 \override GridPoint #'Y-extent = #'(-2 . -21)
162 \remove "System_start_delimiter_engraver"
166 staffVoice = \new Staff = astaffvoice {
168 \set Staff.instrumentName = "Voice"
169 \set Staff.midiInstrument = "voice oohs"
174 \context Voice = "melodyVoi"
175 { <f' bes'>8 <f' a'>8 <d' bes'>8 | <g' c''>4 <f' d''> <g' es''> <f' a'> | <f' bes'>2 r8 }
181 \new Staff \with { \remove "Clef_engraver" } {
182 #(set-accidental-style 'forget) %Set the accidentals (Vorzeichen) for each note,
183 %do not remember them for the rest of the measure.
185 \set Staff.instrumentName="Accordion"
186 \set Staff.midiInstrument="voice oohs"
189 { \AccordionTab \bar "|." }
193 #(define-music-function (parser location mag) (number?)
194 #{ \override Stem #'length = #$(* 7.0 mag)
195 \override NoteHead #'font-size =
196 #$(inexact->exact (* (/ 6.0 (log 2.0)) (log mag))) #})
199 \revert Stem #'length
200 \revert NoteHead #'font-size
203 BassRhytm = {s4 s8 | c2 c2 | c2 s8 }
204 LyricBassRhythmI= \lyricmode { c b | c }
207 \new Staff = staffbass \with { \remove "Clef_engraver" } {
208 % This is not a RhythmicStaff because it must be possible to append lyrics.
210 \override Score.GridLine #'extra-offset = #'( 13.0 . 0.0 ) % x.y
211 \override Staff.StaffSymbol #'line-positions = #'( 0 )
212 % Shows one horizontal line. The vertical line (simulating a bar-line) is simulated by a grid
213 % Search for 'grid' in this page to find all related functions
216 \context Voice = "VoiceBassRhytm"
217 \stemDown \AltOn #0.6
231 \context Lyrics = "lmelodyVoi"
232 \with { alignBelowContext = astaffvoice }
233 \lyricsto melodyVoi \verse
237 \context Lyrics = "lBassRhytmAboveI"
238 \with { alignAboveContext = staffbass }
239 \lyricsto VoiceBassRhytm \LyricBassRhythmI