#include <Adafruit_NeoPixel.h>
#define PIN 6
#define N_ROWS 3
#define N_COLS 28
#define DO 0
#define RE 2
#define MI 4
#define FA 6
#define SOL 8  
#define LA 10
#define SI_B 11
#define SI 12   
#define DO_2 14
#define RE_2 16
#define MI_B_2 17
#define MI_2 18
#define FA_2 20
#define FA_D_2 21
#define SOL_2 22    
#define N_LEDS (N_ROWS * N_COLS)
 
Adafruit_NeoPixel strip = Adafruit_NeoPixel(N_LEDS, PIN, NEO_GRB + NEO_KHZ800);
 
int delays[N_ROWS];
 
void erase(){
  for(uint16_t i=0; i < strip.numPixels(); i++) { 
    strip.setPixelColor(i, 0); 
  }
}
 
void setup() {
  strip.begin();
  strip.setBrightness(125);
  erase();
  strip.show();
 
  for(int i = 0; i < N_ROWS; i++){
    delays[i] = 1000;  
  }
}
 
void check(){
  erase();
  for(int i = 0; i < strip.numPixels(); i++) { // Draw new pixel
    if(i > 0){
      strip.setPixelColor(i - 1, 0); 
    } else {
      strip.setPixelColor(N_LEDS - 1, 0);  
    }
    strip.setPixelColor(i, strip.Color(32,0,0)); 
 
    delay(100);
    strip.show();
  }
  erase();
}
 
int getInd(int i, int j){
  return i * N_COLS + (i%2 ? (N_COLS - j - 1) : j);
}
 
int lastNote = -1;
 
void play(uint32_t note){ 
  for(int i = 0; i < N_ROWS; i++){
    if(i < (N_ROWS - 1)){
      for(int j = 0; j < N_COLS; j++){
        strip.setPixelColor(getInd(i,j), strip.getPixelColor(getInd(i + 1,j)));
      } 
    } else {
      for(int j = 0; j < N_COLS; j++){
        if((note == j) || (note == j - 1)){
          strip.setPixelColor(getInd(i,j), strip.Color(note % 2 ? 255 : 0, note % 2 ? 0 : 255, 0));
        } else {
          strip.setPixelColor(getInd(i,j), strip.Color(0, 0, 0));
        }
      } 
    }
  }
  strip.show();
  delay(500);
}
 
void play(uint32_t note, int duration){ 
  for(int i = 0; i < duration; i++){
    play(note);  
  }
}
 
void part1(){
  play(SI);
  play(MI_2);
  play(SOL_2);
}
 
void part2(){
  play(FA_D_2);
  play(MI_2);
  play(SOL_2);
  play(MI_2);
}
 
void part3(){
  play(FA_2);
  play(MI_2);
  play(DO_2);
  play(RE_2);
}
 
void part4(){
  play(SI, 4);
}
 
void part5(){
  play(FA_D_2);
  play(MI_2);
  play(SI);  
  play(SI_B);
}
 
void part6(){
  play(LA, 4);
}
 
void part7(){
  play(LA);
  play(DO_2);
  play(MI_B_2);
}
 
void part8(){
  play(FA_D_2, 4);
}
 
void part9(){
  play(MI_2, 4);
}
 
void part10(){
  play(MI);
  play(SOL);
  play(RE_2);
}
 
void part11(){
  play(DO_2);
  play(SI);
  play(RE_2);
  play(DO_2);
}
 
void part12(){
  play(DO_2);
  play(SI);
  play(SI);
  play(MI_B_2);
}
 
void godfather(){
  part1();
  part2();
  part3();
  part4();
  part1();
  part2();
  part5();
  part6();
  part7();
  part8();
  part7();
  part9();
  part10();
  part11();
  part12();
  part9();
}
 
void loop() {
  check();
  godfather();
  check();
}