diff options
Diffstat (limited to 'actions/menus/ObjectMenu/NotationMagick/GenerateRhythmFromString/InsertStringAsReversedBinaryRhythm')
-rw-r--r-- | actions/menus/ObjectMenu/NotationMagick/GenerateRhythmFromString/InsertStringAsReversedBinaryRhythm | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/actions/menus/ObjectMenu/NotationMagick/GenerateRhythmFromString/InsertStringAsReversedBinaryRhythm b/actions/menus/ObjectMenu/NotationMagick/GenerateRhythmFromString/InsertStringAsReversedBinaryRhythm new file mode 100644 index 00000000..dab61fbc --- /dev/null +++ b/actions/menus/ObjectMenu/NotationMagick/GenerateRhythmFromString/InsertStringAsReversedBinaryRhythm @@ -0,0 +1,19 @@ +<?xml version="1.0"?> +<Denemo> + <merge> + <title>A Denemo Keymap</title> + <author>AT, JRR, RTS</author> + <map> + <row> + <after>InsertReversedStringAsBinaryRhythm</after> + <action>InsertStringAsReversedBinaryRhythm</action> + <scheme>(let ((return (NotationMagick::AskNewAsciistring))) + (if return + (NotationMagick::PutBinaryStringList (NotationMagick::ReverseStringsInList (NotationMagick::String->CharsAsBinary return))) + #f))</scheme> + <label>Insert string as reversed binary rhythm</label> + <tooltip>Give a string to generate a rhythm out of its ascii chars in binary encoding. The rhythm for each letter gets reversed before inserting.</tooltip> + </row> + </map> + </merge> +</Denemo> |