comparison scripts/hvresources/render.cpp @ 198:62f6269f4b3e

Added support for MidiIn to heavy (with example patch and subpatches).

  *  Christian Heinrichs
  *
  */
 
 #include <BeagleRT.h>
+#include <Midi.h>
 #include <cmath>
 #include "../include/Utilities.h"
 #include "Heavy_bbb.h"
 #include <string.h>
 #include <stdlib.h>
 #include <string.h>
-
 /*
  *	HEAVY CONTEXT & BUFFERS
  */
 
 Hv_bbb *gHeavyContext;

 
 /*
  * SETUP, RENDER LOOP & CLEANUP
  */
 
+Midi midi;
 bool setup(BeagleRTContext *context, void *userData)	{
 
 	/* HEAVY */
 
 	gHeavyContext = hv_bbb_new(context->audioSampleRate);

 	// Set heavy print hook
 	hv_setPrintHook(gHeavyContext, &printHook);
 	// Set heavy send hook
 	hv_setSendHook(gHeavyContext, sendHook);
 
+	midi.readFrom(0);
+	midi.writeTo(0);
+	midi.enableParser(true);
 	return true;
 }
 
 
 void render(BeagleRTContext *context, void *userData)

 		}
 	}
 
 	// replacement for bang~ object
 	//hv_vscheduleMessageForReceiver(gHeavyContext, "bbb_bang", 0.0f, "b");
+	{
+		int num;
+		while((num = midi.getParser()->numAvailableMessages()) > 0){
+			static MidiChannelMessage message;
+			message = midi.getParser()->getNextChannelMessage();
+			switch(message.getType()){
+			case kmmNoteOn: {
+//					message.prettyPrint();
+					float noteNumber = message.getDataByte(0);
+					float velocity = message.getDataByte(1);
+					float channel = message.getChannel();
+//					rt_printf("message: noteNumber: %f, velocity: %f, channel: %f\n", noteNumber, velocity, channel);
+					hv_vscheduleMessageForReceiver(gHeavyContext, "hv_notein", 0, "fff", noteNumber, velocity, channel);
+				}
+				break;
+			case kmmControlChange: {
+				hv_vscheduleMessageForReceiver(gHeavyContext, "hv_ctlin", 0, "fff",
+						(float)message.getDataByte(1), (float)message.getDataByte(0), (float)message.getChannel());
+				}
+				break;
+			case kmmProgramChange:
+				hv_vscheduleMessageForReceiver(gHeavyContext, "hv_pgmin", 0, "ff",
+						(float)message.getDataByte(0), (float)message.getChannel());
+				break;
+			}
+		}
+	}
+//	hv_sendFloatToReceiver(gHeavyContext, "notein", 1.123f);
+
 
 	hv_bbb_process_inline(gHeavyContext, gHvInputBuffers, gHvOutputBuffers, context->audioFrames);
 
 	// Interleave the output data
 	if(gHvOutputBuffers != NULL) {