#include <tiny2313.h>
#include <delay.h>
#include <STDLIB.H>

int i,select_speed,select_prog,t_select_prog,revers_flag;

void __init(void){
// Declare your local variables here

// Crystal Oscillator division factor: 1
#pragma optsize-
CLKPR=0x80;
CLKPR=0x00;
#ifdef _OPTIMIZE_SIZE_
#pragma optsize+
#endif

// Input/Output Ports initialization
// Port A initialization
// Func2=In Func1=In Func0=In
// State2=T State1=T State0=T
PORTA=0x00;
DDRA=0x00;

// Port B initialization
// Func7=In Func6=In Func5=In Func4=In Func3=In Func2=In Func1=In Func0=In
// State7=T State6=T State5=T State4=T State3=T State2=T State1=P State0=P
PORTB=0x03;
DDRB=0x00;

// Port D initialization
// Func6=In Func5=In Func4=In Func3=Out Func2=Out Func1=Out Func0=Out
// State6=T State5=T State4=T State3=0 State2=0 State1=0 State0=0
PORTD=0x00;
DDRD=0x0F;

// Timer/Counter 0 initialization
// Clock source: System Clock
// Clock value: Timer 0 Stopped
// Mode: Normal top=FFh
// OC0A output: Disconnected
// OC0B output: Disconnected
TCCR0A=0x00;
TCCR0B=0x00;
TCNT0=0x00;
OCR0A=0x00;
OCR0B=0x00;

// Timer/Counter 1 initialization
// Clock source: System Clock
// Clock value: 3,906 kHz
// Mode: CTC top=OCR1A
// OC1A output: Discon.
// OC1B output: Discon.
// Noise Canceler: Off
// Input Capture on Falling Edge
// Timer 1 Overflow Interrupt: Off
// Input Capture Interrupt: Off
// Compare A Match Interrupt: On
// Compare B Match Interrupt: Off
TCCR1A=0x00;
TCCR1B=0x0D;
TCNT1H=0x00;
TCNT1L=0x00;
ICR1H=0x00;
ICR1L=0x00;
OCR1AH=0x0f;
OCR1AL=0x42;

OCR1BH=0x00;
OCR1BL=0x00;

// External Interrupt(s) initialization
// INT0: Off
// INT1: Off
// Interrupt on any change on pins PCINT0-7: Off
GIMSK=0x00;
MCUCR=0x00;

// Timer(s)/Counter(s) Interrupt(s) initialization
TIMSK=0x40;

// Universal Serial Interface initialization
// Mode: Disabled
// Clock source: Register & Counter=no clk.
// USI Counter Overflow Interrupt: Off
USICR=0x00;

// Analog Comparator initialization
// Analog Comparator: Off
// Analog Comparator Input Capture by Timer/Counter 1: Off
ACSR=0x80;
}

