/*
 * HalloweenaugenServo_II.c
 *
 * Created: 02.01.2024 16:42:32
 * Author : xxx
 */ 

#define F_CPU 9600000	//CPU auf 9,6MHz
#include <avr/io.h>
#include <stdlib.h>
#include <avr/interrupt.h>
#include <avr/pgmspace.h>

//Augen-Zeitvariablen:
volatile uint8_t zeitAugenFst=0;
volatile uint8_t zeitAugenEinsSek=0;
volatile uint8_t zeitAugenZweiSek=0;
volatile uint8_t zeitAugenDreiSek=0;
volatile uint8_t zeitAugenVierSek=0;

//Servo-Code:
volatile uint8_t phase=0;
volatile uint8_t ZeitZaehlerServo=0;
volatile uint8_t servoZyklus=0;
// Timer ist übergelaufen (alle 0,213ms (=256*0,000833ms)), neue Phase beginnt (?? Irgendwie fehlt hier noch der Faktor 10x um auf 17ms zu kommen?!)
// Jede 8. Phase (~17,1ms) wird PB0=1 gesetzt und dann bei Erreichen des Vergleichswertes (OCR0A in der Main-Schleife löst "ISR(TIM0_COMPA_vect)" aus),s.u., wieder auf 0 gesetzt
ISR(TIM0_OVF_vect)
{
	// Servo nur in Phase 0 ansteuern
	if (phase==0)
	{
		PORTB |=(1<<PB0); //Servo-Signal an
		
		ZeitZaehlerServo = ZeitZaehlerServo+1;	//alle 8 Phasen (17 ms) eins hochzählen
		
		//Reduziere alle Zeitvariablen um 1 (59 => 0,97Sek)
		zeitAugenFst = zeitAugenFst+1;
		
	}
	
	phase = phase+1; // Nächste Phase 1... 2...8 => 0
	if (phase > 8)
	{
		phase=0;
	}
}

// Timer hat Vergleichswert erreicht
ISR(TIM0_COMPA_vect)
{
	PORTB &= ~(1<<PB0); //Servo-Signal aus (=>~ 1 - 2 ms)
}


//Zufallszahlen für Zeitwerte
volatile uint8_t laufZeit=0;
//Zur Info: Max-Werte für Zeit: 245 (x+10<256), Anzahl: 50
//Ablage erfolgt im Flash-Speicher, um RAM zu sparen
//const uint8_t zeitWerteSekundaer[50] PROGMEM = {52, 99, 167, 3, 55, 22, 119, 27, 153, 85, 22, 10, 103, 48, 24, 124, 11, 7, 57, 120, 47, 77, 138, 79, 20, 116, 52, 5, 191, 8, 153, 26, 72, 64, 18, 185, 30, 12, 3, 129, 112, 17, 197, 89, 15, 107, 2, 61, 164, 79};
//const uint8_t zeitWerteSekundaer[50] PROGMEM = {68, 9, 133, 14, 99, 104, 96, 93, 7, 123, 141, 39, 32, 29, 131, 6, 30, 148, 41, 122, 77, 43, 103, 5, 42, 81, 146, 24, 38, 82, 52, 136, 89, 118, 48, 71, 87, 69, 8, 61, 106, 73, 153, 109, 40, 147, 50, 10, 63, 121};
const uint8_t zeitWerteSekundaer[50] PROGMEM = {1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2, 1, 2};

uint8_t zufallsZeitWert();

