/*****************************************************
This program was produced by the
CodeWizardAVR V2.05.3 Standard
Automatic Program Generator
© Copyright 1998-2011 Pavel Haiduc, HP InfoTech s.r.l.
http://www.hpinfotech.com

Project : 
Version : 
Date    : 19.10.2012
Author  : PerTic@n
Company : If You Like This Software,Buy It
Comments: 


Chip type               : ATmega8
Program type            : Application
AVR Core Clock frequency: 8,000000 MHz
Memory model            : Small
External RAM size       : 0
Data Stack size         : 256
*****************************************************/

#include <mega8.h>
#include <stdlib.h>
#include <delay.h>

eeprom signed char e_tune = -4, e_tune2 = -1, e_set1 = 20, e_set2 = 25;
eeprom unsigned char e_d1 = 5, e_d2 = 5;

unsigned char digits[21]={
   //HBGDEAFC
   0b01011111,          // 0                0
   0b01000001,          // 1                1
   0b01111100,          // 2                2
   0b01110101,          // 3                3
   0b01100011,          // 4                4
   0b00110111,          // 5                5
   0b00111111,          // 6                6
   0b01000101,          // 7                7
   0b01111111,          // 8                8
   0b01110111,          // 9                9
   0b00111010,          // t                10
   0b00011001,          // u                11
   0b00101001,          // n                12
   0b01111001,          // d                13
   0b00111110,          // E                14
   0b01100110,          // o                15
   0b00100000,          // - тире           16
   0b00000000,          // пробел           17
   0b00010000,          // подчёркивание    18
   0b00000100,          // надчёркивание    19
   0b00010100           // верх и низ       20
};
unsigned char disp[9];

// Timer 0 overflow interrupt service routine
unsigned char  timer1 = 0, razryad = 0, mode = 7, button = 0, display = 0;
signed char submode = 0;
interrupt [TIM0_OVF] void timer0_ovf_isr(void)
{
// Reinitialize Timer 0 value
TCNT0=0xBB;
// Place your code here                                                     //  включаем разряд
razryad ++;
if (razryad > 8) razryad = 0;
PORTB = (PORTB & 0xF0)| razryad;                             
PORTD = disp[razryad];
switch (razryad)
    {
    case 0:
        {
        if (timer1 == 1) PORTD.7 = 1;
        else PORTD.7 = 0;
        };break;
    }                                            
}


#define FIRST_ADC_INPUT 0
#define LAST_ADC_INPUT 2
unsigned int adc_data[LAST_ADC_INPUT-FIRST_ADC_INPUT+1];
#define ADC_VREF_TYPE 0x40

// ADC interrupt service routine
// with auto input scanning
interrupt [ADC_INT] void adc_isr(void)
{
static unsigned char input_index=0;
// Read the AD conversion result
adc_data[input_index]=ADCW;
// Select next ADC input
if (++input_index > (LAST_ADC_INPUT-FIRST_ADC_INPUT))
   input_index=0;
ADMUX=(FIRST_ADC_INPUT | (ADC_VREF_TYPE & 0xff))+input_index;
// Delay needed for the stabilization of the ADC input voltage
delay_us(10);
// Start the AD conversion
ADCSRA|=0x40;
}

// Timer1 overflow interrupt service routine
unsigned char sec = 0, tick = 0, tick1, tick2;
signed char temp1, temp2, temperatura[2][6];
bit timeout1 = 1, timeout2 = 1;
interrupt [TIM1_OVF] void timer1_ovf_isr(void)
{
// Reinitialize Timer1 value
TCNT1H=0xC2F7 >> 8;
TCNT1L=0xC2F7 & 0xff;
// Place your code here
timer1 ++;
if (timer1 > 1)
    {
    if (timeout1 == 1) tick1++;
    if (timeout2 == 1) tick2++;
    timer1 = 0;
    sec++;
    tick++;
    temperatura[0][tick] = ((304.507 + e_tune) - adc_data[1]*0.616);
    temperatura[1][tick] = ((304.507 + e_tune2) - adc_data[0]*0.616);
    if (tick > 5) 
        {
        tick = 0;
        if ((mode == 0)&(submode == 0)) 
            {
            display++;
            if (display > 1) display = 0;
            }
        temp1 = (temperatura[0][0] + temperatura[0][1] + temperatura[0][2] + temperatura[0][3] + temperatura[0][4] + temperatura[0][5])/6;
        temp2 = (temperatura[1][0] + temperatura[1][1] + temperatura[1][2] + temperatura[1][3] + temperatura[1][4] + temperatura[1][5])/6;
        }
    if (tick1 > 179) 
        {
        tick1 = 0;
        timeout1 = 0;
        }
    if (tick2 > 179) 
        {
        tick2 = 0;
        timeout2 = 0;
        }
    }
}

