/*
Leuchte Ü-Eier-Kapseln. //Hat noch Fehler: Licht zittert, in einigen Positionen flackert es,  
Lässt 16 leds auf und ab-faden, inwechselnden Mustern.  // nicht per taster umschaltbar
Bei Knopfdruck 1x=alles an,2x alles aus ,3x auf und ab
Ausgaenge PB 0,3-7, PC 0-5, PD 0,1, 4-7 

 Eingaenge PB0,3,4,5,6,7, PC0,1,2,3,4,5, D4,5.6,7   insgesamt 18 Ausgaenge, 2 Eingänge/ 
*/
//---------------------------------------------------------------------------
#ifndef F_CPU
#define 	F_CPU 	4000000
#endif
#include <avr\io.h>
#include <avr\interrupt.h>
#include <stdlib.h>  //für Zufallsgenerator
volatile uint16_t lauf=10200;
volatile uint8_t isrlauf=0;
uint8_t laufup;
volatile uint8_t tasttime;
volatile uint8_t tastdruck;
//volatile uint8_t tasttime2;
volatile uint8_t tastdruck2;
uint8_t schalt=0;
volatile uint8_t tastschalt=0;
volatile uint16_t	isrschalt=0;
int srand();
//--------------------------------------------------------------------
// TIMER2_COMP_vect - Timer2 Interrupt bei Vergleichswert
// aktuelle Einstellung:  200.321 Hz  4.992 ms
//--------------------------------------------------------------------
ISR(TIMER2_COMP_vect)  //(vorher: 	timer2_comp_vect)
{
	tasttime++;
	//tasttime2++;
	isrlauf=1;
	isrschalt++;
	
}

//------------------------------------------------------------------------
// INT0 Tastenabfrage
//------------------------------------------------------------------------
ISR (INT0_vect){
	tasttime=0;
	tastdruck=1;

}
//------------------------------------------------------------------------
ISR	(INT1_vect){
	tasttime=0;
	tastdruck2=1;

			}
			
//------------------------------------------------------------------------
// Initialisierungen
//------------------------------------------------------------------------
void init()
{
 	// Ports initialisieren
 	DDRB |= 0xff; 	// PORTB auf Ausgang
	DDRC  |= 0xff; //PORTC auf Ausgang
	DDRD	|=(1<<DDD0)|(1<<DDD1)|(1<<DDD3)|(1<<DDD4)|(1<<DDD5)|(1<<DDD6)|(1<<DDD7);//PortD 0,1,4,5,6,7 auf Ausgang
 	DDRD &=~(1<<DDD2); 	// PORTD2  auf Eingang mit PullUp 	
 	PORTD |= (1<<PD2); //pullup
 	
 	//--- Timer 2 initialisieren ---
 	TCCR2= (1<<CS21); 	// Teiler 1/8
 	TCCR2|=0x08; 	// Modus: Zählen bis Vergleichswert (WGM21=1)
 	OCR2=56; 	// Vergleichswert speichern
 	TIMSK|=0x80; 	// Interrupt bei Vergleichswert
 	
 	TCCR1A = (1<<COM1A0)|(1<<COM1A1)|(1<<COM1B0)|(1<<COM1B1)|(1<<WGM11);  //
	
	TCCR1B = (1<<CS10)|(1<<WGM13);

	ICR1 = 10200;  
	OCR1A=lauf;
	
	//Initialisierung interrupt INT0, PORT D2, INT1,PORT3
	MCUCR |= (1<<ISC00)|(1<<ISC01)|(1<<ISC10)|(1<<ISC11); //steigende Flanke für INT0 u INT1
	GICR |= (1<<INT0)|(1<<INT1);
	laufup=1;
	

 	//--- Interrupts erlauben ---
 	sei();
}

