APC40mkII.js

// Modes in Order Off - On, Pulsing, Blinking
var modes = [0, 1, 11, 16];

// Colors defined by Ableton (APC Colors)
var colors = [
    [0, 0, 0],
    [30, 30, 30],
    [127, 127, 127],
    [255, 255, 255],
    [255, 76, 76],
    [255, 0, 0],
    [89, 0, 0],
    [25, 0, 0],
    [255, 189, 108],
    [255, 84, 0],
    [89, 29, 0],
    [39, 27, 0],
    [255, 255, 76],
    [255, 255, 0],
    [89, 89, 0],
    [25, 25, 0],
    [136, 255, 76],
    [84, 255, 0],
    [29, 89, 0],
    [20, 43, 0],
    [76, 255, 76],
    [0, 255, 0],
    [0, 89, 0],
    [0, 25, 0],
    [76, 255, 94],
    [0, 255, 25],
    [0, 89, 13],
    [0, 25, 2],
    [76, 255, 136],
    [0, 255, 85],
    [0, 89, 29],
    [0, 31, 18],
    [76, 255, 183],
    [0, 255, 153],
    [0, 89, 53],
    [0, 25, 18],
    [76, 195, 255],
    [0, 169, 255],
    [0, 65, 82],
    [0, 16, 25],
    [76, 136, 255],
    [0, 85, 255],
    [0, 29, 89],
    [0, 8, 19],
    [76, 76, 255],
    [0, 0, 255],
    [0, 0, 89],
    [0, 0, 25],
    [135, 76, 255],
    [84, 0, 255],
    [25, 0, 100],
    [15, 0, 48],
    [255, 76, 255],
    [255, 0, 255],
    [89, 0, 89],
    [25, 0, 25],
    [255, 76, 135],
    [255, 0, 84],
    [89, 0, 29],
    [34, 0, 19],
    [255, 21, 0],
    [153, 53, 0],
    [121, 81, 0],
    [67, 100, 0],
    [3, 57, 0],
    [0, 87, 53],
    [0, 84, 127],
    [0, 0, 255],
    [0, 69, 79],
    [37, 0, 204],
    [127, 127, 127],
    [32, 32, 32],
    [255, 0, 0],
    [189, 255, 45],
    [175, 237, 6],
    [100, 255, 9],
    [16, 139, 0],
    [0, 255, 135],
    [0, 169, 255],
    [0, 42, 255],
    [63, 0, 255],
    [122, 0, 255],
    [178, 26, 125],
    [64, 33, 0],
    [255, 74, 0],
    [136, 225, 6],
    [114, 255, 21],
    [0, 255, 0],
    [59, 255, 38],
    [89, 255, 113],
    [56, 138, 255],
    [49, 81, 198],
    [135, 127, 233],
    [211, 29, 255],
    [255, 0, 93],
    [255, 127, 0],
    [185, 176, 0],
    [144, 255, 0],
    [131, 93, 7],
    [57, 43, 0],
    [20, 76, 16],
    [13, 80, 56],
    [21, 21, 42],
    [22, 32, 90]
];

