MagicLed.c

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

#define TOUCH_TRESHOLD 15

//#define PROTEUS_SIMULATION//èç-çà îøèáîê ñèìóëÿöèè Watchdog â ïðîòåóñå èñïîëüçóåì ÷óòü ðàçíûé êîä.
//                          //Äëÿ ðàáî÷åé ïðîøèâêè çàêîìåíòèðîâàòü ýòîò ìàêðîñ

//PORTS

/*
#define RED_P 4
#define GREEN_P 2
#define BLUE_P 3
#define SENSOR_OUT_P 1
#define SENSOR_IN_P 0
*/

//*
#define RED_P 0
#define GREEN_P 1
#define BLUE_P 2
#define SENSOR_OUT_P 3
#define SENSOR_IN_P 4
//*/

//STATES
#define SLEEP 0
#define AWAKED 1
#define SHINE1 2
#define SHINE2 3
#define SHINE3 4
#define SHINE4 5
//CONSTS

//Ãëîáàëüíûå ïåðåìåííûå
unsigned char pwm_counter=0;//ñ÷¸ò÷èê ØÈÌ öèêëà
unsigned char red_bs=0;//ÿðêîñòü êðàñíîãî ñâåòîäèîäà (0-255)
unsigned char green_bs=0;//ÿðêîñòü çåëåíîãî ñâåòîäèîäà (0-255) 
unsigned char blue_bs=0;//ÿðêîñòü ñèíåãî ñâåòîäèîäà (0-255)
unsigned int time;//ïîäñ÷¸ò âðåìåíè íåïðåðûâíîãî ñâå÷åíèÿ
unsigned char sensorNotTouched;//çíà÷åíèå íå ïðèòðîíóòîãî ñåíñîðà, óñòàíàâëèâàåòñÿ â ïðîöåññå
                              //êàëèáðîâêè
unsigned char STATE=0;//ñîñòîÿíèå ïðîãðàììû
//********* Îáúÿâëåíèÿ ôóíêöèé *********
void common_init();
//
void sensorCalibration();
unsigned char sensorTouched();//ïðîâåðÿåò åñòü ëè ïðèêîñíîâåíèå ê ñåíñîðó, âîçâðàùàåò 1 åñëè åñòü, 
                              //0 åñëè íåò
unsigned int sensorValue();//ïîëó÷àåò çíà÷åíèå ñåíñîðà
//
void changeColor1(unsigned char shine,unsigned char pause);//ïëàâíûé ïåðåõîä ê ñëó÷àéíîìó çíà÷åíèþ 
                                                           //ñëó÷àéíîãî êàíàëà (îäíîãî èç R,G,B)
                                                           //èëè çàòóõàíèå åñëè shine=0
