// MIDI Light Dimmer Code
// by Alexander Reeder, Oct. 26 2007

#define LEDpin 13

#define L1 0
#define L2 1
#define L3 2
#define L4 3

#define NUMLIGHTS 4

int i = 0;
int j = 0;
int lights[4] = {0};

void setup() {
Serial.begin(31250); // set MIDI baud rate
blink(3);
}

void loop() {
// turn all the lights off to start, just in case
noteOn(0x90,0,0);
noteOn(0x90,1,0);
noteOn(0x90,2,0);
noteOn(0x90,3,0);

// light program, 4 minutes in length
fadeUp(1, 5000, 0, 30);
fadeDown(1, 5000, 30, 0);
fadeUp(1, 5000, 0, 30);
fadeDown(1, 5000, 30, 0);
fadeUp(1, 5000, 0, 30);
fadeDown(1, 5000, 30, 0);
// 30s
fadeUp(0, 5000, 0, 30);
fadeDown(0, 5000, 30, 0);
fadeUp(0, 5000, 0, 30);
fadeDown(0, 5000, 30, 0);
fadeUp(1, 5000, 0, 30);
fadeUp(0, 5000, 0, 30);
// 60s
fadeUp(2, 5000, 0, 30);
fadeDown(2, 5000, 30, 0);
fadeUp(2, 5000, 0, 30);
fadeDown(2, 5000, 30, 0);
fadeUp(2, 5000, 0, 30);
fadeUp(3, 5000, 0, 30);
// 90s
fadeUp(0, 2000, 30, 40);
fadeUp(1, 2000, 30, 40);
fadeUp(2, 2000, 30, 40);
fadeUp(3, 2000, 30, 40);
fadeUp(0, 2000, 40, 50);
fadeUp(1, 2000, 40, 50);
fadeUp(2, 2000, 40, 50);
fadeUp(3, 2000, 40, 50);
fadeUp(0, 2000, 50, 60);
fadeUp(1, 2000, 50, 60);
fadeUp(2, 2000, 50, 60);
fadeUp(3, 2000, 50, 60);
fadeUp(0, 2000, 60, 80);
fadeUp(1, 2000, 60, 80);
// 120s
fadeUp(2, 2000, 60, 80);
fadeUp(3, 2000, 60, 80);
fadeUp(0, 2000, 80, 100);
fadeUp(1, 2000, 80, 100);
fadeUp(2, 2000, 80, 100);
fadeUp(3, 2000, 80, 100);
lights[0] = 1;
lights[1] = 1;
lights[2] = 1;
lights[3] = 1;
fadeDownMulti(lights, 5000, 100, 0);
fadeUpMulti(lights, 5000, 0, 100);
fadeDownMulti(lights, 5000, 100, 0);
fadeUpMulti(lights, 5000, 0, 50);
// 150s
fadeDownMulti(lights, 5000, 50, 0);
fadeUpMulti(lights, 5000, 0, 30);
fadeDownMulti(lights, 5000, 30, 0);
// 165s

// just put her to sleep b/c we are done
delay(10000000);
}

void fadeUp(int channel, int time, int from, int to)
{

int timeDelay = (time) / (to - from);
for (i = from; i <= to; i++) {
noteOn(0x90, channel, i);
delay(timeDelay);
}
}

void fadeUpMulti(int channels[], int time, int from, int to)
{

int timeDelay = (time) / (to - from);
for (i = from; i <= to; i++) {
for (j = 0; j < NUMLIGHTS; j++)
if (channels[j])
noteOn(0x90, j, i);
delay(timeDelay);
}
}

void fadeDown(int channel, int time, int from, int to)
{

int timeDelay = (time) / (from - to);
for (i = from; i >= to; i--) {
noteOn(0x90, channel, i);
delay(timeDelay);
}
}

void fadeDownMulti(int channels[], int time, int from, int to)
{

int timeDelay = (time) / (from - to);
for (i = from; i >= to; i--) {
for (j = 0; j < NUMLIGHTS; j++)
if (channels[j])
noteOn(0x90, j, i);
delay(timeDelay);
}
}

// data1 should be from 0-5, and tells the dimmer which light group
// data2 should be from 0-127 and represents the brightness
void noteOn(char cmd, char data1, char data2) {
Serial.print(cmd, BYTE);
Serial.print(data1, BYTE);
Serial.print(data2, BYTE);
}

void blink(int howManyTimes) {
int i;
for (i=0; i< howManyTimes; i++) {
digitalWrite(LEDpin, HIGH);
delay(100);
digitalWrite(LEDpin, LOW);
delay(100);
}
}