Mercurial > hg > dmlib

changeset 222:63be671823d3

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Implement effect E9x - Retrig note.
author Matti Hamalainen <ccr@tnsp.org>
date Mon, 08 Oct 2012 00:19:59 +0300
parents 5c36aff80205
children 9fa8e9326d18
files jssplr.c
diffstat 1 files changed, 5 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/jssplr.c	Mon Oct 08 00:19:12 2012 +0300
+++ b/jssplr.c	Mon Oct 08 00:19:59 2012 +0300
@@ -972,10 +972,6 @@
                 JMPSETNDFLAGS(cdfNewPanPos);
                 break;
 
-            case 0x09:    // E9x - Retrig note
-                JMPDEBUG("Retrig Note used, UNIMPLEMENTED");
-                break;
-
             case 0x0a:    // EAx - Fine Volumeslide Up
                 if (paramY)
                     chn->iCLastFineVolumeslideUpParam = paramY;
@@ -1322,6 +1318,11 @@
         case 'E': // Exy = Special Effects
             switch (paramX)
             {
+                case 0x09:    // E9x - Retrig note
+                    if (mp->tick == paramY)
+                        jmpTriggerNote(mp, chn, FALSE);
+                    break;
+
                 case 0x0c: // ECx - Set Note Cut
                     if (mp->tick == paramY)
                         jmpSetVolume(chn, channel, jsetMinVol);