// noted in [channel,note]
var noteNotes = {
	pads: {
		main: [
			[[1,32], [1,33], [1,34], [1,35], [1,36], [1,37], [1,38], [1,39], [1,82]],
			[[1,24], [1,25], [1,26], [1,27], [1,28], [1,29], [1,30], [1,31], [1,83]],
			[[1,16], [1,17], [1,18], [1,19], [1,20], [1,21], [1,22], [1,23], [1,84]],
			[[1, 8], [1, 9], [1,10], [1,11], [1,12], [1,13], [1,14], [1,15], [1,85]],
			[[1, 0], [1, 1], [1, 2], [1, 3], [1, 4], [1, 5], [1, 6], [1, 7], [1,86]],
			[[1,52], [2,52], [3,52], [4,52], [5,52], [6,52], [7,52], [8,52], [1,81]],
			[[1,51], [2,51], [3,51], [4,51], [5,51], [6,51], [7,51], [8,51], [1,80]]
		],
		faders: [
			[[1,50], [1,66], [1,49], [1,48]],
			[[2,50], [2,66], [2,49], [2,48]],
			[[3,50], [3,66], [3,49], [3,48]],
			[[4,50], [4,66], [4,49], [4,48]],
			[[5,50], [5,66], [5,49], [5,48]],
			[[6,50], [6,66], [6,49], [6,48]],
			[[7,50], [7,66], [7,49], [7,48]],
			[[8,50], [8,66], [8,49], [8,48]]
		]
	},
	buttons: {
		top: {
			"pan": [1, 87],
			"sends": [1,88],
			"user": [1,89],

			"play": [1, 91],
			"record": [1, 93],
			"session": [1, 102],

			"metronome": [1, 90],
			"tapTempo": [1, 99],
			"nudgeMinus": [1, 100],
			"nudgePlus": [1, 101],
		},

		encoders: {
			"1DevicePrev": [1,58],
			"2DeviceNext": [1,59],
			"3BankPrev": [1,60],
			"4BankNext": [1,61],
			"5DevOnOff": [1,62],
			"6DevLock": [1,63],
			"7ClipDevView": [1,64],
			"8DetailView": [1,65],

			"shift": [1,98],
			"bank": [1,103]
		},
		bankSelect: {
			up: [1,94],
			down: [1,95],
			left: [1,97],
			right: [1,96]
		}
	},
};

var ccNotes = {
	encoders: {
		top: [[1,48], [1,49], [1,50], [1,51], [1,52], [1,53], [1,54], [1,55]],
		side: [[1,16], [1,17], [1,18], [1,19], [1,20], [1,21], [1,22], [1,23]],
		cue: [1,47],
		tempo: [1,13]
	},
	faders: [[1,7], [2,7], [3,7], [4,7], [5,7], [6,7], [7,7], [8,7], [1,14], [1,15]]
};

var buttonLedKeys = ["pan","sends","user","play","record","session","metronome", "1DevicePrev", "2DeviceNext", "3BankPrev", "4BankNext", "5DevOnOff", "6DevLock", "7ClipDevView", "8DetailView", "bank"];


var noteValueObj = [[],[],[],[],[],[],[],[],[]];
var ccValueObj = [[],[],[],[],[],[],[],[],[]];
var colorParameterObj = [[],[],[],[],[]];
var modeParameterObj = [[],[],[],[],[]];
var faderPadParameterObj = [[],[],[],[],[],[],[],[]];
var buttonParameterObj = {};



function refresh() {
	util.delayThreadMS(200);
	setMidiMode();
	util.delayThreadMS(200);
	resendMidi();
}

function setMidiMode() {
	local.sendSysex(0x47, 0x7F, 0x29, 0x60, 0x00, 0x04, 0x41, 0x08, 0x02, 0x01);
	script.log("Set Midi Mode with Sysex Message");
}

function resendMidi() {
	// Encoders
	for(var i = 0; i < 8; i++) {
		sendEncoderValue(true, (i+1), local.values.encoders.getChild("encoderTop"+(i+1)).get());
		sendEncoderValue(false, (i+1), local.values.encoders.getChild("encoderSide"+(i+1)).get());
		sendEncoderMode(true, (i+1), local.parameters.encoderModes.getChild("encoderTop"+(i+1)+"Mode").get());
		sendEncoderMode(false, (i+1), local.parameters.encoderModes.getChild("encoderSide"+(i+1)+"Mode").get());
	}

	// Pad Colors
	for (var row = 1; row <= 5; row++) {
		for(var column = 1; column <= 8; column++) {
			resendPad(row, column);
		}
	}

	// Fader Pads
	for (var fader = 0; fader < 8; fader ++) {
		for (var button = 0; button < 4; button ++) {
			state = faderPadParameterObj[fader][button].get();
			sendFaderPad(fader + 1, button + 1, state);
		}
	}

	// Buttons
	for (var i = 0; i < buttonLedKeys.length; i++) {
		var obj = buttonParameterObj[buttonLedKeys[i]];
		sendButton(obj.getParent().name, obj.name, obj.get());
	}
}