/////////////////////////////////////////////////////////////////////////////
// Main-Funktion
/////////////////////////////////////////////////////////////////////////////
int main(void)
{
 	init(); 	// Initialisierungen
 	while (1)		//for (;;)  	// Mainloop-Begin
 	{
		if(isrlauf){


			if(lauf<=0){
				laufup=1;
			}

			if(lauf>=10200){
				laufup=0;
			}

			if(laufup==1){
				lauf++;
			}

			else{
				lauf--;
			}

				
 			OCR1A=lauf;
			isrlauf=0;
		}
		
		
		
//-------------------------------------// Taster an D2	
		
//------------------------------------ //automatische weiterschaltung 
	
		if(isrschalt>=18000){ 	 		 //zeit bis zum Umschalten 60000 entspr 3 phasen
			if(lauf>=10180){			//20000 entspr 1 Phase								  
			isrschalt=0; schalt++;
			if (schalt >=25){		//zahl der schaltsstellungen
					schalt =0;}			
			}
			}  


			
	
//-------------------------------------	weiterschaltung per tastendruck 1
		if(tastdruck){
			
			if(tasttime >=50){				//geht ganz gut
				tasttime=0;
				tastschalt++;
				tastdruck =0;
				lauf=10200;
				if (tastschalt >=3){		//zahl der schaltsstellungen
					tastschalt =0;
				}
			}
		}	
//------------------------------------------weiterschaltung per tastendruck2
	/*	if(tastdruck2){
			
			if(tasttime>=50){     //geht ganz gut
				tasttime=0;
				tastdruck2 =0;
				lauf=10200;
				
			
				
				if (schalt==0){
				schalt=2;
				} 
				else if (schalt==2){
				schalt=0;
				}
				else if(schalt!=0,schalt!=2){
				schalt=0;
				}
				
				
				
				if (schalt >=4){		//zahl der schaltsstellungen
					schalt =0;
				}
			}
		}	*/
//-----------------------------------------------------//zufallsweiterschaltung -geht noch nicht-
/*int zufall=rand()%4;  //Zufallszahl 0-3//

		if(isrschalt>=15000){ 	 		 //zeit bis zum Umschalten 60000 entspr 3 phasen
			if(lauf==10200){
			isrschalt=0;
			  

			if (zufall==0){schalt=0;}
			if (zufall==1){schalt=1;}
			if (zufall==2){schalt=2;}
			if (zufall==3){schalt=3;}
			if (schalt >=4){schalt =0;}  //zahl der schaltsstellungen
			
			}}*/
//-------------------------------------------taster an D2
	//		while(tastschalt==0){
//-------------------------------------------0
		if(schalt==0){				
			if (PINB &(1<<PINB1)){
				PORTC = 0b11111111;  //alles an
				PORTB = 0b11111111;   // 1D2 immer auf 1 (pullup)
				PORTD = 0b11111111;
   			 }
 			else{
				PORTC = 0b00000000;  //alles an
				PORTB = 0b00000000;   
				PORTD = 0b00000100;		
			}
		}
//--------------------------------------------1
		if (schalt==1){
			if (PINB &(1<<PINB1)){
				//PORTC|=(1<<PC0);
				//PORTC|=(1<<PC1);
				
				PORTC = 0b00000100; //D6,D1 C2
				PORTD = 0b01000110;
   			 }
			 else{
			 	PORTB &=~(1<<PB5);
			 	PORTC &=~(1<<PC2);
				PORTD &=~((1<<PD1)|(1<<PD6));
				
			}
		}
//---------------------------------------------2
		if (schalt==2){
			if (PINB &(1<<PINB1)){
				//PORTC|=(1<<PC2);
				//PORTC|=(1<<PC3);
				PORTB = 0b10000000;  
				PORTC = 0b00010000; //B7, C4
				PORTD = 0b00000100;
			}
			else{
				PORTB &=~(1<<PB7);
				PORTC &=~(1<<PC4);
			}
		}
//----------------------------------------------3
		if (schalt==3){
			if (PINB &(1<<PINB1)){
				PORTB = 0b00000001;  
				PORTC = 0b00000000;					 //oberste Zeile B0,/D0,1,3 !!!
				PORTD = 0b00001111;
				/*PORTB|=(1<<PB0);
				PORTD|=(1<<PD0);
				PORTD|=(1<<PD1);
				PORTD|=(1<<PD3);*/
			}	
			else{
				PORTB &=~(1<<PB0); 	///D2 immer auf 1 (pullup)
				PORTD &=~(1<<PD0);
				PORTD &=~(1<<PD1);
				PORTD &=~(1<<PD3);
				}
   			}
 //---------------------------------------------4
 if (schalt==4){
			if (PINB &(1<<PINB1)){
				PORTB = 0b11000000;  
				PORTC = 0b00000011; //zweite  Zeile B6,7,  C0,1
				
			}	
			else{
				PORTB &=~(1<<PB6);
				PORTB &=~(1<<PB7);
				PORTC &=~(1<<PC0);
				PORTC &=~(1<<PC1);
				}
   			}

//----------------------------------------------5	
if (schalt==5){
			if (PINB &(1<<PINB1)){
				PORTB = 0b00000010;  
				PORTC = 0b00111100; //dritte  Zeile   C2,3,4,5
				PORTD = 0b00000100;
			}	
			else{
				PORTC &=~(1<<PC2);
				PORTC &=~(1<<PC3);
				PORTC &=~(1<<PC4);
				PORTC &=~(1<<PC5);
				}
   			}
//----------------------------------------------------------6
if (schalt==6){
			if (PINB &(1<<PINB1)){
				PORTB = 0b00000010;  
				PORTC = 0b00000000; //vierte  Zeile   D 4,5,6,7
				PORTD = 0b11110100;
			}	
			else{
				PORTD &=~(1<<PD4);
				PORTD &=~(1<<PD5);
				PORTD &=~(1<<PD6);
				PORTD &=~(1<<PD7);
				}
   			}
//-------------------------------------------------------7
if (schalt==7){
			if (PINB &(1<<PINB1)){
				PORTB = 0b10000010;  
				PORTC = 0b00011001; //mittlerer Block B7 C0,3,4  D0,1,5,6 
				PORTD = 0b01100111;
			}	
			else{
				PORTB &=~(1<<PB7);
				PORTC &=~(1<<PC0);
				PORTC &=~(1<<PC3);
				PORTC &=~(1<<PC4);
				PORTD &=~(1<<PD0);
				PORTD &=~(1<<PD1);
				PORTD &=~(1<<PD5);
				PORTD &=~(1<<PD6);
				}
   			}
//-----------------------------------------------------------8
if (schalt==8){
			if (PINB &(1<<PINB1)){
				PORTB = 0b00000011;  
				PORTC = 0b00010000; //B0, C4,1  D0
				PORTD = 0b00000101;
			}	
			else{
				PORTB &=~(1<<PB0);
				PORTC &=~(1<<PC4);
				PORTC &=~(1<<PC1);
				PORTD &=~(1<<PD0);
				}
   			}
//-----------------------------------------------------------9
if (schalt==9){
			if (PINB &(1<<PINB1)){
				PORTB = 0b00101000;  
				PORTC = 0b00000101; //  B3,5/ C0,2 D0,1,3, 6   !!!!
				PORTD = 0b01000111; // PB1 grundsätzlich auf 1/D2 immer auf 1 (pullup)
			}	
			else{
				PORTB &=~(1<<PB3);
				PORTB &=~(1<<PB5);
				PORTC &=~(1<<PC0);
				PORTC &=~(1<<PC2);
				PORTD &=~(1<<PD0);
				PORTD &=~(1<<PD1);
				PORTD &=~(1<<PD3);
				PORTD &=~(1<<PD6);
				}
   			}

//------------------------------------------------------------10
if (schalt==10){
			if (PINB &(1<<PINB1)){
				//PORTB = 0b00000000;  
				PORTC = 0b00000101; //   C0,2 D 0,3,6
				PORTD = 0b01001101;
			}	
			else{
				
				PORTC &=~(1<<PC0);
				PORTC &=~(1<<PC2);
				PORTD &=~(1<<PD0);
				PORTD &=~(1<<PD3);
				PORTD &=~(1<<PD6);
				}
   			}
//------------------------------------------------------------11
if (schalt==11){
			if (PINB &(1<<PINB1)){
				PORTB = 0b11000001;  
				PORTC = 0b00010010; //  B0,6,7 C1,4 D 4,7
				PORTD = 0b10010100;
			}	
			else{
				PORTB &=~(1<<PB0);
				PORTB &=~(1<<PB6);
				PORTB &=~(1<<PB7);
				PORTC &=~(1<<PC1);
				PORTC &=~(1<<PC4);
				PORTD &=~(1<<PD4);
				PORTD &=~(1<<PD7);
				}
   			}
//---------------------------------------------------------------12
if (schalt==12){
			if (PINB &(1<<PINB1)){
				PORTB = 0b00011000;  
				PORTC = 0b00100101; //  B3,4/ C0,5,2 D0,1, 5,6 
				PORTD = 0b01100011;
			}	
			else{
				PORTB &=~(1<<PB3);
				PORTB &=~(1<<PB4);
				PORTC &=~(1<<PC0);
				PORTC &=~(1<<PC2);
				PORTC &=~(1<<PC5);				
				PORTD &=~(1<<PD0);
				PORTD &=~(1<<PD1);
				PORTD &=~(1<<PD5);
				PORTD &=~(1<<PD6);
				}
   			}
//-----------------------------------------------------------13
if(schalt==13){				
			if (PINB &(1<<PINB1)){
				PORTB = 0b00000010;  //B3/,C0,3,5,D0,5,7
				PORTC = 0b00101001;   //PB1 u PD1u2 grundsätzlich auf 1
				PORTD = 0b10100101;
   			 }
 			else{
				PORTC &=~(1<<PC0);
				PORTC &=~(1<<PC3);
				PORTC &=~(1<<PC5);
				PORTD &=~(1<<PD0);
				PORTD &=~(1<<PD5);
				PORTD &=~(1<<PD7);
				
			}
		}
//------------------------------------------------------------14
if(schalt==14){				
			if (PINB &(1<<PINB1)){
				PORTB = 0b10000001;  //gelbe Diagonale B0,7 C4,D7
				PORTC = 0b00010000;   // PD2 grundsätzlich auf 1
				PORTD = 0b10000100;
   			 }
 			else{
				PORTB &=~(1<<PB0);
				PORTB &=~(1<<PB7);
				PORTC &=~(1<<PC4);
				PORTD &=~(1<<PD7);				
			}
		}
//------------------------------------------------------------15
if(schalt==15){				
			if (PINB &(1<<PINB1)){
				PORTB = 0b00100000;  //orange Diagonale B5/, C0,3,D3,4
				PORTC = 0b00001001;   // PD2 grundsätzlich auf 1
				PORTD = 0b00011100;
   			 }
 			else{
				PORTB &=~(1<<PB5);
				PORTC &=~(1<<PC0);
				PORTC &=~(1<<PC3);
				PORTD &=~(1<<PD3);	
				PORTD &=~(1<<PD4);				
			}
		}
//-------------------------------------------------------------16
if(schalt==16){
			if (PINB &(1<<PINB1)){
				PORTB = 0b01000000;  //B6,D5,C1
				PORTC = 0b00000010;   //PD2 grundsätzlich auf 1
				PORTD = 0b00100100;
   			 }
 			else{
				PORTB &=~(1<<PB6);
				PORTC &=~(1<<PC1);
				PORTD &=~(1<<PD5);				
			}
		}

//--------------------------------------------------------------17
if(schalt==17){				
			if (PINB &(1<<PINB1)){
				PORTB = 0b10100001;  //Kreuz:orange u gelbe Diagonale B0,5,7 C0,3,4,D3,4,7
				PORTC = 0b00011001;   //PD2 grundsätzlich auf 1
				PORTD = 0b10011100;
   			 }
 			else{
				PORTB &=~(1<<PB0);
				PORTB &=~(1<<PB5);
				PORTB &=~(1<<PB7);
				PORTC &=~(1<<PC0);
				PORTC &=~(1<<PC3);
				PORTC &=~(1<<PC4);
				PORTD &=~(1<<PD3);
				PORTD &=~(1<<PD4);
				PORTD &=~(1<<PD7);		
			}
		}
//--------------------------------------------------------------18
if (schalt==18){
			if (PINB &(1<<PINB1)){
				PORTB = 0b11000000;  
				PORTC = 0b00000011; //zweite  Zeile B6,7,  C0,1
				PORTD = 0b00000100;
			}	
			else{
				PORTB &=~(1<<PB6);
				PORTB &=~(1<<PB7);
				PORTC &=~(1<<PC0);
				PORTC &=~(1<<PC1);
				}
   			}

//---------------------------------------------------------------19
if (schalt==19){
			if (PINB &(1<<PINB1)){
				PORTB = 0b00000000;  
				PORTC = 0b00111100; //dritte  Zeile   C2,3,4,5   
				PORTD = 0b00000100;
			}	
			else{
				PORTC &=~(1<<PC2);
				PORTC &=~(1<<PC3);
				PORTC &=~(1<<PC4);
				PORTC &=~(1<<PC5);
				}
   			}
//---------------------------------------------------------------20
if(schalt==20){				
			if (PINB &(1<<PINB1)){
				PORTB = 0b01000001;  //äußerer Rahmen B0,6,C1,2,5, D0,1,3,4,5,6,7  
				PORTC = 0b00100110;   //PD2 grundsätzlich auf 1
				PORTD = 0b11111111;
   			 }
 			else{
				PORTB &=~(1<<PB0);
				PORTB &=~(1<<PB6);
				PORTC &=~(1<<PC1);
				PORTC &=~(1<<PC2);
				PORTC &=~(1<<PC5);
				PORTD &=~(1<<PD0);
				PORTD &=~(1<<PD1);
				PORTD &=~(1<<PD3);
				PORTD &=~(1<<PD4);
				PORTD &=~(1<<PD5);
				PORTD &=~(1<<PD6);
				PORTD &=~(1<<PD7);		
			}
		}


//-----------------------------------------------------------------21
if (schalt==18){
			if (PINB &(1<<PINB1)){
				PORTB = 0b10000000;  
				PORTC = 0b00010000; //B7,  C4
				PORTD = 0b00000100;
			}	
			else{
				
				PORTB &=~(1<<PB7);
				PORTC &=~(1<<PC4);
				
				}
   			}
//-----------------------------------------------------------------22
if (schalt==22){
			if (PINB &(1<<PINB1)){
				PORTB = 0b00000000;  
				PORTC = 0b00100101; //  C0,5,2 D0,1 5,6 
				PORTD = 0b01100111;
			}	
			else{
				
				PORTC &=~(1<<PC0);
				PORTC &=~(1<<PC5);
				PORTC &=~(1<<PC2);
				PORTD &=~(1<<PD0);
				PORTD &=~(1<<PD1);
				PORTD &=~(1<<PD5);
				PORTD &=~(1<<PD6);
				}
   			}
//--------------------------------------------------------------------23
if (schalt==23){
			if (PINB &(1<<PINB1)){
				PORTB = 0b00000010;  
				PORTC = 0b00000101; //  C0,2 D0,3  6
				PORTD = 0b01001101;
			}	
			else{
				PORTC &=~(1<<PC0);
				PORTC &=~(1<<PC2);
				PORTD &=~(1<<PD0);
				PORTD &=~(1<<PD3);
				PORTD &=~(1<<PD6);
				}
   			}
//-------------------------------------------------------------------24
if (schalt==24){
			if (PINB &(1<<PINB1)){
				PORTB = 0b00000000;  
				PORTC = 0b00001001;     //C0,3
				PORTD = 0b00000100;
			}	
			else{
				
				
				PORTC &=~(1<<PC0);
				PORTC &=~(1<<PC3);
				
				}
   			}
//-----------------------------------------------------------taster an D2
 /* }
//------------------------------------------------noch taster D2 alles an  //geht nicht!!
		while (tastschalt==1){
				PORTC = 0b11111111;  //alles an
				PORTB = 0b11111111;   
				PORTD = 0b11111111;
				
   			 }
 		while (tastschalt==2){
				PORTC = 0b00000000;  //alles aus
				PORTB = 0b00000000;   
				PORTD = 0b00000100;		//D2 immer auf 1 (pullup)
				}
  */
//---------------------------------------------------------------------25
 	} // Mainloop-Ende
}