From 3fd4b920df90c0e5bd36272e5aa791883c469c3e Mon Sep 17 00:00:00 2001
From: Vitaly Novichkov <admin@wohlnet.ru>
Date: Sat, 16 Dec 2017 21:39:57 +0300
Subject: Kill sustaining notes by panic command

---
 src/adlmidi_midiplay.cpp | 1 +
 1 file changed, 1 insertion(+)

(limited to 'src')

diff --git a/src/adlmidi_midiplay.cpp b/src/adlmidi_midiplay.cpp
index ffaebfc..85b72b5 100644
--- a/src/adlmidi_midiplay.cpp
+++ b/src/adlmidi_midiplay.cpp
@@ -1399,6 +1399,7 @@ void MIDIplay::realTime_BankChange(uint8_t channel, uint16_t bank)
 void MIDIplay::realTime_panic()
 {
     Panic();
+    KillSustainingNotes(-1, -1);
 }
 
 
-- 
cgit v1.2.3