//#include <FlexiTimer2.h>
/*
    analogWrite(8, 0); //赤LED
    analogWrite(9, 0); //青LED
    analogWrite(10, 0); //緑LED
    PORTA=(22-29)
    digitalWrite(22, 0); //stepping motor
    digitalWrite(23, 0); //stepping motor
    digitalWrite(24, 0); //stepping motor
    digitalWrite(25, 0); //stepping motor
    
    digitalWrite(28, 0); //モーター制御
    digitalWrite(29, 0); //モーター制御
    digitalWrite(30, 1); //DFF/クロックを1

    digitalWrite(32, 0); //セグメント左01
    digitalWrite(33, 0); //セグメント右02

    analogWrite(11,0);   //ブザー
*/

int pin = 22;
int k,p;
int ha[] = {0x01,0x02, 0x04, 0x08,0x00};
volatile int s,sw2f=0,sw2ff=0,ledf=1;
volatile int state = LOW,state1 = LOW,state2 = LOW,state3 = LOW,state4 = LOW;
unsigned long t;
 
void SwLED() {
  state = !state;
  state1 = LOW;
  state2 = LOW;
  state3 = LOW;
  state4 = LOW;
  k=0;s=0;
  digitalWrite(50, LOW);
  digitalWrite(51, LOW);
  digitalWrite(52, LOW);
  digitalWrite(53, LOW);
  digitalWrite(30, LOW);
  digitalWrite(pin, HIGH);
  digitalWrite(23, HIGH);
  delay(100);
  digitalWrite(30, HIGH);
  digitalWrite(pin, LOW);
  digitalWrite(23, LOW);
  delay(100);
  
}
//********************************************
void SwLED1() {
  state1 =HIGH;
  //state1 = !state1;
  digitalWrite(50, HIGH);
  ledf=1;
}
//********************************************
void SwLED2() {
  state2 = HIGH;
  digitalWrite(51, HIGH);
}
//********************************************
void SwLED3() {
  sw2f=5;
  digitalWrite(50, HIGH);
  digitalWrite(53, LOW);
}
//********************************************
void SwLED4() {
  state4 = HIGH;
  state = LOW;
  digitalWrite(52, HIGH);
}
//********************************************
void SwLED5() {
  delay(1000);
  digitalWrite(30, LOW);
  digitalWrite(pin, LOW);
  digitalWrite(23, LOW);
  digitalWrite(50, LOW);
  digitalWrite(51, LOW);
  digitalWrite(52, LOW);
  digitalWrite(53, LOW);
  digitalWrite(30, HIGH);
  digitalWrite(30, LOW);
  ledf=0;
  //
  //analogWrite(8, 2);//red 
  //analogWrite(9, 20);//blue
  //analogWrite(10, 20);//green
  //digitalWrite(pin, HIGH);
}
//********************************************
void SwLED6() {
  //digitalWrite(30, LOW);
  digitalWrite(pin, HIGH);
  digitalWrite(23, HIGH);
  /*digitalWrite(50, HIGH);
  digitalWrite(51, HIGH);
  digitalWrite(52, HIGH);
  digitalWrite(53, HIGH);
  digitalWrite(30, HIGH);*/
}
//******************************************** 
void setup() {
   for (int i = 22; i <= 53; i++) {
    pinMode(i, 1);//output
  }
  for (int i = 14; i <= 21; i++) {
    pinMode(i, 0);//input
  }
  pinMode(2, INPUT);
  pinMode(3, INPUT);
  //pinMode(53, OUTPUT);
  pinMode(8, OUTPUT);
  pinMode(9, OUTPUT);
  pinMode(10, OUTPUT);
  
  attachInterrupt(digitalPinToInterrupt(3), SwLED5, HIGH );
  attachInterrupt(digitalPinToInterrupt(2), SwLED1, HIGH );
  attachInterrupt(digitalPinToInterrupt(18), SwLED2, HIGH );
  attachInterrupt(digitalPinToInterrupt(19), SwLED3, HIGH );
  attachInterrupt(digitalPinToInterrupt(21), SwLED6, HIGH );
}
//******************************************** 
void loop() {
  if(ledf==1){
    digitalWrite(52, 1);
    AAB(1,0,0);spkAtone(523);
    AAB(0,1,0);spkAtone(554);
    AAB(0,0,1);spkAtone(587);
    AAB(1,1,0);spkAtone(622);
    AAB(0,1,1);spkAtone(659);
    AAB(1,0,1);spkAtone(698);
    AAB(1,1,1);spkAtone(740);
  
    digitalWrite(52, LOW);
    spkAtone(784);spkAtone(831);spkAtone(880);spkAtone(932);spkAtone(988);spkAtone(1047);spkAtone(1109);spkAtone(1175);
  }else{
    AAB();
  }
  
}
//********************************************
void in19() {
  if(digitalRead(19)==HIGH){
    t=millis();
    delay(20);
    while(digitalRead(19)==HIGH){
      delay(5);
    }
    if(millis()-t<1000){
      s=1;
      k=1;
      for(int i=0;i<20;i++){
       if(digitalRead(19)==HIGH){
         s=2;
         k=1;
         delay(20);
         while(digitalRead(19)==HIGH){
           delay(5);
         }
        p=millis();
        break;
      }
      delay(10);
    }
  }else{
    s=3;
    k=1;
  }
  }
   switch(s){
    case 1:digitalWrite(50, k);break;
    case 2:digitalWrite(51, k);break;
    case 3:digitalWrite(53, k);break;
    case 0:break;
    default:break;
   } 
}
//********************************************
void DFFLED() {
 
  digitalWrite(51, HIGH);
  for(int i=0;i<5;i++){
  delay(100);
  }
  digitalWrite(30, HIGH);
  for(int i=0;i<5;i++){
  delay(100);
  }
  
  digitalWrite(30, LOW);
  digitalWrite(pin, state);
  digitalWrite(23, !state);
  digitalWrite(51, LOW);
  state=!state;
}
//********************************************
void DFFLED2(int k) {
  
  digitalWrite(51, HIGH);
  for(int i=0;i<5;i++){
  delay(100);
  }
  digitalWrite(30, HIGH);
  for(int i=0;i<5;i++){
  delay(100);
  }
  
  digitalWrite(30, LOW);
  PORTA=ha[k];
  
  digitalWrite(51, LOW);
  
}
//********************************************
void AAA(){
  digitalWrite(52, HIGH);
  for(int i=0;i<5;i++){
  delay(10);
   }
  if(sw2f>=1){
     for(int k=0;k<sw2f;k++){
       digitalWrite(53, HIGH);
       DFFLED();
       for(int i=0;i<5;i++){
        delay(10);
       }
       digitalWrite(53, LOW);
       for(int i=0;i<5;i++){
        delay(10);
       }
     }
  }
  
  sw2f=0;
  //DFFLED();
  //digitalWrite(53, LOW);
  digitalWrite(52, LOW);
  for(int i=0;i<10;i++){
  delay(100);
   }
}
//********************************************
void AAB(){
  digitalWrite(50, HIGH);
  for(int i=0;i<5;i++){
  delay(10);
   }
  if(sw2f>=1){
     for(int k=0;k<sw2f;k++){
       //digitalWrite(53, HIGH);
       DFFLED2(k);
       for(int i=0;i<5;i++){
        delay(10);
       }
       //digitalWrite(53, LOW);
       for(int i=0;i<5;i++){
        delay(10);
       }
     }
  }
  
  sw2f=0;
  digitalWrite(50, LOW);
  for(int i=0;i<10;i++){
  delay(100);
   }
}
//********************************************
void AAB(int r,int b,int g){
for(int i=0;i<255;i++){
      delay(10); 
      analogWrite(8, i*r*ledf);//red
      analogWrite(9, i*b*ledf);//blue
      analogWrite(10, i*g*ledf);//green
        if(ledf==0){
        break;
        }
   }
   analogWrite(8, 0);//red
   analogWrite(9, 0);//blue
   analogWrite(10, 0);//green
   //
}
//********************************************
void spkA(){
 for(int i=0;i<255;i++){
    analogWrite(11, 1);
    delay(2);
    analogWrite(11, 0);
    delay(2);
    
 }
}
//********************************************
void spkAtone(int k){
 tone(11,k,200);
 delay(200);
 //tone(11,554,200);
 //delay(200);
 //tone(11,587,200);
 //delay(200);
}