//-----------------------------------------------------------
//FIXME: Dimmed colors rather take like dimmed blue is closer to dimmed purple than dimmed blue
function findClosestColor(rgbValue, colorArray) {
    var closestIndex = 0;
    // var closestDistance = Infinity;
    var closestDistance = 10000;

	// TODO: scale to nearest brightness level to avoid wrong color 
    for (var i = 0; i < colorArray.length; i++) {
        var color = colorArray[i];
        var distance = Math.sqrt(
            Math.pow((rgbValue[0] * 255) - color[0], 2) +
            Math.pow((rgbValue[1] * 255) - color[1], 2) +
            Math.pow((rgbValue[2] * 255) - color[2], 2)
        );

        if (distance < closestDistance) {
            closestDistance = distance;
            closestIndex = i;
        }
    }

	// script.log("Given Color: ("+color[0]+","+color[1]+","+color[2]+") best color id is: " + closestIndex);
    return closestIndex;
}

//-----------------------------------------------------------

// ----- Midi Functions -----
function sendColorPad(row, column, color, mode) {
	var channel = modes[mode];
	var note = noteNotes.pads.main[row-1][column-1];
	var value = findClosestColor(color, colors);

	local.sendNoteOn(modes[1], note[1], value); // set color disregarding the mode

	if (mode != 1) {
		local.sendNoteOn(channel, note[1], 0);
	}

}

function sendDefaultPad(row, column, mode) {
	var channel = modes[mode];
	var note = noteNotes.pads.main[row-1][column-1];

	// TODO: implement blinking logic
	if (mode == 0) {
		local.sendNoteOn(channel, note[1], 0);
	}
	else {
		local.sendNoteOn(note[0], note[1], 127);
	}

}

function sendPadColor(row, column, color) {
	script.log("setPadColor");
	var mode = modeParameterObj[row-1][column-1].get();
	sendColorPad(row, column, color, mode);
}

function sendPadMode(row, column, mode) {
	if (row <= 5) { // Color Pads
		var color = colorParameterObj[row-1][column-1].get();
		sendColorPad(row, column, color, mode);
	}
	else { // Default Pads
		sendDefaultPad(row, column, mode);
	}
}

function resendPad(row, column) {
	var color = colorParameterObj[row-1][column-1].get();
	var mode = modeParameterObj[row-1][column-1].get();
	sendColorPad(row, column, color, mode);
}

function sendFaderPad(fader, button, state) {
	var note = noteNotes.pads.faders[fader-1][button-1];

	local.sendNoteOn(note[0], note[1], state ? 127 : 0);
}

function sendButton(parent, name, state) {
	var note = noteNotes.buttons[parent][name];

	local.sendNoteOn(note[0], note[1], state ? 127 : 0);
}

function sendEncoderValue(top, index, value) {
	var group = top ? "top":"side";
	var note = ccNotes.encoders[group][index - 1];
	local.sendCC(note[0], note[1], Math.round(value * 127));
}

// Set Encoder Display Mode with Midi Message
function sendEncoderMode(top, index, mode) {
	var group = top ? "top":"side";
	var note = ccNotes.encoders[group][index - 1];
	local.sendCC(note[0], note[1]+8, mode);
} 

function setRGB(xId, yId) {
	// TODO: Send Sysex Message with RGB Data (doesn't seem to be possible)
}

function resetColors() {
	// TODO:
}