//**************************************
void main(void)
{
    unsigned char sleepCount=0;//ñ÷¸ò÷èê öèêëîâ ñïÿùåãî ðåæèìà    
    unsigned char i;
    
    common_init();              
    
    PORTB.RED_P=1;PORTB.GREEN_P=1;PORTB.BLUE_P=1;
    
    delay_ms(5000);
        
    //äëÿ îòëàäêè - îïðåäåëåíèå çíà÷åíèÿ íåïðèòðîíóòîãî ñåíñîðà
    /*if (sensorNotTouched>125)red_bs=100;
    if (sensorNotTouched>170)blue_bs=100;
    if (sensorNotTouched>200)green_bs=100;*/  
   
    //#asm("sei") //ïðåðûâàíèå âêëþ÷àþòñÿ â ôóíêöèè sensorValue 

    while (1){              
        
        if(time>26368||sleepCount==0){//ðåêàëèáðîâêà ðàç â 2,43 ìèíóòû ñïÿùåãî ðåæèìà 
                                      //è ðàç â 3 ìèíóòû ñâå÷åíèÿ
            time=0;
            sensorCalibration();
        }
        
        if(sensorTouched()){
             
             srand(time+sleepCount);
             
             switch(STATE){                
                case SLEEP:            
                    STATE=AWAKED;
                    changeColor1(1,12);//ìåäëåííî ðàçæèãàåì
                    break;
                case AWAKED:                             
                    //ïîëó÷àåì ñëó÷àéíîå çíà÷åíèå îò 2 äî 4
                    STATE=(rand()&3)+2;                          
                    break;               
                case SHINE1: 
                case SHINE2: 
                    //ýôôåêò ñâå÷åíèÿ 1
                    for(i=0;i<=7;i++)changeColor1(1,3);
                    STATE=AWAKED;
                    break;
                case SHINE3:
                case SHINE4:
                    //ýôôåêò ñâå÷åíèÿ 2   
                    changeColor1(0,5);
                    delay_ms(100); 
                    changeColor1(1,5);
                    STATE=AWAKED;
                    break; 
             }                                         
        }
        else{            
            if(STATE==SLEEP)sleepCount++;//+0,507 ñåê ñïÿùåãî ðåæèìà
            else{
                changeColor1(0,15);//ìåäëåííî ãàñèì
                //sleepCount=0;//ñïåöèàëüíî íå ñáðàñûâàåì ñ÷¸ò÷èê, ÷òî áû êàëèáðîâêà çàïóñêàëàñü ïðè 
                               //÷àñòûõ ïåðåõîäàõ ñîí-àêòèâíîñòü
                time=0;
                STATE=SLEEP;     
            } 
            #ifndef PROTEUS_SIMULATION  
                //Âêëþ÷àåì Watchdog Timer interrupt
                WDTCR|=0x40;   
                //ïåðåõîäèì â ýíåðãîñáåðåãàþùèé ðåæèì        
                #asm("sleep");
            #else
            	delay_ms(500);//â Proteus ñïÿ÷êó èìèòèðóåì çàäåðæêîé
            #endif
        }  
    }
}
void sensorCalibration()
{
    unsigned char max;
    unsigned char i;
    
    sensorNotTouched=0;
    
    for(i=1;i<=10;i++){
        max=sensorValue();
        if(max>sensorNotTouched)sensorNotTouched=max;
        
        //äëÿ îòëàäêè - èíäèêàöèÿ êàëèáðîâêè
        //if(red_bs==0)red_bs=100;
        //else red_bs=0;
        //delay_ms(50);
        
        delay_ms(50);                           
    }
}
unsigned char sensorTouched()
{
    unsigned char t=0;
    unsigned char i;  
    for(i=1;i<=10;i++){
        if(sensorValue()>sensorNotTouched+TOUCH_TRESHOLD)t++;
        else if(t>0)t--;
        delay_ms(10);
    }
    return t;
}
unsigned int sensorValue()
{
    unsigned char sensorValue;
       
    #asm("cli")    
    PORTB.SENSOR_OUT_P=1;
    TCNT0=0;
    while(!PINB.SENSOR_IN_P); 
    sensorValue=TCNT0;    
    #asm("sei")
    PORTB.SENSOR_OUT_P=0;       
    return sensorValue;
}
//----------------------------------------------------------------------------------------------------
void common_init()
{
    #pragma optsize-
    //Crystal Oscillator division factor: 1
    CLKPR=0x80;
    CLKPR=0x00;
    #ifdef _OPTIMIZE_SIZE_
    #pragma optsize+
    #endif     
    //Watchdog Timer initialization         
    //Watchdog Timer Prescaler: OSC/64k - period .5 sec
    //Watchdog mode: interrupt
    WDTCR=0b00010101;
    //Enable sleep mode
    MCUCR|=0b00110000; 
    //Analog Comparator off in power reduction
    ACSR=0x80;
    //ADC off in power reduction
    PRR=1;  
    //óñòàíîâêà ðåæèìà òàéìåðà
    //Mode:Normal
    //TCCR0A=0;
    //division factor: 1
    TCCR0B=1;
    //timer interrupt on overflow
    TIMSK0=0b10;
    //Input/Output Ports initialization
    DDRB.SENSOR_OUT_P=1;
    //DDRB.SENSOR_IN_P=0;//by default
    DDRB.RED_P=1;
    DDRB.BLUE_P=1;
    DDRB.GREEN_P=1;
}
void changeColor1(unsigned char shine,unsigned char pause)
{
    unsigned char to_red=0,to_blue=0,to_green=0;
    if(shine){       
        //âûáèðàåì ñëó÷àéíûé êàíàë è öâåò
        loop:
        shine=rand()&3;//ñëó÷àéíîå çíà÷åíèå êàíàëà
        switch (shine){
            case 0:
                to_red=rand();
                break;
            case 1:
                to_green=rand();
                break;
            case 2:           
                to_blue=rand();
                break; 
            default:           
                goto loop;                   
        }
    }
    //âûïîëíÿåì ïëàâíûé ïåðåõîä ê ïîëó÷åííîìó öâåòó    
    while(red_bs!=to_red||green_bs!=to_green||blue_bs!=to_blue){
        
        if(to_red!=red_bs)
            if(to_red>red_bs)red_bs++;
            else red_bs--;
        if(to_green!=green_bs)
            if(to_green>green_bs)green_bs++;
            else green_bs--;
        if(to_blue!=blue_bs)
            if(to_blue>blue_bs)blue_bs++;
            else blue_bs--;
        
        delay_ms(pause);
    } 
}

//Îáðàáîò÷èêè ïðåðûâàíèé
// Timer 0 overflow interrupt service routine
interrupt [TIM0_OVF] void timer0_ovf_isr(void)
{
    PORTB.RED_P=(pwm_counter>=red_bs<<1);
    PORTB.GREEN_P=(pwm_counter>=green_bs<<1);
    PORTB.BLUE_P=(pwm_counter>=blue_bs<<1);
    pwm_counter++;
    if(STATE!=SLEEP&&pwm_counter==0)time++;//ïîäñ÷åò âðåìåíè ñâå÷åíèÿ, + 0,006826667 ñåê    
}
// Watchdog timeout interrupt service routine
interrupt [WDT] void wdt_timeout_isr(void)
{
    //íè÷åãî íå äåëàåì, ïðåðûâàíèå èñïîëüçóåòñÿ òîëüêî äëÿ âûõîäà èç ñïÿùåãî ðåæèìà
}