int main(void)
{
    //DDRB	 = 0x1f;										// Eingänge: Reset PB5; Ausgänge: PB0-PB4 (0: Servo; 1-4: LED-Augen 1-4)
    //PORTB	|= (1<<PB1) | (1<<PB2) | (1<<PB3) | (1<<PB4);	//Pull up aktivieren
    //PORTB	&= ~(1<<PB0);									//Servo aus
    
    
    //Servo-Code
    cli(); // Loesche globales Interruptflag
    //Setzen der Register fuer 20 ms Timerinterrupt
    TCNT0 = 0; //Loesche Timer Counter 0
    // Starte Timer 0 im Fast PWM Modus mit Prescaler 256
    TCCR0A=0;	 //Loesche Timer Counter Controll Register A
    TCCR0A |= (1<<WGM01) | (1<<WGM00); //=> Fast PWM
    TCCR0B=0;	 //Loesche Timer Counter Controll Register B
    TCCR0B |= (1<<CS01);	//=>Prescaler 8
    //TCCR0B |= (1<<CS02);  //=>Prescaler 256
    // Erlaube Interrupts
    //Timer/Counter Interrupt Mask Register:
    TIMSK0=0;
    TIMSK0 |= (1<<OCIE0A) | (1<<TOIE0);
    sei();		//Setzen des globalen Interrupt-Enable-Bit
    // Aktiviere PWM und LED Ausgänge
    //DDRB |= (1<<PB0) + (1<<PB4);
    //DDRB	 = 0x1f;										// Eingänge: Reset PB5; Ausgänge: PB0-PB4 (0: Servo; 1-4: LED-Augen 1-4)
    DDRB |= (1<<PB4) + (1<<PB3) + (1<<PB2) + (1<<PB1) + (1<<PB0);

	
	
    while (1) 
    {
		//Zeitabfrage Augen 1 bis 4 (Servo mit Auge-3-Anschaltung synchronisiert)
		if(zeitAugenFst>59){ //Sekundentaktgeber
			//Sekunden-Taktgeber zurücksetzen
			zeitAugenFst = 0; //59 entspricht ca. 1 Sek. (0,97s)
			
			
			//Auge 1: zweite Zeitvariable prüfen (Anzahl an Sekunden)
			if (zeitAugenEinsSek>10)
			{
				zeitAugenEinsSek--; //Sekundären Zeitzähler reduzieren
			}
			else
			{
				//Wenn beide Zeitvariablen abgelaufen sind:
				//wenn Auge an, dann ausschalten
				if (PINB & (1<<PINB1)) //wenn PinB1 =1
				{
					//ausschalten
					PORTB &= ~(1<<PB1); // PinB1 auf 0 setzen
					//Zeitvariable auf Zufallswert für Aus-Zeit setzen
					zeitAugenEinsSek = 10 + zufallsZeitWert();//Wert aus Zufallsliste beziehen
				}
				else {
					//wenn Auge aus, dann anschalten
					PORTB |= (1<<PB1); // PinB1 auf 1 setzen
					//Zeitvariable auf Zufallswert für An-Zeit setzen
					zeitAugenEinsSek = 10+ zufallsZeitWert();//Wert aus Zufallsliste beziehen
				}
			}
			
			
			
			//Auge 2: zweite Zeitvariable prüfen (Anzahl an Sekunden)
			if (zeitAugenZweiSek>10)
			{
				//Sekundären Zeitzähler reduzieren
				zeitAugenZweiSek--;
			}
			else
			{
				//Wenn beide Zeitvariablen abgelaufen sind:
				//wenn Auge an, dann aus schalten
				if (PINB & (1<<PINB2)) //wenn PinB2 =1
				{
					//ausschalten
					PORTB &= ~(1<<PB2); // PinB2 auf 0 setzen
					//Zeitvariable auf Zufallswert für Aus-Zeit setzen
					zeitAugenZweiSek = 10+ zufallsZeitWert();//Wert aus Zufallsliste beziehen
				}
				else {
					//wenn Auge aus, dann an schalten
					PORTB |= (1<<PB2); // PinB2 auf 1 setzen
					//Zeitvariable auf Zufallswert für An-Zeit setzen
					zeitAugenZweiSek = 10+ zufallsZeitWert();//Wert aus Zufallsliste beziehen
				}
			}
			/**/
			//Auge 3: zweite Zeitvariable prüfen (Anzahl an Sekunden+1)
			if (zeitAugenDreiSek>10)
			{
				zeitAugenDreiSek--; //Sekundären Zeitzähler reduzieren
			}
			else
			{
				//Wenn beide Zeitvariablen abgelaufen sind:
				//wenn Auge an, dann ausschalten
				if (PINB & (1<<PINB3)) //wenn PinB3 =1
				{
					//ausschalten
					PORTB &= ~(1<<PB3); // PinB3 auf 0 setzen
					//Zeitvariable auf Zufallswert für Aus-Zeit setzen
					zeitAugenDreiSek = 10+ zufallsZeitWert(); //Wert aus Zufallsliste beziehen
				}
				else {
					//wenn Auge aus, dann anschalten
					PORTB |= (1<<PB3); // PinB3 auf 1 setzen
					//Zeitvariable auf Zufallswert für An-Zeit setzen
					zeitAugenDreiSek = 10+ zufallsZeitWert(); //Wert aus Zufallsliste beziehen
					servoZyklus=0; //Servo aktivieren
					ZeitZaehlerServo=0;
				}
			}
			
			
			//Auge 4: zweite Zeitvariable prüfen (Anzahl an Sekunden)
			if (zeitAugenVierSek>10)
			{
				zeitAugenVierSek--; //Sekundären Zeitzähler reduzieren
			}
			else
			{
				//Wenn beide Zeitvariablen abgelaufen sind:
				//wenn Auge an, dann ausschalten
				if (PINB & (1<<PINB4)) //wenn PinB4 =1
				{
					//ausschalten
					PORTB &= ~(1<<PB4); // PinB4 auf 0 setzen
					//Zeitvariable auf Zufallswert für Aus-Zeit setzen
					zeitAugenVierSek = 10+ zufallsZeitWert();//Wert aus Zufallsliste beziehen
				}
				else {
					//wenn Auge aus, dann anschalten
					PORTB |= (1<<PB4); // PinB4  auf 1 setzen
					//Zeitvariable auf Zufallswert für An-Zeit setzen
					zeitAugenVierSek = 10+ zufallsZeitWert();//Wert aus Zufallsliste beziehen
				}
			}
			/* */
		}
		

		//Servo-Code:
		if (servoZyklus <1) //Anzahl links-rechts-Zyklen des Servos
		{
			
			//Servo-Code
			if (ZeitZaehlerServo<59) //<1 Sek. (0,97s)
			{
				// Servo nach links fahren
				OCR0A = 148; //74;//37; //62;
			}
			if (ZeitZaehlerServo>58 && ZeitZaehlerServo<116)
			{
				// Servo nach rechts fahren
				OCR0A = 254;
			}
			if (ZeitZaehlerServo>115) //Ein links-rechts-Zyklus durchlaufen
			{
				//Sekundenzähler zurücksetzen
				ZeitZaehlerServo=0;
				servoZyklus=servoZyklus+1;
			}
		}
		
	}	//while (1)


	return 0;		
}
	

uint8_t zufallsZeitWert(){
	//gibt Zufallswert für Zeit zurück
	if (laufZeit>49){laufZeit=0;}
	laufZeit++;
	return pgm_read_byte (zeitWerteSekundaer[laufZeit-1]);  //Zugriff & Rückgabe von Wert aus dem im Flash abgelegten Array
}