blob: dab61fbcfea3a9642cbe694f103083798f3d11a2 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
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>
|