interrupt [TIM1_COMPA] void timer1_compa_isr(void){
  if(select_speed>=6)select_speed=1;
  if(select_prog>=11)select_prog=1;
  if(t_select_prog!=select_prog){
     i=1;
  }
   
  switch(select_speed){
    case 1:{
            OCR1AH=0x04;
            OCR1AL=0xa1;
            break;};
    case 2:{
            OCR1AH=0x07;
            OCR1AL=0xa1;
            break;};
    case 3:{
            OCR1AH=0x0f;
            OCR1AL=0x42;
            break;};
    case 4:{
            OCR1AH=0x1e;
            OCR1AL=0x84;
            break;};
    case 5:{
            OCR1AH=0x4c;
            OCR1AL=0x4b;
            break;};
  }
   switch(select_prog) {
        case 1:{  //бежит один огонек зажженным +
                if(i==1)PORTD=0b00000001;
                if(i==2)PORTD=0b00000010;
                if(i==3)PORTD=0b00000100;
                if(i==4)PORTD=0b00001000;
                i++;
                if(i==5)i=1;
                break;
        };
        case 2:{ //бежит потухший огонек +
                if(i==1)PORTD=0b00001110;
                if(i==2)PORTD=0b00001101;
                if(i==3)PORTD=0b00001011;
                if(i==4)PORTD=0b00000111;
                i++;
                if(i==5)i=1;
                break;
        };
        case 3:{ // бежит один огонек зажженным до конца и возвращается +
                if(t_select_prog!=select_prog){
                  revers_flag=0;
                }
                if(i==1)PORTD=0b00000001;
                if(i==2)PORTD=0b00000010;
                if(i==3)PORTD=0b00000100;
                if(i==4)PORTD=0b00001000;

                if(revers_flag==0)i++;
                if(revers_flag==1)i--;
                if(i==5){revers_flag=1;i=4;}
                if(i==0){revers_flag=0;i=1;}
                break;
        };
        case 4:{ // все горят +
                if(t_select_prog!=select_prog){
                  PORTD=0b00001111;
                } 
                break;
        };
        case 5:{ //перекрючаются по переменки через одного +
                if(i==1){PORTD=0x0A; i=2;}else{PORTD=0x05; i=1;};
                break;
        };
        case 6:{ //дорошкой загорается и потом дорожкой тухнет +
                if (i==1)PORTD=0b00000001;
                if (i==2)PORTD=0b00000011;
                if (i==3)PORTD=0b00000111;
                if (i==4)PORTD=0b00001111;
                if (i==5)PORTD=0b00001110;
                if (i==6)PORTD=0b00001100;
                if (i==7)PORTD=0b00001000;
                if (i==8)PORTD=0b00000000;
                i++;
                if(i==9)i=1;
                break;
        };
        case 7:{ //то загораются, то гаснут +
                if(i==1)
                  {PORTD=0b00001111; i=2;}
                else
                  {PORTD=0b00000000; i=1;};
                break;
        };
        case 8:{ //то загораются, то гаснут +
                if (i==1)PORTD=0b00000001;
                if (i==2)PORTD=0b00000011;
                if (i==3)PORTD=0b00000111;
                if (i==4)PORTD=0b00001111;
                if (i==5)PORTD=0b00001110;
                if (i==6)PORTD=0b00001100;
                if (i==7)PORTD=0b00001000;
                if (i==8)PORTD=0b00000000;
               
                if (i==9) PORTD=0b00001000;
                if (i==10)PORTD=0b00001100;
                if (i==11)PORTD=0b00001110;
                if (i==12)PORTD=0b00001111;
                if (i==13)PORTD=0b00000111;
                if (i==14)PORTD=0b00000011;
                if (i==15)PORTD=0b00000001;
                if (i==16)PORTD=0b00000000;
               
                i++;
                if(i==17)i=1;
                break;
        };
        case 9:{  //прыгает ))) +
                if(i==1)PORTD=0b00000001;
                if(i==2)PORTD=0b00000100;
                if(i==3)PORTD=0b00000010;
                if(i==4)PORTD=0b00001000;
                i++;
                if(i==5)i=1;
                break;
        };
        case 10:{  //все потухли +
                  PORTD=0b00000000;
                break;
        };
   };
   t_select_prog=select_prog;
}
void main(void)
{
  __init();
  t_select_prog=0;
  select_prog=1;
  select_speed=1;
  #asm("sei")
   

  while (1){
    if((PINB.0)==0){
      delay_ms(20);
      if((PINB.0)==0){   
        select_prog++;
        delay_ms(150);
      }
    }
    if((PINB.1)==0){
      delay_ms(20);
      if((PINB.1)==0){   
        select_speed++;
        delay_ms(150);
      }
    }
    if((PINB.1==0)&&(PINB.0==0)){
      delay_ms(20);
      if((PINB.1==0)&&(PINB.0==0)){   
        select_prog=10;
        delay_ms(150);
      }
    }
  };
 
}