pabloducato

/****************************************************************************/
/*                   Program systemu prototypowego SP-AVR                   */
/* Autor:                                                                   */
/****************************************************************************/

#include <avr/io.h>                 // Rejestry mikrokontrolera ATmega32
#include <avr/interrupt.h>          // Przerwania mikrokontrolera
#include <stdio.h>                  // Standardowe I/O
#include "key.h"                    // Obsługa przycisków (SW0...SW7)
#include "led.h"                    // Obsługa diod LED (LD0...LD7)
#include "lcd.h"                    // Obsługa wyświetlacza LCD 2x16 znaków

#define TCYKL   25                  // Czas cyklu obliczeń (25 x 4ms = 100ms)

volatile char cykl;                 // Odmierzanie czasu cyklu (pętli głównej)
char buf[64];                       // Bufor komunikatów LCD
//---------------------- Początek deklaracji użytkownika --------------------------------

//------------------------Deklaracje użytkownika--------------------------------------------------

volatile char c_in;                     // odebrany znak (przez port szeregowy - przerwanie)

char znak;                              // zmienna w main()

char UART_init(long baud)               // inicjowanie portu szeregowego
{
    char speed, err=0;

    speed = baud / 4800;
    switch(speed)
    {
        case  1:
            UBRRL = 103;                        // 4800   (fosc=8MHz => UBRRL=103)
            UBRRH = 0;
            break;
        case  2:
            UBRRL = 51;                         // 9600   (fosc=8MHz => UBRRL=51)
            UBRRH = 0;
            break;
        case  4:
            UBRRL = 25;                         // 19200  (fosc=8MHz => UBRRL=25)
            UBRRH = 0;
            break;
        case  8:
            UBRRL = 12;                         // 38400  (fosc=8MHz => UBRRL=12)
            UBRRH = 0;
            break;
        default:
            UBRRL = 25;                         // 19200   (fosc=8MHz => UBRRL=25)
            UBRRH = 0;
            err = 1;                            // nietypowa predkość (ustawiona domyślnie)
            break;
    }

    UCSRB =_BV(RXCIE)|_BV(RXEN)|_BV(TXEN);      // wł. przerwania od odb., wł. odbiornika i nadajnika

    UCSRC =_BV(URSEL)|_BV(UCSZ1)|_BV(UCSZ0);    // transmisja asynchroniczna, 8N1

    sei();                                      // globalne odblokowanie przerwań

    return err;
}

void COM_send(char c_out)               // wysłanie jednego znaku do portu COM
{
    loop_until_bit_is_set(UCSRA, UDRE);         // oczekiwanie na wysłanie poprzedniego znaku
    UDR = c_out;                                // wyślij nowy znak
}

char COM_recv(void)                     // odbiór jednego znaku z portu COM
{
    char c = c_in;                              // odczyt znaku - przerwanie ( 0 = brak znaku, NULL)
    c_in = 0;                                   // zeruj flagę
    return c;                                   // zwroć znak
}

void send_str(char * s)                         // wysłanie tekstu do portu COM
{
    while (*s) COM_send(*s++);                  // wysyłaj kolejno znaki tekstu
}

ISR (SIG_USART_RECV)                            // przerwanie od odbiornika
{
    c_in = UDR;                                 // odbiór znaku do bufora
}

//--------------------Koniec deklaracji użytkownika-----------------------------------------------


char T1=30, T2=20, T3=50, a, b, c, d, znak, stan=1, KL, LD,  tim, cs;
char stank=1;



