[Denemo-devel] channel change with fluidsynth internal

[Richard Shann]

I have used this script (from Nils) to put a channel change in between
two notes on a staff.
When I tried it first there was silence after the channel change.
I was changing to channel 3 so:

To hear the effect I used the staff properties to set up program 81 on
channel 3, setting the prog/chan override checkbox and playing some
notes, hearing the prog 81 sound
Then I changed the staff properties back to ch/pr 1 (ie the default
encoded 0) and played again. At the channel change the sound switched to
prog 81.
Richard
Nils script below:

;;; Midi Channel Change
(let ((ChannelFromInput "1"))
(set! ChannelFromInput (d-GetUserInput "MidiChannel" "Please enter a
midi channel. 1-16" "1"))
(d-DirectivePut-standalone-minpixels "MidiChannel" 20)
(d-CursorLeft)
(d-DirectivePut-standalone-override "MidiChannel" (logior
DENEMO_OVERRIDE_CHANNEL DENEMO_OVERRIDE_STEP))
(d-DirectivePut-standalone-midibytes "MidiChannel" ChannelFromInput)
(d-DirectivePut-standalone-display "MidiChannel" (string-append "Channel
= "  ChannelFromInput))
(d-DirectivePut-standalone-ty "MidiChannel" -40))
(d-RefreshDisplay)