summaryrefslogtreecommitdiff
path: root/actions/menus/ObjectMenu/NotationMagick/GenerateRhythmFromString/InsertStringAsBinaryRhythm
diff options
context:
space:
mode:
Diffstat (limited to 'actions/menus/ObjectMenu/NotationMagick/GenerateRhythmFromString/InsertStringAsBinaryRhythm')
-rw-r--r--actions/menus/ObjectMenu/NotationMagick/GenerateRhythmFromString/InsertStringAsBinaryRhythm18
1 files changed, 18 insertions, 0 deletions
diff --git a/actions/menus/ObjectMenu/NotationMagick/GenerateRhythmFromString/InsertStringAsBinaryRhythm b/actions/menus/ObjectMenu/NotationMagick/GenerateRhythmFromString/InsertStringAsBinaryRhythm
new file mode 100644
index 00000000..d2d8d6da
--- /dev/null
+++ b/actions/menus/ObjectMenu/NotationMagick/GenerateRhythmFromString/InsertStringAsBinaryRhythm
@@ -0,0 +1,18 @@
+<?xml version="1.0"?>
+<Denemo>
+ <merge>
+ <title>A Denemo Keymap</title>
+ <author>AT, JRR, RTS</author>
+ <map>
+ <row>
+ <action>InsertStringAsBinaryRhythm</action>
+ <scheme>(let ((return (NotationMagick::AskNewAsciistring)))
+ (if return
+ (NotationMagick::PutBinaryStringList (NotationMagick::String-&gt;CharsAsBinary return))
+ #f))</scheme>
+ <label>Insert string as binary rhythm</label>
+ <tooltip>Give a string to generate a rhythm out of its ascii chars in binary encoding</tooltip>
+ </row>
+ </map>
+ </merge>
+</Denemo>