<?xml version="1.0"?>
<Denemo>
  <merge>
    <title>A Denemo Keymap</title>
    <author>AT, JRR, RTS</author>
    <map>
      <row>
        <after>SetTuningStaff</after>
        <action>SetTuningAllStaffs</action>
        <scheme>;;;;;SetTuningAllStaffs
 (d-Directive-standalone "Tuning")
(d-DirectivePut-standalone-midibytes "Tuning" (string-append "0xf0 0x7f 0x7f 0x08 0x08   0x03 0x7f 0x7f " (d-GetMidiTuning)  "0xf7"))
(d-DirectivePut-standalone-display "Tuning" (string-append "All Staffs: " (d-GetTemperament) " " (d-GetFlattest) "-" (d-GetSharpest)))
(d-DirectivePut-standalone-ty "Tuning" -25)
(d-DirectivePut-standalone-minpixels "Tuning" 15)
(d-RefreshDisplay)
</scheme>
        <label>Set Tuning Across All Staffs</label>
        <tooltip>At this time during playback switch to the temperament set when this command was invoked.</tooltip>
      </row>
    </map>
  </merge>
</Denemo>
