#include <MatrixFonts3x5.h>

#define COLS 5
#define ROWS 7
#define PINS 13

byte col = 0;
byte leds[COLS][ROWS];

// pin[xx] on led matrix connected to nn on Arduino (-1 is dummy to make array start at pos 1)
int pins[PINS]= {-1, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12};

// col[xx] of leds = pin yy on led matrix
int cols[COLS] = {pins[1], pins[3], pins[10], pins[7], pins[8]};

// row[xx] of leds = pin yy on led matrix
int rows[ROWS] = {pins[12], pins[11], pins[2], pins[9], pins[4], pins[5], pins[6]};

long Startpunkt;
long Anzeigedauer = 30;
long AnzeigeOffset = 30;

const int numPatterns = 13;
byte patterns[numPatterns][COLS][ROWS] = {H,E,L,L,O,SPACE,W,O,R,L,D,EMARK,SPACE}; 


void setup() {
  // Serial.begin(9600);
  
  
  // sets the pins as output
  for (int i = 0; i < PINS; i++) {
    pinMode(pins[i], OUTPUT);
  }

  // set up cols
  for (int i = 1; i <= COLS; i++) {
    digitalWrite(cols[i - 1], 0);
  }
  //  and rows
  for (int i = 1; i <= ROWS; i++) {
    digitalWrite(rows[i - 1], 1);
  }
}

void loop() {
  for (int h = 0; h < numPatterns-1; h++){
//    setPattern(h);
    Anzeigedauer = AnzeigeOffset + analogRead(0);    
    for (int l = 0; l < COLS; l++) {
      for (int i = 0; i < (COLS - 1); i++) {
        for (int j = 0; j < ROWS; j++) {
          leds[i][j] = leds[i + 1][j];
        }
      }
      for (int j = 0; j < ROWS; j++) {
        leds[4][j] = patterns[h][0 + l][j];
      }
      Startpunkt = millis();
      while (millis() - Startpunkt  < Anzeigedauer){
        display();
      }
      Anzeigedauer = AnzeigeOffset + analogRead(0); 
    }
    aus();
  }
  
  delay(1000);
  clearLeds();
}

void display() {
  digitalWrite(cols[col], 0);  // Turn whole previous column off
  col++;
  if (col == 5) {
    col = 0;
  }
  for (int row = 0; row < 7; row++) {
    if (leds[col][(ROWS - 1) - row] == 1) {
      digitalWrite(rows[row], 0);  // Turn on this led
    }
    else {
      digitalWrite(rows[row], 1); // Turn off this led
    }
  }
  digitalWrite(cols[col], 1); // Turn whole column on at once (for equal lighting times)
}


void clearLeds() {
  // Clear display array
  for (int i = 0; i < COLS; i++) {
    for (int j = 0; j < ROWS; j++) {
      leds[i][j] = 0;
    }
  }
}
  
void setPattern(int pattern) {
  for (int i = 0; i < COLS; i++) {
    for (int j = 0; j < ROWS; j++) {
      leds[i][j] = patterns[pattern][i][j];
    }
  }
}

void aus(){
      digitalWrite(cols[0], 0);
      digitalWrite(cols[1], 0);
      digitalWrite(cols[2], 0);
      digitalWrite(cols[3], 0);
      digitalWrite(cols[4], 0);
      digitalWrite(rows[0], 1);
      digitalWrite(rows[1], 1);
      digitalWrite(rows[2], 1);
      digitalWrite(rows[3], 1);
      digitalWrite(rows[4], 1);
      digitalWrite(rows[5], 1);
      digitalWrite(rows[6], 1);
}