#include "cmap.h" 
int d;
char *char_pointer;
char Display_Ram[102];
unsigned char mask;
char LED_DATA[100]= "Welcome to e-Gizmo Mechatronix Central?\n";
char spaces[25] = "                       ~"; 
char count;	
unsigned char shift_counter;
#define INTEN 6000
const char CLK = 5; 
const char DAT = 6; 
const char STR = 7; 
const char K0 = A0; 
const char K1 = A1; 
const char K2 = A2; 
const char K3 = A3; 
const char K4 = 8; 
const char K5 = 9; 
const char K6 = 10; 
const char K7 = 11; 

void setup() {          
  pinMode(CLK, OUTPUT);     
  pinMode(DAT, OUTPUT);     
  pinMode(STR, OUTPUT);     
  pinMode(K0, OUTPUT);     
  pinMode(K1, OUTPUT);     
  pinMode(K2, OUTPUT);     
  pinMode(K3, OUTPUT);     
  pinMode(K4, OUTPUT);     
  pinMode(K5, OUTPUT);     
  pinMode(K6, OUTPUT);     
  pinMode(K7, OUTPUT);  

  digitalWrite(K0,HIGH);  
  digitalWrite(K1,HIGH);  
  digitalWrite(K2,HIGH);  
  digitalWrite(K3,HIGH);  
  digitalWrite(K4,HIGH);  
  digitalWrite(K5,HIGH);  
  digitalWrite(K6,HIGH);  
  digitalWrite(K7,HIGH);  

  for(d=0;d<96;d++)
  {
    clock();
  }
  strobe();
  d = 0;
  char_pointer = LED_DATA;


}
void loop(){
  Display();
}		
void shift(void) 
{
  byte C1, C2;
  for(C2=1; C2<102; C2++) {
    C1 = C2 - 1;      
    Display_Ram[C1] = Display_Ram[C2];
  }    
  shift_counter++;
  if(shift_counter == 6){
    shift_counter = 0;
    load();
  }
}
void Display(void)
{
  mask = 0x01;
  scan();
  digitalWrite(K7,LOW);
  for(d=0;d<INTEN;d++){
  }
  digitalWrite(K7,HIGH);

  mask = 0x02;
  scan();
  digitalWrite(K6,LOW);
  for(d=0;d<INTEN;d++){
  }
  digitalWrite(K6,HIGH);

  mask = 0x04;
  scan();
  digitalWrite(K5,LOW);
  for(d=0;d<INTEN;d++){
  }
  digitalWrite(K5,HIGH);

  mask = 0x08;
  scan();
  digitalWrite(K4,LOW);
  for(d=0;d<INTEN;d++){
  }
  digitalWrite(K4,HIGH);

  mask = 0x10;
  scan();
  digitalWrite(K3,LOW);
  for(d=0;d<INTEN;d++){
  }
  digitalWrite(K3,HIGH);

  mask = 0x20;
  scan();
  digitalWrite(K2,LOW);
  for(d=0;d<INTEN;d++){
  }
  digitalWrite(K2,HIGH);

  mask = 0x40;
  scan();
  digitalWrite(K1,LOW);
  for(d=0;d<INTEN;d++){
  }
  digitalWrite(K1,HIGH);

  mask = 0x80;
  scan();
  digitalWrite(K0,LOW);
  for(d=0;d<INTEN;d++){
  }
  digitalWrite(K0,HIGH);

  shift();
}

void load(void){
  char counter1;
  if(*char_pointer == '~') {
    char_pointer = LED_DATA;

    return;
  }
  if(*char_pointer == 0x0D || *char_pointer == 0x0A)
    char_pointer = spaces;

  for(counter1 = 0; counter1 < 6; counter1++){
    Display_Ram[96 + counter1] = character_data[(*char_pointer - 0x20)][counter1];
  }	
  char_pointer++;
}
void scan(void){
  for (count=96;count>(-1);count--){
    if ((Display_Ram[count] & mask) == mask)
      digitalWrite(DAT,LOW);
    else
      digitalWrite(DAT,HIGH);
    clock();
  }
  strobe();
}

void clock(void){
  digitalWrite(CLK,HIGH);	
  digitalWrite(CLK,LOW);		
}

void strobe(void){
  digitalWrite(STR,HIGH);	
  digitalWrite(STR,LOW);	
}
void Clear_Display_Ram(void)
{
  unsigned char rcount;
  for(rcount = 0; rcount < 37; rcount++)
    Display_Ram[rcount] = 0xff;
}

void Clear_Display(void) {
  byte count;
  for(count = 0; count < 102; count++) {
    Display_Ram[count] = 0;
  }        
  for(count=0; count<96; count++)
  {
    clock();
  }
  strobe();
}