From 8538c05125d86bba7e81588515ad7aabe99167cd Mon Sep 17 00:00:00 2001
From: Mark Polesky <markpolesky@yahoo.com>
Date: Fri, 24 Jul 2009 20:22:55 -0700
Subject: [PATCH] Add dynamic script fffff; update docs.

---
 Documentation/user/expressive.itely |    8 ++++----
 ly/dynamic-scripts-init.ly          |    3 +++
 2 files changed, 7 insertions(+), 4 deletions(-)

diff --git a/Documentation/user/expressive.itely b/Documentation/user/expressive.itely
index 56904b0..3145261 100644
--- a/Documentation/user/expressive.itely
+++ b/Documentation/user/expressive.itely
@@ -193,10 +193,10 @@ Absolute dynamic marks are specified using a command after a note,
 such as @code{c4\ff}.  The available dynamic marks are
 @code{\ppppp}, @code{\pppp}, @code{\ppp}, @code{\pp}, @code{\p},
 @code{\mp}, @code{\mf}, @code{\f}, @code{\ff}, @code{\fff},
-@code{\ffff}, @code{\fp}, @code{\sf}, @code{\sff}, @code{\sp},
-@code{\spp}, @code{\sfz}, and @code{\rfz}.  Dynamic marks may be
-manually placed above or below the staff; see @ref{Direction and
-placement}.
+@code{\ffff}, @code{\fffff}, @code{\fp}, @code{\sf}, @code{\sff},
+@code{\sp}, @code{\spp}, @code{\sfz}, and @code{\rfz}.  Dynamic
+marks may be manually placed above or below the staff; see
+@ref{Direction and placement}.
 
 @lilypond[verbatim,quote,relative=2]
 c2\ppp c\mp
diff --git a/ly/dynamic-scripts-init.ly b/ly/dynamic-scripts-init.ly
index a29430f..8db53c4 100644
--- a/ly/dynamic-scripts-init.ly
+++ b/ly/dynamic-scripts-init.ly
@@ -7,6 +7,8 @@
 #(define (make-dynamic-script str)
    (make-music 'AbsoluteDynamicEvent
               'text str))
+
+%% don't exceed ppppp or fffff; see midi.scm.
 ppppp = #(make-dynamic-script "ppppp")
 pppp = #(make-dynamic-script "pppp")
 ppp = #(make-dynamic-script "ppp")
@@ -20,6 +22,7 @@ mf = #(make-dynamic-script "mf")
 ff = #(make-dynamic-script "ff")
 fff = #(make-dynamic-script "fff")
 ffff = #(make-dynamic-script "ffff")
+fffff = #(make-dynamic-script "fffff")
 fp = #(make-dynamic-script "fp")
 sf = #(make-dynamic-script "sf")
 sfp = #(make-dynamic-script "sfp")
-- 
1.6.3.msysgit.0

