X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=ly%2Fscript-init.ly;h=1b84be5a37299d17578d29f8c7cbdc530636c50c;hb=97a0169312a260933246ab224e4f8b0969871dd5;hp=3b3e39ed31d11b1ca86e8d5f7a80e0f214070023;hpb=e7aa6c445f463844dbaa52d38ea4aac2882b5601;p=lilypond.git diff --git a/ly/script-init.ly b/ly/script-init.ly index 3b3e39ed31..1b84be5a37 100644 --- a/ly/script-init.ly +++ b/ly/script-init.ly @@ -5,7 +5,7 @@ harmonic = #(make-music 'HarmonicEvent) accent = #(make-articulation "accent" - 'midi-extra-velocity 20) + 'midi-extra-velocity 20) coda = #(make-articulation "coda") downbow = #(make-articulation "downbow") downmordent = #(make-articulation "downmordent") @@ -19,14 +19,14 @@ lineprall = #(make-articulation "lineprall") longfermata = #(make-articulation "longfermata") ltoe = #(make-articulation "ltoe") marcato = #(make-articulation "marcato" - 'midi-extra-velocity 40) + 'midi-extra-velocity 40) mordent = #(make-articulation "mordent") open = #(make-articulation "open") portato = #(make-articulation "portato" - 'midi-length - (lambda (len context) - (ly:moment-mul len (ly:make-moment 3/4)))) + 'midi-length + (lambda (len context) + (ly:moment-mul len (ly:make-moment 3/4)))) prall = #(make-articulation "prall") pralldown = #(make-articulation "pralldown") prallmordent = #(make-articulation "prallmordent") @@ -40,16 +40,16 @@ shortfermata = #(make-articulation "shortfermata") signumcongruentiae = #(make-articulation "signumcongruentiae") snappizzicato = #(make-articulation "snappizzicato") staccatissimo = #(make-articulation "staccatissimo" - 'midi-length - (lambda (len context) - (seconds->moment 1/8 context)) - 'midi-extra-velocity 6) + 'midi-length + (lambda (len context) + (seconds->moment 1/8 context)) + 'midi-extra-velocity 6) staccato = #(make-articulation "staccato" - 'midi-length - (lambda (len context) - (moment-min (ly:moment-mul len (ly:make-moment 1/2)) - (seconds->moment 1/2 context))) - 'midi-extra-velocity 4) + 'midi-length + (lambda (len context) + (moment-min (ly:moment-mul len (ly:make-moment 1/2)) + (seconds->moment 1/2 context))) + 'midi-extra-velocity 4) stopped = #(make-articulation "stopped") tenuto = #(make-articulation "tenuto") thumb = \finger \markup \scale #(cons (magstep 5) (magstep 5))