wip and upgrade?

Author: mcascone

Configs/Boom_1.pnscfg

@@ -0,0 +1,4 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export applicative_type="PluginConfig" data_type="{0779F8E6-34E0-4DA5-9307-ECC37BE0FA8A}">
+    <content io_config_name="Mono or Stereo" plugin_plugin_type="0" encrypt_dsp_script="0" use_generic_skin="1" use_generic_params="0" io_config="Mono or Stereo.iocfg" dest_path="/Users/maximiliancascone/Documents/Blue Cat Audio/Blue Cat&apos;s Plug&apos;n Script/Export" plugin_manufacturer_id="MCGW" plugin_manufacturer="MC Guitar Workshop" plugin_name="Boomerang" plugin_guid="E5821AB5A6BCCB49BD810AF58BA360A8" plugin_id="BOOM"/>
+</Export>

Scripts/boom1.pnscfg

@@ -0,0 +1,4 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export applicative_type="PluginConfig" data_type="{0779F8E6-34E0-4DA5-9307-ECC37BE0FA8A}">
+    <content io_config_name="Stereo" plugin_plugin_type="0" encrypt_dsp_script="0" use_generic_skin="1" use_generic_params="0" io_config="Stereo.iocfg" dest_path="/Users/maximiliancascone/Documents/Blue Cat Audio/Blue Cat&apos;s Plug&apos;n Script/Export" plugin_manufacturer_id="MAXC" plugin_manufacturer="Blue Cat Audio" plugin_name="Boomerang" plugin_guid="3563B9779E57CF4F8E1ABEF99E4D6E63" plugin_id="BOOM"/>
+</Export>

Scripts/library/Midi.hxx

@@ -4,7 +4,7 @@
 *  Midi utilities library for angelscript
 * 
 *  Created by Blue Cat Audio <[email protected]>
-*  Copyright 2011-2017 Blue Cat Audio. All rights reserved.
+*  Copyright 2011-2025 Blue Cat Audio. All rights reserved.
 *
 */
 
@@ -20,6 +20,13 @@ enum MidiEventType
     kMidiPitchWheel,  ///< Pitch Wheel Event
     kMidiNoteAfterTouch,  ///< Note after touch
     kMidiChannelAfterTouch, ///< Channel after touch
+    kSysexStart, ///< Sysex stream start event (may also contain beginning of data stream)
+    kSysexEnd, ///< Sysex stream end event (may also contain end of data stream)
+    kBeatClock, ///< MIDI Beat Clock Event
+    kStart, ///< MIDI Start Event
+    kSongPointer, ///< MIDI Song Pointer Position Event
+    kContinue, ///< MIDI Continue Event
+    kStop, ///< MIDI Stop Event
     kUnknown ///< Other Events
 };
 
@@ -35,6 +42,7 @@ namespace MidiEventUtils
     MidiEventType getType(const MidiEvent& evt)
     {
         MidiEventType type=kUnknown;
+        // Channel Events
         switch(evt.byte0 & 0xF0)
         {
         case 0x80:
@@ -59,6 +67,49 @@ namespace MidiEventUtils
             type=kMidiChannelAfterTouch;
             break;
         }
+
+        // None of these? Check full byte
+        if (type == kUnknown)
+        {
+            // channel-independent messages
+            switch (evt.byte0)
+            {
+            case 0xF0:
+                type = kSysexStart;
+                break;
+            case 0xF7:
+                type = kSysexEnd;
+                break;
+            case 0xF8:
+                type = kBeatClock;
+                break;
+            case 0xFA:
+                type = kStart;
+                break;
+            case 0xFB:
+                type = kContinue;
+                break;
+            case 0xFC:
+                type = kStop;
+                break;
+            case 0xF2:
+                type = kSongPointer;
+                break;
+            }
+
+            if (type == kUnknown)
+            {
+                // sysex end can be anywhere else in the event
+                for (int i = 1; i < 4; i++)
+                {
+                    if (getEventByte(evt,i) == 0xF7)
+                    {
+                        type = kSysexEnd;
+                        break;
+                    }
+                }
+            }
+        }
         return type;
     }
 
