175 lines
4.9 KiB
C++
175 lines
4.9 KiB
C++
/////////////////////////////////////////////////////
|
|
/////////////////////////////////////////////////////
|
|
//
|
|
// SwitchOnMidi
|
|
//
|
|
/////////////////////////////////////////////////////
|
|
/////////////////////////////////////////////////////
|
|
|
|
#include "CKAll.h"
|
|
#include "../MidiManager.h"
|
|
|
|
|
|
CKERROR CreateSwitchOnMidiProto(CKBehaviorPrototype **);
|
|
int SwitchOnMidi(const CKBehaviorContext& behcontext);
|
|
|
|
CKERROR SwitchOnMidiCallBack(const CKBehaviorContext& behcontext); // CallBack Functioon
|
|
|
|
|
|
/*******************************************************/
|
|
/* PROTO DECALRATION */
|
|
/*******************************************************/
|
|
CKObjectDeclaration *FillBehaviorSwitchOnMidiDecl()
|
|
{
|
|
CKObjectDeclaration *od = CreateCKObjectDeclaration("Switch On Midi");
|
|
od->SetDescription("Activates the appropriate output when receiving a Midi event.");
|
|
od->SetType( CKDLL_BEHAVIORPROTOTYPE );
|
|
od->SetGuid(CKGUID(0x624b1bec,0x509400a8));
|
|
od->SetAuthorGuid(VIRTOOLS_GUID);
|
|
od->SetAuthorName("Virtools");
|
|
od->SetVersion(0x00010000);
|
|
od->SetCreationFunction(CreateSwitchOnMidiProto);
|
|
od->SetCompatibleClassId(CKCID_BEOBJECT);
|
|
od->SetCategory("Controllers/Midi");
|
|
return od;
|
|
}
|
|
|
|
|
|
/*******************************************************/
|
|
/* PROTO CREATION */
|
|
/*******************************************************/
|
|
CKERROR CreateSwitchOnMidiProto(CKBehaviorPrototype **pproto)
|
|
{
|
|
CKBehaviorPrototype *proto = CreateCKBehaviorPrototype("Switch On Midi");
|
|
if(!proto) return CKERR_OUTOFMEMORY;
|
|
|
|
proto->DeclareInput("On");
|
|
proto->DeclareInput("Off");
|
|
|
|
proto->DeclareOutput("Out 1");
|
|
|
|
proto->DeclareInParameter("Channel", CKPGUID_INT, "0");
|
|
proto->DeclareInParameter("Note 1", CKPGUID_INT, "0");
|
|
|
|
proto->DeclareOutParameter("Nop", CKPGUID_NONE);
|
|
proto->DeclareOutParameter("Attack 1", CKPGUID_INT, "0");
|
|
|
|
proto->SetBehaviorFlags((CK_BEHAVIOR_FLAGS)( CKBEHAVIOR_VARIABLEOUTPUTS| CKBEHAVIOR_INTERNALLYCREATEDINPUTPARAMS| CKBEHAVIOR_INTERNALLYCREATEDOUTPUTPARAMS));
|
|
proto->SetFlags(CK_BEHAVIORPROTOTYPE_NORMAL);
|
|
proto->SetFunction(SwitchOnMidi);
|
|
|
|
proto->SetBehaviorCallbackFct( SwitchOnMidiCallBack );
|
|
|
|
*pproto = proto;
|
|
return CK_OK;
|
|
|
|
}
|
|
|
|
|
|
/*******************************************************/
|
|
/* MAIN FUNCTION */
|
|
/*******************************************************/
|
|
int SwitchOnMidi(const CKBehaviorContext& behcontext)
|
|
{
|
|
CKBehavior *beh = behcontext.Behavior;
|
|
|
|
if( beh->IsInputActive(1) ){ // OFF
|
|
beh->ActivateInput(1, FALSE);
|
|
|
|
return CKBR_OK;
|
|
}
|
|
|
|
if( beh->IsInputActive(0) ){ // ON
|
|
beh->ActivateInput(0, FALSE);
|
|
}
|
|
|
|
int channel=0; // Channel
|
|
beh->GetInputParameterValue(0, &channel);
|
|
|
|
MidiManager *mm = (MidiManager *) behcontext.Context->GetManagerByGuid( MIDI_MANAGER_GUID );
|
|
|
|
int note, attack, count = beh->GetInputParameterCount();
|
|
|
|
for( int a=1 ; a<count ; a++ ){
|
|
beh->GetInputParameterValue(a, ¬e);
|
|
if( mm->IsNoteActive(note, channel) ){
|
|
beh->ActivateOutput(a-1);
|
|
}
|
|
|
|
//--- Attack part
|
|
XListIt<midiMessage> it;
|
|
for( it = mm->listForBehaviors.Begin() ; it!=mm->listForBehaviors.End() ; it++ ){
|
|
if( (*it).channel==channel ){
|
|
if( (*it).command==9 || (*it).command==8 ){ // start a note
|
|
if( note == (*it).note ){
|
|
attack = (*it).attack;
|
|
beh->SetOutputParameterValue(a, &attack);
|
|
}
|
|
}
|
|
}
|
|
}
|
|
//---
|
|
}
|
|
|
|
|
|
return CKBR_ACTIVATENEXTFRAME;
|
|
}
|
|
|
|
|
|
/*******************************************************/
|
|
/* CALLBACK */
|
|
/*******************************************************/
|
|
CKERROR SwitchOnMidiCallBack(const CKBehaviorContext& behcontext){
|
|
CKBehavior *beh = behcontext.Behavior;
|
|
MidiManager *mm = (MidiManager *) behcontext.Context->GetManagerByGuid( MIDI_MANAGER_GUID );
|
|
|
|
switch( behcontext.CallbackMessage ){
|
|
|
|
case CKM_BEHAVIOREDITED:
|
|
{
|
|
int c_out = beh->GetOutputCount();
|
|
int c_pin = beh->GetInputParameterCount()-1;
|
|
|
|
char str[16];
|
|
|
|
while( c_pin < c_out ){ // we must add Input Params / Ouput Params
|
|
sprintf( str, "Note %d", c_pin+1);
|
|
beh->CreateInputParameter(str, CKPGUID_INT);
|
|
|
|
sprintf( str, "Attack %d", c_pin+1);
|
|
beh->CreateOutputParameter(str, CKPGUID_INT);
|
|
|
|
++c_pin;
|
|
}
|
|
|
|
while( c_pin > c_out ){ // we must remove Input Params / Ouput Params
|
|
CKDestroyObject(beh->RemoveInputParameter(c_pin));
|
|
CKDestroyObject(beh->RemoveOutputParameter(c_pin));
|
|
--c_pin;
|
|
}
|
|
|
|
CKBehaviorIO *out;
|
|
while( c_out ){
|
|
--c_out;
|
|
out = beh->GetOutput(c_out);
|
|
sprintf( str, "Out %d", c_out+1);
|
|
out->SetName(str);
|
|
}
|
|
}
|
|
break;
|
|
|
|
case CKM_BEHAVIORATTACH:
|
|
case CKM_BEHAVIORLOAD:
|
|
{
|
|
mm->AddMidiBBref();
|
|
} break;
|
|
case CKM_BEHAVIORDETACH:
|
|
{
|
|
mm->RemoveMidiBBref();
|
|
} break;
|
|
|
|
}
|
|
|
|
return CKBR_OK;
|
|
}
|