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