/*****************************************************
Project    : Регулятор вентилятора для сериесного двигателя электромобиля
Version    : 0,7
Date start : 2014-04-11
Date finish:
Author     : Stalker_W
Company    : Визг&Вопли
Comments   :

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


Фьюзы PonyProg2000 галочки:  1МГц БЕЗ кварца

*****************************************************/

//============ влаживаем полезные библиотеки ===============
#include <mega8.h>
#include <delay.h>
// 1 Wire Bus interface functions
#include <1wire.h>
// DS1820 Temperature Sensor functions
#include <ds18B20.h>


// ============ глобальные константы настройки =============

const unsigned char T_holodno=10; //min.температура вкл. вентилятора
const unsigned char T_teplo=40; /*min.температура вкл. вентилятора
                                  и при номинальной мощности*/
const unsigned char T_jara=70;  //температура сильного нагрева
const unsigned char T_dym=100;  //температура аварийного перегрева
const unsigned int U_nomin=75; //перегрузочное напряжение двигателя, В
const unsigned int I_nomin=48; //перегрузочный ток двигателя, А
const unsigned int U_max=110;   /*макс. напряжение двигателя, В.
                                при напряжении датчика 2,56В */
const unsigned int I_max=600;  /*макс. ток двигателя, А
                                при напряжении датчика 2,56В */
const unsigned char time_vkl=5; /*время выбега вентилятора после
                                перегрузки двигателя, сек. */
const unsigned char PWM_min=40; //мин.мощность вентилятора в процентах

// ============= глобальные переменные ========================

unsigned char num_dat=0; //обслуживание датчика температуры
unsigned char rom_codes[2][9];
unsigned int tajmer0=0; //таймер вентилятора
unsigned char tajmer1=0; //таймер считывания температуры
unsigned char PWM_vent=0; //текущая мощность вентилятора
unsigned char PWM_temp;
unsigned int U=0;
unsigned int I=0;
float temper=22;
unsigned int P_nomin; //номинальная мощность двигателя
unsigned int P;
unsigned int P_start;

//============= процедуры прерываний ==========================

// Timer 0 overflow interrupt service routine
                    //отсчёты времени
interrupt [TIM0_OVF] void timer0_ovf_isr(void)
{
tajmer1++;
if (tajmer1==4) //прошла секунда (не очень точно)
  {
  tajmer1=0;
  if (tajmer0) {tajmer0--;}; //снимаем секунду с вентилятора
               //начинаем мерять температуру
  temper=ds18b20_temperature(&rom_codes[0][0]);
  if (temper<-900) //ошибка датчика
   {
   PORTD.3=1;
   temper=T_jara; //на всякий случай инициализируем перегрев
   }
    else
    {
    PORTD.3=0;
    };
  if (temper>=T_dym)   //сигнализация перегрева
   {
   PORTD.4=1;
   }
    else
    {
    PORTD.4=0;
    };
  };

}

//==================== процедуры ==============================

#define ADC_VREF_TYPE 0xE0

// Read the 8 most significant bits
// of the AD conversion result
unsigned char read_adc(unsigned char adc_input)
{             //считывание напряжения с датчиков
ADMUX=adc_input | (ADC_VREF_TYPE & 0xff);
// Delay needed for the stabilization of the ADC input voltage
delay_us(10);
// Start the AD conversion
ADCSRA|=0x40;
// Wait for the AD conversion to complete
while ((ADCSRA & 0x10)==0);
ADCSRA|=0x10;
return ADCH;
}

//================= тело программы ============================
void main(void)
{
// Declare your local variables here

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

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

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

// Timer/Counter 0 initialization
// Clock source: System Clock
// Clock value: 0,977 kHz
TCCR0=0x05;
TCNT0=0x00;

// Timer/Counter 2 initialization
// Clock source: System Clock
// Clock value: 1000,000 kHz
// Mode: Phase correct PWM top=0xFF
// OC2 output: Non-Inverted PWM
ASSR=0x00;
TCCR2=0x61;
TCNT2=0x00;
OCR2=0x00;

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

// ADC initialization
// ADC Clock frequency: 7,813 kHz
// ADC Voltage Reference: Int., cap. on AREF
ADMUX=ADC_VREF_TYPE & 0xff;
ADCSRA=0x87;

//=============== понеслась сама прграмма ===================
#asm("sei") //разрешаем прерывания

num_dat=w1_search(0xf0,rom_codes);
ds18b20_init( &rom_codes[0][0], 0, 0, DS18B20_9BIT_RES ); //инициализация датчика

P_nomin=U_nomin*I_nomin; //номинальная мощность электродвигателя
P_start=P_nomin*0.3;

PORTD.3=0; //на всякий пожарный выключаем аварийную сигнализацию
PORTD.4=0;

while (1)
{
// ========= постоянно считываем ток и напряжение =========
// === раз в секунду по прерыванию меряем температуру =======

U=read_adc(0)*U_max/2.56;
I=read_adc(1)*I_max/2.56;

if ((U>U_nomin)||(I>I_nomin)) {tajmer0=time_vkl*20;};


P=U*I;
if (P<P_start) {PWM_vent=0;};
if ((P>=P_start) | (P<=P_nomin))  //поддуваем вентилятором при
                              //чуть ниже номинала мощности
 {
 PWM_vent=((P-P_start)/(P_nomin-P_start))*(100-PWM_min)+PWM_min;
 };

if ((temper>=T_teplo) | (temper<T_jara)) //поддуваем вентилятором если
                              //потеплело
 {
 PWM_temp=((temper-T_teplo)/(T_jara-T_teplo))*(100-PWM_min)+PWM_min;
 };

if (PWM_temp>PWM_vent) {PWM_vent=PWM_temp;};


if (tajmer0) {PWM_vent=100;}; //перегрузка по току или напряжению
                                //или выбег после неё
if (temper<=T_holodno) {PWM_vent=0;}; //холод собачий
if (temper>=T_jara) {PWM_vent=100;};  //почти дымимся

if (PWM_vent>100) {PWM_vent=100;}; //проблемы округления

PWM_vent=PWM_vent*2.55;

OCR2=PWM_vent; //запускаем ШИМ на нужный процент

delay_ms(1); //минимальная пауза

}
}