#include
#include //Для ф-ции
#include <comp_a90.h>

#define CPU_FREQ 2450000//2.450 МГц
#define SOUND_WAIT 10000

unsigned char temp;
unsigned char send_tmp1;
unsigned char send_tmp2;

unsigned char temp1;
unsigned char temp2;

void LCD_initialization(void);
void put_char_to_LCD(char,char,char);
void clear_display(void);
char rs_data(char,char,char);


void print_time_to_LCD(void);
char rs_data_bit(char,char,char);

void main(void)
{
WDTCR=(1<<WDCE)|(1<<WDE);//сброс
WDTCR=0x00;
DDRB=0xFF; //Регистр направления PORTB - все на вывод
PORTB|=(1<<PB4);//вкл. свет
SFIOR|=(1<<PUD);//Запрет pull-up resisitors на всех портах
TCCR1A=0x00; //запрет на signal override portb
SREG&=~0x80; //запрет прерываний устанавливаеться 7 бит регистра "1"
_WDR(); // reset watch dog taimer
LCD_initialization();
clear_display();
while(1)
{WDTCR=(1<<WDCE)|(1<<WDE);//сброс
WDTCR=0x00;
print_time_to_LCD();
//__watchdog_reset();
PORTB&=~(1<<PORTB5); //пищим
__delay_cycles(SOUND_WAIT);//ждем ввода новой информации на LCD
PORTB&=~(1<<PORTB5); //не пищим
}
}
char rs_data_bit(char rs,char rw,char data)//ф-ция передачи команды/данных на ЛСД 8 бит
{
_WDR();
send_tmp1=DDRA; //записываем состояние портов А
send_tmp2=PORTC; //записываем состояние портов С
DDRC|=7; //3 младших бита PORTC на вывод
DDRA=0x00; // А на ввод
PORTC&=0xf8; //pc0 - pc2=0
PORTC|=(1<<PORTC1); //R/W -> "1"
do //Проверка занятости LCD
{
_WDR();
PORTC|=(1<<PORTC2); //E -> UP
__delay_cycles(0.00000045*CPU_FREQ);//450 нс, чтобы успело сработать по докум. 1.1025
temp=PINA; //выводы А считали в temp
PORTC&=~(1<<PORTC2); //E -> DOWN
}
while(temp&0x80); //маскируем старший бит - флаг BF(=0, когда LCD свободен)
PORTC&=0xf8; //pc0 - pc2=0
if(rs)
PORTC|=(1<<PC0); //если RS=1 то записываем данные,если нет от RS так и остаеться 0, тоесть идет запись комманд
DDRA=0xff; //PORTA на вывод
PORTA=data; //выводимая информация
PORTC|=(1<<PORTC2); //E->1
__delay_cycles(0.00000045*CPU_FREQ);
PORTC&=~(1<<PORTC2);//E->0
temp=0;
DDRA=send_tmp1; //обнуление портов
PORTC=send_tmp2;
_WDR();
return(temp);
}


char rs_data(char rs,char rw,char data)//ф-ция передачи данных/команд на ЛСД 4бита
{
_WDR();
send_tmp1=DDRA; //записываем состояние портов А
send_tmp2=PORTC; //записываем состояние портов С
DDRC|=7; //3 младших бита PORTC на вывод
DDRA=0x00; // А на ввод
PORTC&=0xf8; //pc0 - pc2=0
PORTC|=(1<<PORTC1); //R/W -> "1"
do //Проверка занятости LCD
{
_WDR();
PORTC|=(1<<PORTC2); //E -> UP
__delay_cycles(0.00000045*CPU_FREQ);//450 нс, чтобы успело сработать по докум. 1.1025

temp1=(PINA & 0xf0); //выводы А считали в temp
__delay_cycles(0.00000045*CPU_FREQ);//450 нс, чтобы успело сработать по докум. 1.1025
PORTC&=~(1<<PORTC2); //E -> DOWN
__delay_cycles(0.00000045*CPU_FREQ);//450 нс, чтобы успело сработать по докум. 1.1025
PORTC|=(1<<PORTC2); //E -> UP
temp2=((PINA<<4) & 0xf0);
__delay_cycles(0.00000045*CPU_FREQ);//450 нс, чтобы успело сработать по докум. 1.1025
PORTC&=~(1<<PORTC2); //E -> DOWN
__delay_cycles(0.00000045*CPU_FREQ);//450 нс, чтобы успело сработать по докум. 1.1025
PORTC&=~(1<<PORTC1); //R/W -> "0"
temp=(temp1 | (temp2<<4));

}
while(temp&0x80); //маскируем старший бит - флаг BF(=0, когда LCD свободен)
PORTC&=0xf8; //pc0 - pc2=0
if(rs)
PORTC|=(1<<PC0); //если RS=1 то записываем данные,если нет от RS так и остаеться 0, тоесть идет запись комманд
DDRA=0xff; //PORTA на вывод
PORTA=(data & 0xf0); //выводимая информация
PORTC|=(1<<PORTC2); //E->1
__delay_cycles(0.00000045*CPU_FREQ);
PORTC&=~(1<<PORTC2);//E->0
PORTA=((data<<4) & 0xf0);
PORTC|=(1<<PORTC2); //E->1
__delay_cycles(0.00000045*CPU_FREQ);
PORTC&=~(1<<PORTC2);//E->0

temp=0;
DDRA=send_tmp1; //обнуление портов
PORTC=send_tmp2;
_WDR();
return(temp);
}






void LCD_initialization(void)
{
_WDR();
rs_data_bit(0,0,0x28); //2 строки, 4-разр. шина, инициализируем по 8битной шине, т.к. она идет по умолчанию, после установки в 4разрядную, уже работаем только с ними
rs_data(0,0,0x0C); //вкл. LCD, квадратик, (подчеркивание, то 0x0C)
rs_data(0,0,0x06); //2 строки, 4-разр. шина
}

void clear_display(void)
{
_WDR();
rs_data(0,0,1);//Очистка LCD
}

void put_char_to_LCD(char ch,char string_number,char position)
{
_WDR();
if(string_number==1)
rs_data(0,0,(position-1)|(1<<PA7)); //перемещает символы в первой строке по очереди начиная с 0X80
else
rs_data(0,0,(0x40+position-1)|(1<<PA7));//перемещает символы во второй строке по очереди начиная с 0X80
_WDR();
rs_data(1,0,ch); // передаем как данные
}

void print_time_to_LCD(void)
{
int j; //Ввод данных
put_char_to_LCD('0',1,1);
put_char_to_LCD('0',1,2);
put_char_to_LCD(':',1,3);
put_char_to_LCD('0',1,4);
put_char_to_LCD(0,1,5);

}