// ----- Chataigne Functions -----
function init() {
	// Generate CC to Object Matrix
	// Generate Note to Object Matrix
	// Generate Object Matrices

	// ------- Faders -------
	for (var i = 0; i <= 9; i++) {
		var note = ccNotes.faders[i];
		var name = "fader" + (i+1) + "";
		if (i == 9){
			name = "faderAb";
		}
		
		ccValueObj[note[0]][note[1]] = local.values.faders.getChild(name);
	}

	// ------- Encoders --------
	for (var i = 0; i < 8; i++) {
		var noteTop = ccNotes.encoders.top[i];
		var noteSide = ccNotes.encoders.side[i];
		var nameTop = "encoderTop" + (i+1) + "";
		var nameSide = "encoderSide" + (i+1) + "";
		
		ccValueObj[noteTop[0]][noteTop[1]] = local.values.encoders.getChild(nameTop);
		ccValueObj[noteSide[0]][noteSide[1]] = local.values.encoders.getChild(nameSide);
	}

	// ---- Special Encoders ----
	ccValueObj[ccNotes.encoders.cue[0]][ccNotes.encoders.cue[1]] = local.values.encoders.getChild("encoderCueLevel");
	ccValueObj[ccNotes.encoders.tempo[0]][ccNotes.encoders.tempo[1]] = local.values.encoders.getChild("encoderTempo");


	// ------ Main Pads ------
	for (var row = 0; row < 7; row++) {
		for(var column = 0; column < 9; column++){
			var note = noteNotes.pads.main[row][column];
			var name = "pad" + (row+1) + (column+1) + "";

			noteValueObj[note[0]][note[1]] = local.values.pads.main.getChild(name);
			if (row < 5 && column < 9) {
				// script.log("Test" + local.parameters.getChild("padLED").mode.getChild(name).name);
				colorParameterObj[row][column] = local.parameters.getChild("padLED").color.getChild(name);
				modeParameterObj[row][column] = local.parameters.getChild("padLED").mode.getChild(name); // FIXME: This would need to be implemented for all playbacks
			}
		}
	}

	// --- Fader Pads ---
	var faderButtonNames = ["Select","Ab","Solo","Record"];
	for (var fader = 0; fader < 8; fader++) {
		for (var button = 0; button < 4; button++) {
			var note = noteNotes.pads.faders[fader][button];
			var name = "fader" + (fader + 1) + faderButtonNames[button];

			noteValueObj[note[0]][note[1]] = local.values.pads.faderButtons.getChild(name);
			faderPadParameterObj[fader][button] = local.parameters.padLED.faderButtons.getChild(name);
		}
	}

	// ------- Buttons --------
	// because there doesn't seem to be a way to iterate over object or getting the keys here a manual:
	var groups = ["top","encoders","bankSelect"];
	var keys = [
		["pan","sends","user","play","record","session","metronome","tapTempo","nudgePlus","nudgeMinus"],
		["1DevicePrev", "2DeviceNext", "3BankPrev", "4BankNext", "5DevOnOff", "6DevLock", "7ClipDevView", "8DetailView", "shift", "bank"],
		["up","down","left","right"]
	];

	for (var i = 0; i < groups.length; i++) {
		var group = groups[i];
		for (var k = 0; k < keys[i].length; k++){
			var key = keys[i][k];
			var note = noteNotes.buttons[group][key];

			noteValueObj[note[0]][note[1]] = local.values.buttons.getChild(group).getChild(key);

			var parent = local.parameters.buttonLED.getChild(group);
			if (parent && parent.getChild(key)) { // only if button has LED
				buttonParameterObj[key] = parent.getChild(key);
			}
		}
	}
}

// ------ Chataigne Events ------
var midiDeviceOutLast;
var refreshReady = false;

function moduleValueChanged(value) {
	// Refreshs midi on first incoming message (because default handler is not workign)
	if (refreshReady == true) {
		refreshReady = false;
		refresh();
	}

	if(value.getParent().name == "encoders") {
		if (value.name.substring(7,10) == "Top") {
			var index = parseInt(value.name.charAt(10));
			sendEncoderValue(true, index, value.get());

		}
		else if(value.name.substring(7,11) == "Side") {
			var index = parseInt(value.name.charAt(11));
			sendEncoderValue(false, index, value.get());
		}
	}
}

