#include <string.h>
#include <EEPROM.h>
/*2-dimensional array of column pin numbers:*/
int C[] = {13,12,11,10,9,8,7,6};    
const int LONG_PRESS_TIME  = 2000; // 1000 milliseconds
int PB = 2;
int speed_val=60;

int speed_con=0;
char dynamic_data;

char Data,current_data;
String datastring;
int datalength;
int char_to_process;
int count=0;

char ALPHA[] ={
0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0X00,0x00,       //Blank
0x00,0xfc,0x3a,0x11,0x11,0x3a,0xfc,0x00,0x00,0x00,       //A
0x00,0xff,0x99,0x99,0x99,0x66,0x00,0x00,0x00,0x00,       //B
0x00,0x3c,0x42,0x81,0x81,0x81,0x42,0x00,0x00,0x00,       //C
0x00,0xff,0x81,0x81,0x81,0x42,0x3c,0x00,0x00,0x00,       //D
0x00,0xff,0x89,0x89,0x89,0x81,0x00,0x00,0x00,0x00,       //E
0x00,0xff,0x09,0x09,0x09,0x01,0x00,0x00,0x00,0x00,       //F
0x00,0x3c,0x42,0x81,0x91,0x91,0x72,0x00,0x00,0x00,       //G
0x00,0xff,0x10,0x10,0x10,0xff,0x00,0x00,0x00,0x00,       //H
0x00,0x81,0x81,0xff,0x81,0x81,0x00,0x00,0x00,0x00,       //I
0x00,0x41,0x81,0x81,0x7f,0x01,0x01,0x00,0x00,0x00,       //J
0x00,0xff,0x18,0x24,0x42,0x81,0x00,0x00,0x00,0x00,       //K
0x00,0xff,0x80,0x80,0x80,0x80,0x00,0x00,0x00,0x00,       //L
0x00,0xff,0x02,0x04,0x04,0x02,0xff,0x00,0x00,0x00,       //M
0x00,0xff,0x06,0x08,0x10,0x60,0xff,0x00,0x00,0x00,       //N
0x00,0x3c,0x42,0x81,0x81,0x42,0x3c,0x00,0x00,0x00,       //O
0x00,0xff,0x11,0x11,0x11,0x0e,0x00,0x00,0x00,0x00,       //P
0x00,0x7e,0x91,0xa1,0x41,0xbe,0x00,0x00,0x00,0x00,       //Q
0x00,0xff,0x11,0x31,0x51,0x8e,0x00,0x00,0x00,0x00,       //R
0x00,0x4e,0x89,0x91,0x91,0x62,0x00,0x00,0x00,0x00,       //S
0x00,0x01,0x01,0xff,0x01,0x01,0x00,0x00,0x00,0x00,       //T
0x00,0x7f,0x80,0x80,0x80,0x80,0x7f,0x00,0x00,0x00,       //U
0x00,0x3f,0x40,0x80,0x40,0x3f,0x00,0x00,0x00,0x00,       //V
0xff,0x40,0x20,0x10,0x10,0x20,0x40,0xff,0x00,0x00,       //W
0x00,0xc3,0x24,0x18,0x18,0x24,0xc3,0x00,0x00,0x00,       //X
0x03,0x04,0x08,0xf0,0x08,0x04,0x03,0x00,0x00,0x00,       //Y
0xc1,0xa1,0x91,0x89,0x85,0x83,0x00,0x00,0x00,0x00        //Z
};


void speed_set()
{ 
  count = count +1;
  if (count > 2)
    count =0;
     if (count ==0)
    speed_val =60;
   else if(count == 1)
    speed_val= 40;
   else
    speed_val =20;  
}
void setup() 
{
 Serial.begin(115200);
 pinMode(PB, INPUT_PULLUP);
 attachInterrupt(digitalPinToInterrupt(PB), speed_set, FALLING);
 pinMode(C[0],OUTPUT);
 pinMode(C[1],OUTPUT);
 pinMode(C[2],OUTPUT);
 pinMode(C[3],OUTPUT);
 pinMode(C[4],OUTPUT);
 pinMode(C[5],OUTPUT);
 pinMode(C[6],OUTPUT);
 pinMode(C[7],OUTPUT);
  for (int i=0;i<8;i++)
  {
    digitalWrite(C[i],HIGH);
  }
  DDRA = 0xFF;
  PORTA =0;
}

void loop() 
{

Serial.println("Enter Data  AND else enter AS END CHARACTER $ ");
  do{
  while(!Serial.available());

  if(Serial.available()>0)
  {
    Data = Serial.read();
    datastring += Data;
   }
  }while(Data !='$');

  Serial.print("Data String is : ");
  Serial.println(datastring);
  Serial.flush();   // FLUSHING THE  SERIAL BUFFER
  datalength = datastring.length();
  Serial.print("Data length  is ");
  Serial.println(datalength);


int j=10;
for (int y=0;y<datalength-1;y++)   // HOW MANY CHARACTERS, USERS HAS ENTERED
  {
    current_data=datastring[y];
    char_to_process = int(current_data); // GETTING THE DECIMAL EQUIVALENT
  // Initializing EEPROM by 0     // MAX 512 CHARACTERS CAN BE STORED
  for (int i= 0; i<=9;i++)
        EEPROM.write(i, 0);   
 
  // copying the char in to a dynamic_data array 
            for (int i= 0; i<=9;i++)
             {
               dynamic_data=ALPHA[(char_to_process -64)*10 + i];// VALUE OF ALPHA ARRAY STORE AT THAT INDEX
               EEPROM.write(j+i, dynamic_data); 
             }
             j=j+10;
             
    }

  Serial.println("Displaying data on to Matrix");
  
  for(int k=0; k<=10;k++)   // THIS WILL DISPLAY DATA 1
  for(int x=0;x<(datalength-1)*10;x++)  // ADDRESS
  {
    for(int a=0;a<speed_val;a++)
    {
         for (int i=0;i<8;i++)
          { 
             digitalWrite(C[i],LOW);
             PORTA = EEPROM.read(i+x); // DATA CORRESPONDING TO THAT COLOUMN
            delay(1);
            digitalWrite(C[i],HIGH);
          }    
    }
  }
  
  delay(10);

}