@@ -90,6 +141,27 @@ namespace MidiEventUtils
         case kMidiChannelAfterTouch:
             evt.byte0=0xD0|(evt.byte0 & 0x0F);
             break;
+        case kSysexStart:
+            evt.byte0 = 0xF0;
+            break;
+        case kSysexEnd:
+            evt.byte0 = 0xF7;
+            break;
+        case kBeatClock:
+            evt.byte0 = 0xF8;
+            break;
+        case kStart:
+            evt.byte0 = 0xFA;
+            break;
+        case kContinue:
+            evt.byte0 = 0xFB;
+            break;
+        case kStop:
+            evt.byte0 = 0xFC;
+            break;
+        case kSongPointer:
+            evt.byte0 = 0xF2;
+            break;
         }
     }
 
@@ -223,4 +295,110 @@ namespace MidiEventUtils
     {
         evt.byte1=(value&0x7F);;
     }
+
+
+    /** Utility function to read event bytes programmatically.
+    *
+    */
+    uint8 getEventByte(const MidiEvent& event, uint index)
+    {
+        switch (index)
+        {
+        case 0:
+            return event.byte0;
+        case 1:
+            return event.byte1;
+        case 2:
+            return event.byte2;
+        case 3:
+            return event.byte3;
+        }
+        return 0;
+    }
+
+    /** Utility function to set event bytes programmatically.
+    *
+    */
+    void setEventByte(MidiEvent& event, uint index, uint8 value)
+    {
+        switch (index)
+        {
+        case 0:
+            event.byte0 = value;
+            break;
+        case 1:
+            event.byte1 = value;
+            break;
+        case 2:
+            event.byte2 = value;
+            break;
+        case 3:
+            event.byte3 = value;
+            break;
+        }
+    }
+
+    /** Utility function to finish a sysex stream in a midi event.
+    *   Returns true is there was enough room left in the event to write Sysex stream end
+    */
+    bool finishSysex(MidiEvent& event, uint nextByteIndex)
+    {
+        bool done = false;
+        // finish Sysex stream with 0xF7 status byte
+        if (nextByteIndex < 4)
+        {
+            setEventByte(event, nextByteIndex, 0xF7);
+            done = true;
+            nextByteIndex++;
+
+            // fill other bytes with zeros
+            while (nextByteIndex < 4)
+            {
+                setEventByte(event, nextByteIndex, 0);
+                nextByteIndex++;
+            }
+        }
+        return done;
+    }
+
+    /** Returns true if the event contains SysEx data.
+    *
+    */
+    bool isSysexData(const MidiEvent& evt)
+    {
+        bool isSysex = true;
+        for (int i = 0; i < 4 && isSysex; i++)
+        {
+            const uint8 b = getEventByte(evt,i);
+            isSysex = (b < 0x80 || b == 0xF0 || b == 0xF7);
+        }
+        return isSysex;
+    }
+
+    /** Returns true for system realtime events.
+    *
+    */
+    bool isSystemRealtime(const MidiEvent& evt)
+    {
+        const uint8 b = evt.byte0;
+        bool isRT = b >= 0xfa || b == 0xf8;
+        return isRT;
+    }
+
+    /** For a Song Pointer Position Event, returns the position in the song (in sixteenth notes).
+    *
+    */
+    int getSongPointerPosition(const MidiEvent& evt)
+    {
+        return ((evt.byte1 & 0x7F) | ((evt.byte2 & 0x7F) << 7));
+    }
+
+    /** For a Song Pointer Position Event, sets the position in the song (in sixteenth notes).
+    *
+    */
+    void setSongPointerPosition(MidiEvent& evt, int posIn16thNotes)
+    {
+        evt.byte1 = posIn16thNotes & 0x7F;
+        evt.byte2 = (posIn16thNotes >> 7) & 0x7F;
+    }
 }