#include <avr/wdt.h>

#define data 10
#define clock 11
//közös anódos kijelző
byte zero  = B00000011;
byte one   = B10011111;
byte two   = B00100101;
byte three = B00001101;
byte four  = B10011001;
byte five  = B01001001;
byte six   = B01000001;
byte seven = B00011111;
byte eight = B00000001;
byte nine  = B00001001;
byte ponti = B11111110;
boolean ka_be = HIGH;
boolean ka_ki = LOW;
//közös katódos kijelző
/*
byte zero  = B11111100;
byte one   = B01100000;
byte two   = B11011010;
byte three = B11110010;
byte four  = B01100110;
byte five  = B10110110;
byte six   = B10111110;
byte seven = B11100000;
byte eight = B11111110;
byte nine  = B11110110;
byte ponti = B00000001;
boolean kk_be = LOW;
boolean kk_ki = HIGH;
*/
byte tiz_perc,egy_perc;
byte egy_ora,tiz_ora;
byte b_szam;
long time,pro_time;
long ora,perc;
long ora_beal = 0,perc_beal = 0;
long menu_time;
byte menu_flag, be_ki;
byte korrigal = 120; //korrigálás másodpercben

void setup()
{
  Serial.begin(9600);
  pinMode(clock, OUTPUT); //óra pin
  pinMode(data , OUTPUT); //adat pin
  pinMode(4,OUTPUT); //közös anód 1.
  pinMode(5,OUTPUT);//közös anód 2.
  pinMode(6,OUTPUT);//közös anód 3.
  pinMode(7,OUTPUT);//közös anód 4.
  pinMode(2,INPUT);//le
  pinMode(3,INPUT);//fel
  pinMode(8,INPUT);//menu

}
void loop()
{
  wdt_disable();
  time = millis()/1000;//sec számolás
  time = perc_beal*60+ora_beal*3600+time;//beállított idő
   Serial.println(time);
//minden hatodik órában a napi csúszás negyedével korrigál
if(ora%6 == 0){
   time =  time - korrigal/4 ; 
  }
  perc = time%3600/60;//perc kiszámítás
  ora = time/3600%24;//óra kiszámítás
  pont(be_ki);//választó pont
  //menű meghívása menű gombbal
  if(digitalRead(8)== LOW && menu_time+500<millis()){
    menu_flag = 2;//menű állapojelző
    menu_time = millis();
    menu(menu_flag);
  }
  
 //minden hatodik órában a napi csúszás negyedével 
  
  perc_kiir(perc); //perc kiíratás meghívása
  ora_kiir(ora); //óra kiíratás meghívása
  //24 órás nullázás watchdoggal
  if(time == 86399)
  { wdt_enable(WDTO_1S);
     wdt_reset();
     while(1);
  }
}

void ora_kiir(long ora)
{
  tiz_ora = ora/10;
  egy_ora = ora%10;
  shiftOut(data, clock, LSBFIRST, szamjegy(egy_ora));
  digitalWrite(6,ka_be);
  //digitalWrite(6,kk_be);//közös katódos kijelző
  delay(3);
  digitalWrite(6,ka_ki);
//digitalWrite(6,kk_ki);//közös katódos kijelző
  
  shiftOut(data, clock, LSBFIRST, szamjegy(tiz_ora));
  digitalWrite(7,ka_be);
  //digitalWrite(6,kk_be);//közös katódos kijelző
  delay(3);
  digitalWrite(7,ka_ki);
  //digitalWrite(6,kk_ki);//közös katódos kijelző
}

void perc_kiir(long perc)
{
  tiz_perc = perc/10;
  egy_perc = perc%10;
  shiftOut(data, clock, LSBFIRST, szamjegy(egy_perc));
  digitalWrite(4,ka_be);
  //digitalWrite(6,kk_be);//közös katódos kijelző
  delay(3);
  digitalWrite(4,ka_ki);
  //digitalWrite(6,kk_ki);//közös katódos kijelző
  shiftOut(data, clock, LSBFIRST, szamjegy(tiz_perc));
  digitalWrite(5,ka_be);
  //digitalWrite(6,kk_be);//közös katódos kijelző
  delay(3);
  digitalWrite(5,ka_ki);
  //digitalWrite(6,kk_ki);//közös katódos kijelző
}

byte szamjegy(byte szam)
{
  switch (szam){
  case 1: 
    b_szam = one;
    break;
  case 2: 
    b_szam = two;
    break;
  case 3: 
    b_szam = three;
    break;
  case 4: 
    b_szam = four;
    break;
  case 5: 
    b_szam = five;
    break;
  case 6: 
    b_szam = six;
    break;
  case 7: 
    b_szam = seven;
    break;
  case 8: 
    b_szam = eight;
    break;
  case 9: 
    b_szam = nine;
    break;
  case 0: 
    b_szam = zero;
    break;
  }
  return b_szam;
}

void pont(byte be_ki)
{
  shiftOut(data, clock, LSBFIRST, ponti);
  digitalWrite(6,ka_be);
  //digitalWrite(6,kk_be);//közös katódos kijelző
  delay(3);
  digitalWrite(6,ka_ki);
  //digitalWrite(6,kk_ki);//közös katódos kijelző
}

void menu(byte menu_flag)
{
    while(menu_flag <= 3){
    if(digitalRead(8)==LOW && menu_time+500<millis()){
      menu_flag++;
      menu_time=millis();
    }
    switch (menu_flag){
    case 1:
      menu_flag = 4;
      break;
    case 2: 
      if(digitalRead(2)==LOW && menu_time+500<millis()){
        ora_beal--;
        if(ora_beal<0)
        ora_beal = 23;
        menu_time=millis();
      }
      if(digitalRead(3)==LOW && menu_time+500<millis()){
        ora_beal++;
        menu_time=millis();
      }
      time = ora_beal*3600+millis()/1000;
      ora = time/3600%24;
      ora_kiir(ora);//ora állítás
      break;
    case 3:
      if(digitalRead(2)==LOW && menu_time+500<millis()){
        perc_beal--;
        if(perc_beal < 0)
        perc_beal = 59;
        menu_time=millis();
      }
      if(digitalRead(3)==LOW && menu_time+500<millis()){
        perc_beal++;
        menu_time=millis();
      }
      time = perc_beal*60+millis()/1000;
      perc = time%3600/60;
      perc_kiir(perc);//perc állítás
      break;
    }
  }
}