]> git.donarmstrong.com Git - lilypond.git/blobdiff - Documentation/snippets/score-for-diatonic-accordion.ly
Doc: Double The the to single the.
[lilypond.git] / Documentation / snippets / score-for-diatonic-accordion.ly
index 8366c0cfd50b133af725e7699c0eff63ab119d30..9419a6893e7261d72cdc0b75a6b5a08a5e6663a6 100644 (file)
@@ -1,13 +1,13 @@
 %% 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.12.2"
+\version "2.19.22"
 
 \header {
-  lsrtags = "template"
+  lsrtags = "real-music, specific-notation, template"
 
   texidoc = "
 A template to write a score for a diatonic accordion.
@@ -52,10 +52,6 @@ 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
@@ -70,23 +66,24 @@ harmonies = \new ChordNames \chordmode {
   bes1
 }
 
-NoStem = \override Stem #'transparent = ##t
-NoNoteHead = \override NoteHead #'transparent = ##t
-ZeroBeam = \override Beam  #'positions = #'(0 . 0)
+NoStem = { \hide Stem }
+NoNoteHead = \hide NoteHead
+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
+  \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
+    % disable the following line to see the noteheads while writing the song
     \NoNoteHead
-    \override NoteHead #'no-ledgers = ##t
+    \override NoteHead.no-ledgers = ##t
 
     % The beam between 8th-notes is used to draw the push-line
     %How to fast write the push-lines:
@@ -94,7 +91,8 @@ staffTabLine = \new Staff \with {
     %  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
+    %     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['
@@ -103,7 +101,8 @@ staffTabLine = \new Staff \with {
     %  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)
+    %  9. At last it should look like 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
@@ -111,13 +110,13 @@ staffTabLine = \new Staff \with {
   }
 }
 
-%{
-%}
-
 % 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
+% 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'
@@ -135,9 +134,11 @@ AccordionTabTwoCBesDur = {
 
 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
+  % 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'
   % -
@@ -156,9 +157,9 @@ AccordionTab= { \dynamicUp
   \context {
     \Staff
     \consists "Grid_point_engraver"
-    gridInterval = #(ly:make-moment 4 4) % 4/4 - tact. How many beats per bar
+    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)
+    \override GridPoint.Y-extent = #'(-2 . -21)
   }
   \context {
     \ChoirStaff
@@ -175,14 +176,18 @@ staffVoice = \new Staff = astaffvoice  {
   \clef treble
   {
     \context Voice = "melodyVoi"
-    { <f' bes'>8 <f' a'>8 <d' bes'>8 | <g' c''>4 <f' d''> <g' es''> <f' a'> | <f' bes'>2 r8 }
+    {
+      <f' bes'>8 <f' a'>8 <d' bes'>8 |
+      <g' c''>4 <f' d''> <g' es''> <f' a'> |
+      <f' bes'>2 r8
+    }
     \bar "|."
   }
 }
 
 staffAccordionMel =
 \new Staff  \with { \remove "Clef_engraver" } {
-  #(set-accidental-style 'forget) %Set the accidentals (Vorzeichen) for each note,
+  \accidentalStyle 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"
@@ -193,14 +198,14 @@ staffAccordionMel =
 }
 
 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))) #})
+#(define-music-function (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
+  \revert Stem.length
+  \revert NoteHead.font-size
 }
 
 BassRhytm = {s4 s8 | c2 c2 | c2 s8 }
@@ -210,9 +215,10 @@ 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
+  \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
   {
@@ -242,5 +248,3 @@ staffBassRhytm =
       \lyricsto VoiceBassRhytm \LyricBassRhythmI
   >>
 }
-%}
-