function moduleParameterChanged(param) {
	// script.log("Parameter Changed: " + param.name + " Parent: " + param.getParent().name + " GrandParent: " + param.getParent().getParent().name + " Value: " + param.get());

	// connection refresh -> check midi out available
	if (param.name == "devices") {
		var midiOutDevice = param.get()[1];
		if (param.get()[1] != midiDeviceOutLast) {
			midiDeviceOutLast = midiOutDevice;

			if (midiOutDevice) {
				script.log("New Midi out Device detected");
				refreshReady = true;
				// refresh();
			}
		}
	}


	if(param.getParent().name == "encoderModes") {
		if (param.name.substring(7,10) == "Top") {
			var index = parseInt(param.name.charAt(10));
			sendEncoderMode(true, index, param.get());

		}
		else if(param.name.substring(7,11) == "Side") {
			var index = parseInt(param.name.charAt(11));
			sendEncoderMode(false, index, param.get());
		}
	}

	else if (param.getParent().getParent().name == "padLED") {
		if (param.getParent().name == "color") {
			var row = parseInt(param.name.charAt(3));
			var column = parseInt(param.name.charAt(4));
			sendPadColor(row, column, param.get());
			script.log("this");
		}

		else if (param.getParent().name == "mode") {
			var row = parseInt(param.name.charAt(3));
			var column = parseInt(param.name.charAt(4));
			sendPadMode(row, column, param.get());
		}

		else if (param.getParent().name == "faderButtons") {
			var fader = parseInt(param.name.charAt(5));
			var action = param.name.substring(6, 8);
			var button = action === "Se" ? 1 :
						 action === "AB" ? 2 :
						 action === "So" ? 3 :
						 action === "Re" ? 4 : 0;

			sendFaderPad(fader, button, param.get());
		}
	}

	else if(param.getParent().getParent().name == "buttonLED"){
		sendButton(param.getParent().name, param.name, param.get());
	}
}

function update(delta) {
}


// ------ Midi Handlers ------
function handleCC(channel, number, value) {
	var obj = ccValueObj[channel][number];
	if (!!obj) {
		if(obj.name == "encoderCueLevel" || obj.name == "encoderTempo"){
			if (value > 63) value = value - 128;
			obj.set(value);
		}
		else {
			obj.set((value/127));
		}
	}
	else{
		script.log("No Mapping for this Midi CC found");
	}
}

function handleNote(channel, note, velocity) {
	var obj = noteValueObj[channel][note];
	if (!!obj) {
		obj.set((velocity == 127));
	}
	else {
		script.log("No Mapping for this Midi Note found");
	}

}


// ------ Midi Events ------
function noteOnEvent(channel, note, velocity) {
	handleNote(channel, note, velocity);
}


function noteOffEvent(channel, note , velocity) {
	handleNote(channel, note, velocity);
}

function ccEvent(channel, number, value) {
	handleCC(channel, number, value);
}

function sysExEvent(data) {
	script.log("Sysex Message received, "+data.length+" bytes :");
}

// ------ User Functions ------
function setEncoderValue(top, index, value) {
	local.values.encoders.getChild((top ? "encoderTop" : "encoderSide") + index).set(value);
}

function setEncoderMode(top, index, mode) {
	local.parameters.encoderModes.getChild((top ? "encoderTop" : "encoderSide")+ index + "Mode").setData(mode);
}

function setPadColor(row, column, color) {
	colorParameterObj[row-1][column-1].set(color);
}

function setPadMode(row, column, mode) {
	modeParameterObj[row-1][column-1].setData(mode);
}

function setButton(index, state) {
	var key = buttonLedKeys[index];
	buttonParameterObj[key].set(state);
}

function setFaderPad(fader, button, state) {
	faderPadParameterObj[fader-1][button].set(state);
}