/*signed int temperatura(unsigned int a)
    {
    signed int data;
    data = ((300.507 + tune) - a*0.616);
    return data;  
    }*/

// Declare your global variables here
 
void main(void)
{
// Declare your local variables here
bit submode1 = 0;
unsigned char min = 0, hour = 0;


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

// Port C initialization
// Func6=In Func5=Out Func4=Out Func3=In Func2=In Func1=In Func0=In 
// State6=T State5=0 State4=0 State3=T State2=T State1=T State0=T 
PORTC=0x00;
DDRC=0x30;

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

// Timer/Counter 0 initialization
// Clock source: System Clock
// Clock value: 31,250 kHz
TCCR0=0x04;
TCNT0=0xBB;

// Timer/Counter 1 initialization
// Clock source: System Clock
// Clock value: 31,250 kHz
// Mode: Normal top=0xFFFF
// OC1A output: Discon.
// OC1B output: Discon.
// Noise Canceler: Off
// Input Capture on Falling Edge
// Timer1 Overflow Interrupt: On
// Input Capture Interrupt: Off
// Compare A Match Interrupt: Off
// Compare B Match Interrupt: Off
TCCR1A=0x00;
TCCR1B=0x04;
TCNT1H=0xC2;
TCNT1L=0xF7;
ICR1H=0x00;
ICR1L=0x00;
OCR1AH=0x00;
OCR1AL=0x00;
OCR1BH=0x00;
OCR1BL=0x00;

// Timer/Counter 2 initialization
// Clock source: System Clock
// Clock value: Timer2 Stopped
// Mode: Normal top=0xFF
// OC2 output: Disconnected
ASSR=0x00;
TCCR2=0x00;
TCNT2=0x00;
OCR2=0x00;

// External Interrupt(s) initialization
// INT0: Off
// INT1: Off
MCUCR=0x00;

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

// USART initialization
// USART disabled
UCSRB=0x00;

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

// ADC initialization
// ADC Clock frequency: 62,500 kHz
// ADC Voltage Reference: AVCC pin
ADMUX=FIRST_ADC_INPUT | (ADC_VREF_TYPE & 0xff);
ADCSRA=0xCF;

// SPI initialization
// SPI disabled
SPCR=0x00;

// TWI initialization
// TWI disabled
TWCR=0x00;

// Global enable interrupts
#asm("sei")

while (1)
      {
      if (sec > 59)
        {
        sec = 0;
        min++;
        if (min > 59)
            {
            min = 0;
            hour++;
            if (hour > 23) hour = 0;
            }
        }
      if (PINC.4 == 0)
        {
        if ((temp1 >= e_set1 + e_d1)&(timeout1 == 0)) PORTC.4 = 1;
        }
      else
        {
        if (temp1 <= e_set1) 
            {
            PORTC.4 = 0;
            timeout1 = 1;
            }
        }
      if (PINC.5 == 0)
        {
        if ((temp2 >= e_set2 + e_d2)&(timeout2 == 0)) PORTC.5 = 1;
        }
      else
        {
        if (temp2 <= e_set2) 
            {
            PORTC.5 = 0;
            timeout2 = 1;
            }
        }
      if ((PINC.4 != 0)||(PINC.5 != 0))
        {
        if ((PINC.4 == 1)&(PINC.5 == 0)) disp[8] = digits[19];
        if ((PINC.4 == 0)&(PINC.5 == 1)) disp[8] = digits[18];
        if ((PINC.4 == 1)&(PINC.5 == 1)) disp[8] = digits[20];
        }
      else disp[8] = digits[17];
      if ((0 <= adc_data[2])&(adc_data[2] < 10))
        {
        delay_ms(50);
        button = 1;
        mode++;
        if (mode > 7) 
            {
            mode = 0;
            display = 0;
            submode = 0;
            }
        }
      if ((170 <= adc_data[2])&(adc_data[2] < 190))
        {
        delay_ms(50);
        button = 3;
        }
      if ((290 <= adc_data[2])&(adc_data[2] < 320))
        {
        delay_ms(50);
        button = 2;
        }
      if ((385 <= adc_data[2])&(adc_data[2] < 410))
        {
        delay_ms(50);
        button = 4;
        }
      switch (mode)
        {
        case 0:
            {
            if (button == 2)
                {
                submode++;
                if (submode > 2) submode = 0;
                display = submode - 1; 
                button = 0;
                }
            if (button == 3)
                {
                submode--;
                if (submode < 0) submode = 2;
                display = submode - 1;
                button = 0;
                }
            if (button == 4)
                {
                submode1++;
                if (submode1 == 1)
                    {
                    submode = 3;
                    display = 5;
                    }
                else 
                    {
                    submode = 0;
                    display = 0;
                    }
                button = 0;
                }
            };break;
        case 1:
            {
            display = 2;
            if (button == 3)
                {
                e_set1--;
                button = 0;
                }
            if (button == 2)
                {
                e_set1++;
                button = 0;
                }
            if (button == 4) button = mode = display = 0; 
            };break;
        case 2:
            {
            display = 3;
            if (button == 3)
                {
                e_set2--;
                button = 0;
                }
            if (button == 2)
                {
                e_set2++;
                button = 0;
                }
            if (button == 4) button = mode = display = 0;
            };break;
        case 3:
            {
            display = 4;
            if (button == 3)
                {
                hour++;
                if (hour > 23) hour = 0;
                button = 0;
                }
            if (button == 2)
                {
                min++;
                if (min > 59) min = 0;
                button = 0;
                }
            if (button == 4)
                {
                sec = button = mode = display = 0;
                }
            };break;
        case 4:
            {
            display = 6;
            if (button == 3)
                {
                e_d1--;
                if (e_d1 > 15) e_d1 = 15; 
                button = 0;
                }
            if (button == 2)
                {
                e_d1++;
                if (e_d1 > 15) e_d1 = 15;
                button = 0;
                }
            if (button == 4) button = mode = display = 0; 
            };break;
        case 5:
            {
            display = 7;
            if (button == 3)
                {
                e_d2--;
                if (e_d2 > 15) e_d2 = 15;
                button = 0;
                }
            if (button == 2)
                {
                e_d2++;
                if (e_d2 > 15) e_d2 = 15;
                button = 0;
                }
            if (button == 4) button = mode = display = 0; 
            };break;
        case 6:
            {
            display = 8;
            if (button == 3)
                {
                e_tune--;
                button = 0;
                }
            if (button == 2)
                {
                e_tune++;
                button = 0;
                }
            if (button == 4) button = mode = display = 0; 
            };break;
        case 7:
            {
            display = 9;
            if (button == 3)
                {
                e_tune2--;
                button = 0;
                }
            if (button == 2)
                {
                e_tune2++;
                button = 0;
                }
            if (button == 4) button = mode = display = 0; 
            };break;         
        }
      switch (display)
        {
        case 0:
            {                                                   // часы в дежурном режиме
            disp[0] = digits[17];
            disp[1] = digits[17];
            disp[2] = digits[min%10];
            disp[3] = digits[min/10];
            disp[4] = digits[16];
            disp[5] = digits[hour%10];
            if (hour/10 != 0) disp[6] = digits[hour/10];
            else disp[6] = digits[17];
            disp[7] = digits[17];
            };break;
        case 1:
            {                                                   // термометр в дежурном режиме
            disp[0] = digits[15];
            disp[1] = digits[abs(temp2%10)];
            if (abs(temp2/10) != 0) disp[2] = digits[abs(temp2/10)];
            else disp[2] = digits[17];
            if (temp2 < 0 ) disp[3] = digits[16];
            else disp[3] = digits[17];
            disp[4] = digits[15];
            disp[5] = digits[abs(temp1%10)];
            if (abs(temp1/10) != 0) disp[6] = digits[abs(temp1/10)];
            else disp[6] = digits[17];
            if (temp1 < 0 ) disp[7] = digits[16];
            else disp[7] = digits[17];
            };break;
        case 2:
            {                                                   // установка 1 порога срабатывания
            disp[0] = digits[17];
            disp[1] = digits[15];
            disp[2] = digits[abs(e_set1%10)];
            disp[3] = digits[abs(e_set1/10)];
            if (e_set1 < 0) disp[4] = digits[16];
            else disp[4] = digits[17];       
            disp[5] = digits[17];
            disp[6] = digits[1];
            disp[7] = digits[10];
            };break;
        case 3:                                                 // установка 2 порога срабатывания
            {
            disp[0] = digits[17];
            disp[1] = digits[15];
            disp[2] = digits[abs(e_set2%10)];
            disp[3] = digits[abs(e_set2/10)];
            if (e_set2 < 0) disp[4] = digits[16];
            else disp[4] = digits[17];       
            disp[5] = digits[17];
            disp[6] = digits[2];
            disp[7] = digits[10];
            };break;
        case 4:
            {                                                   // установка времени
            disp[0] = digits[sec%10];
            disp[1] = digits[sec/10];
            disp[2] = digits[16];
            disp[3] = digits[min%10];
            disp[4] = digits[min/10];
            disp[5] = digits[16];
            disp[6] = digits[hour%10];
            if (hour/10 != 0) disp[7] = digits[hour/10];
            else disp[7] = digits[17];
            };break;
        case 5:                                                  // гашение индикатора
            {
            disp[0] = digits[17];
            disp[1] = digits[17];
            disp[2] = digits[17];
            disp[3] = digits[17];
            disp[4] = digits[17];
            disp[5] = digits[17];
            disp[6] = digits[17];
            disp[7] = digits[17];
            };break;
        case 6:
            {
            disp[0] = digits[17];
            disp[1] = digits[15];
            disp[2] = digits[e_d1%10];
            disp[3] = digits[e_d1/10];
            disp[4] = digits[17];
            disp[5] = digits[17];
            disp[6] = digits[1];
            disp[7] = digits[13];
            };break;
        case 7:
            {
            disp[0] = digits[17];
            disp[1] = digits[15];
            disp[2] = digits[e_d2%10];
            disp[3] = digits[e_d2/10];
            disp[4] = digits[17];
            disp[5] = digits[17];
            disp[6] = digits[2];
            disp[7] = digits[13];
            };break;
        case 8:
            {
            disp[0] = digits[15];
            disp[1] = digits[abs(e_tune%10)];
            if (abs(e_tune/10) != 0) disp[2] = digits[abs(e_tune/10)];
            else disp[2] = digits[17];
            if (e_tune < 0 ) disp[3] = digits[16];
            else disp[3] = digits[17];
            disp[4] = digits[1];
            disp[5] = digits[12];
            disp[6] = digits[11];
            disp[7] = digits[10]; 
            };break;
        case 9:
            {
            disp[0] = digits[15];
            disp[1] = digits[abs(e_tune2%10)];
            if (abs(e_tune2/10) != 0) disp[2] = digits[abs(e_tune2/10)];
            else disp[2] = digits[17];
            if (e_tune2 < 0 ) disp[3] = digits[16];
            else disp[3] = digits[17];
            disp[4] = digits[2];
            disp[5] = digits[12];
            disp[6] = digits[11];
            disp[7] = digits[10]; 
            };break;
        }
      delay_ms(200);
      }
}