//---------------------- Koniec deklaracji użytkownika ----------------------------------
int main(void)
{
    DDRA  = 0xff;                   // Kierunek portu A (diody LED): port wyjściowy
    DDRB  = 0x00;                   // Kierunek portu B (klawisze) : port wejściowy
    PORTA = 0xff;                   // Port A (diody LED): ustaw "1" (wygaszone diody)
    PORTB = 0xff;                   // Port B (klawisze) : aktywne rezystory podciągające

    TCCR0 = _BV(WGM01)|_BV(CS02);   // Timer/Counter 0: tryb CTC, dzielnik=256
    OCR0  = 124;                    // Limit zliczania T0: 0.125us x 256 x (124+1) = 4ms
    TIMSK = _BV(OCIE0);             // Odblokowanie przewań T0 (Output Compare Match)
    sei();                          // Globalne włączenie obsługi przerwań

    LCD_init();                     // Inicjowanie wyświetlacza LCD

    UART_init(9600);



    while(1)
    {
        cykl = TCYKL;               // Deklarowany czas cyklu (TCYKL x 4ms)
        KEY_read();                 // Odczyt stanu klawiszy aK1..aK4
        //-------------- Początek kodu użytkownika --------------------------------------

        switch(stan)
        {

        case 1: if(KL) { LD=1; stan=2; tim=T1;}
                else if(!KL) { LD=0; stan=1;}
                break;

        case 2: if(!tim) { LD=0; stan=3; tim=T2; }
                else if(!KL) { LD=0; stan=1;}
                break;

        case 3: if(!tim) { LD=1; tim=T3; stan=4; }
                else if(!tim && !KL) stan=1;
                break;

        case 4: if(!tim && KL) { LD=0; stan=5; }
                break;

        case 5: if(!KL) stan=1;
                break;
        }

        //if(tim) --tim;

        znak = COM_recv()&0x7F;

        if(znak)

        switch(stank)
        {
        case 1: if(znak==':') stank=2;
                break;

        case 2: if(znak>='0' && znak<='8') {a=znak-'0'; stank=3;}
                else stank=1;
                break;

        case 3: if(znak>='0' && znak<='9') {b=znak-'0'; stank=4;}
                else stank=1;
                break;

        case 4: if(znak=='#'){
                    if(a==0 && b==0)
                    {
                    COM_send(T1/10 + '0');
                    COM_send(T2/10 + '0');
                    COM_send(T3/100 + '0');
                    COM_send((T3%100)/10 + '0');
                    cs = (4-(T1/10 + T2/10 + T3/100 + ((T3%100)%10)%4)%4);
                    COM_send(cs + '0');
                    COM_send('#');
                    stank=1;
                    }
                    else if(a<2 && b<2 && a==!b)
                    KL=a*10+b;
                    stank=1;
                    }
                    else stank=1;
                    break;



        case 5: if(znak>='0' && znak <= '3') {stank=5; c=znak-'0';}
                else if(znak=='#')
                    {
                        if((a*10+b)> 5 && (a*10+b)< 23)
                            T3=(a*10+b)*10;
                            stank=1;
                    }
                else stank=1;
                break;


        case 6: if(znak>='0' && znak <='3') {d=znak-'0'; stank=7;}
                else stank=1;
                break;

        case 7: if(a>1 && b>1 && b<9 && ((a+b+c)%4 == 0))
                {
                T1=a*10;
                T2=b*10;
                stank=1;
                }
                else stank=1;
        }

        L1=LD;
        if(tim) --tim;

        //-------------- Wyświetlacz LCD --------------
        sprintf(buf,"K1=%dK2=%dK3=%dK4=%d",(int)aK1,(int)aK2,(int)aK3,(int)aK4);
        LCD_xy(0,0);                // Ustawienie kursora w linii 1
        LCD_puts(buf);              // Wyświetlenie zawartości bufora
        sprintf(buf,"L1=%dL2=%dL3=%dL4=%d",(int)L1,(int)L2,(int)L3,(int)L4);
        LCD_xy(0,1);                // Ustawienie kursora w linii 2
        LCD_puts(buf);              // Wyświetlenie zawartości bufora

        //-------------- Koniec kodu użytkownika ----------------------------------------
        LED_set();                  // Ustawienie diod LED
        //KEY_mem();                // Zapamiętanie stanu klawiszy w pK1..pK4

        while(cykl);                // Oczekiwanie na koniec cyklu oblicz.
    }
    return 0;
}

//---------------------- Funkcje obsługi przerwań ---------------------------------------

ISR(TIMER0_COMP_vect)               // Przerwanie od Timer/Counter 0 (co 4ms)
{
    if(cykl) --cykl;                // Odmierzanie czasu cyklu pętli głównej
}