X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Flsr%2Fscore-for-diatonic-accordion.ly;fp=input%2Flsr%2Fscore-for-diatonic-accordion.ly;h=0000000000000000000000000000000000000000;hb=e90f0536f9be39ada0bef0aeb0d275dec3b2fb5b;hp=6aaa748634ee5b77c70fae2bfde4283a217a7e9d;hpb=a8c9e8a7ca320ab0df5fd32e717fd62cd7635ce6;p=lilypond.git diff --git a/input/lsr/score-for-diatonic-accordion.ly b/input/lsr/score-for-diatonic-accordion.ly deleted file mode 100644 index 6aaa748634..0000000000 --- a/input/lsr/score-for-diatonic-accordion.ly +++ /dev/null @@ -1,234 +0,0 @@ -%% Do not edit this file; it is auto-generated from LSR http://lsr.dsi.unimi.it -%% This file is in the public domain. -\version "2.12.3" - -\header { - lsrtags = "template" - - texidoc = " -A template to write a score for a diatonic accordion. - -- There is a horizontal staff indicating if the accordion must be -pushed (thick line) or pulled (thin line) - -- There is a small rhythmic staff with lyrics that describes the bass -buttons to press. The bar lines are made from gridlines - -- The tabulator staff for diatonic accordions shows the geographic -position of the buttons and not (as for every other instrument) the -pitch of the notes; the keys on the melody-side of the accordion are -placed in three columns and about 12 rows - - -In the tabulator staff notation the outermost column is described with -notes between lines, the innermost column is described with notes -between lines and a cross as accidental, and the middle column is -described with notes on a line, whereby the row in the middle is -represented on the middle line in the staff. - - -Some words to transpose piano notes to the diatonic accordion: - - -1. Every diatonic accordion is built for some keys only (for example, -for the keys of C major and F major), so it is important to transpose a -piano melody to match one of these keys. Transpose the source code, not -only the output because this code is required later on to translate it -once more to the tabulator staff. This can be done with the command -@code{displayLilyMusic}. - - -2. You have to alternate the push- and pull-direction of the accordion -regularly. If the player has a too long part to pull the accordion gets -broken. On the other hand, some harmonies are only available in one -direction. Considering this, decide which parts of the melody are the -push-parts and which the pull-parts. - - -3. For each pull- or push-part translate the piano notes to the -according tabulature representation. - - -This snippet comes with a useful optional macro for the jEdit text -editor. - -" - doctitle = "Score for diatonic accordion" -} % begin verbatim - -verse = \lyricmode { Wie gross bist du! Wie gross bist du! } - -harmonies = \new ChordNames \chordmode { - \germanChords - \set chordChanges = ##t - bes8 bes8 bes8 - es2 f - bes1 -} - -NoStem = \override Stem #'transparent = ##t -NoNoteHead = \override NoteHead #'transparent = ##t -ZeroBeam = \override Beam #'positions = #'(0 . 0) - -staffTabLine = \new Staff \with { - \remove "Time_signature_engraver" - \remove "Clef_engraver" -} { - \override Staff.StaffSymbol #'line-positions = #'(0) -% Shows one horizontal line. The vertical line (simulating a bar-line) is simulated with a gridline - \set Staff.midiInstrument = #"choir aahs" - \key c \major - \relative c'' - { - % disable the following line to see the the noteheads while writing the song - \NoNoteHead - \override NoteHead #'no-ledgers = ##t - - % The beam between 8th-notes is used to draw the push-line - %How to fast write the push-lines: - % 1. write repeatedly 'c c c c c c c c |' for the whole length of the song - % 2. uncomment the line \NoNoteHead - % 3. compile - % 4. Mark the positions on which push/pull changes. - % In the score-picture click on the position the push- or pull-part starts - % (on the noteHead, the cursor will change to a hand-icon). - % The cursor in the source code will jump just at this position. - % a) If a push-part starts there, replace the 'c' by an 'e[' - % b) If a pull-part starts there, replace the 'c' by an 's' - % 5. Switch into 'overwrite-mode' by pressing the 'ins' key. - % 6. For the pull-parts overwrite the 'c' with 's' - % 7. For every push-part replace the last 'c' with 'e]' - % 8. Switch into 'insert-mode' again - % 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) - % 10. re-enable the line \NoNoteHead - \autoBeamOff - \ZeroBeam - s8 s s e[ c c c c c c e] | s s s s s - } -} - -%{ -%} - -% Accordion melody in tabulator score -% 1. Place a copy of the piano melody below -% 2. Separate piano melody into pull- and push-parts according to the staffTabLine you've already made -% 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 -% or the macros 'conv2diaton push.bsh' and 'conv2diaton pull.bsh' -% Tips: -% - In jEdit Search & Replace mark the Option 'Keep Dialog' - -AccordionTabTwoCBesDur = { - % pull 1 - %8 8 8 | -8 8 8 | - % push 2 - %4 | -4 | - % pull 3 -% 2 r8 } - 2 r8 } - - AccordionTab= { \dynamicUp -% 1. Place a copy of the piano melody above -% 2. Separate piano melody into pull- and push-parts according to the staffTabLine you've already made -% 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 -% Tips: -% - In jEdit Search & Replace mark the Option 'Keep Dialog' -% - -\AccordionTabTwoCBesDur - } - - - - \layout { - \context { - \Staff - \consists "Grid_point_engraver" - - gridInterval = #(ly:make-moment 4 4) % 4/4 - tact. How many beats per bar - - % The following line has to be adjusted O-F-T-E-N. - \override GridPoint #'Y-extent = #'(-2 . -21) - } - \context { - \ChoirStaff - \remove "System_start_delimiter_engraver" - } -} - -staffVoice = \new Staff=astaffvoice { - \time 4/4 - \set Staff.instrumentName="Voice" - \set Staff.midiInstrument="voice oohs" - \key bes \major - \partial 8*3 - \clef treble - { - \context Voice = "melodyVoi" - { 8 8 8 | 4 | 2 r8 } - \bar "|." - } -} - -staffAccordionMel = \new Staff \with { \remove "Clef_engraver" } { - #(set-accidental-style 'forget) %Set the accidentals (Vorzeichen) for each note, - %do not remember them for the rest of the measure. - \time 4/4 - \set Staff.instrumentName="Accordion" - \set Staff.midiInstrument="voice oohs" - \key c \major - \clef treble - { \AccordionTab \bar "|." } -} - - AltOn = #(define-music-function (parser location mag) (number?) - #{ \override Stem #'length = #$(* 7.0 mag) - \override NoteHead #'font-size = - #$(inexact->exact (* (/ 6.0 (log 2.0)) (log mag))) #}) - - AltOff = { - \revert Stem #'length - \revert NoteHead #'font-size - } - -BassRhytm = {s4 s8 | c2 c2 | c2 s8 } -LyricBassRhythmI= \lyricmode { c b | c } - -staffBassRhytm = \new Staff=staffbass \with { \remove "Clef_engraver" } { - % This is not a RhythmicStaff because it must be possible to append lyrics. - - \override Score.GridLine #'extra-offset = #'( 13.0 . 0.0 ) % x.y - \override Staff.StaffSymbol #'line-positions = #'( 0 ) - % Shows one horizontal line. The vertical line (simulating a bar-line) is simulated by a grid - % Search for 'grid' in this page to find all related functions - \time 4/4 - { - \context Voice = "VoiceBassRhytm" - \stemDown \AltOn #0.6 - \relative c'' - { - \BassRhytm - } - \AltOff - \bar "|." - } -} - -\new Score -\with { - \consists "Grid_line_span_engraver" %The vertical line (simulating a bar-line) in the staffBassRhytm is a gridline -} -\new ChoirStaff - << - \harmonies - \staffVoice - \context Lyrics = "lmelodyVoi" \with {alignBelowContext=astaffvoice} { \lyricsto "melodyVoi" \verse } - \staffAccordionMel - \staffTabLine - \staffBassRhytm - \context Lyrics = "lBassRhytmAboveI" \with {alignAboveContext=staffbass} \lyricsto VoiceBassRhytm \LyricBassRhythmI - >> -%} -