// Skeeball controller program
// Jason Greene
// 6/13/2009
// www.idleamusements.com

#include <inttypes.h>
#include <stdio.h> 
#include <stdlib.h> 
#include <avr/io.h>
#include <avr/iom8.h>
#include <avr/interrupt.h> 
#include <math.h> 
#include <string.h>

void Init(void);
void SetTune(int);
void NextNote(void);
void SetDisplay(int);
void DisplayRender(void);
void SevenSend(char);
void SetLights(int);
void LightEffects(void);


//Global Variables
//These variables represent the status of the game and outputs
volatile unsigned char GameState;
volatile unsigned int TheScore;
volatile unsigned char TheBallCount;
volatile unsigned char BallInPlayState;
volatile unsigned char SolenoidState;
volatile unsigned char LightState;
volatile unsigned char LightSequence;
volatile unsigned char DisplayState;
volatile unsigned char DisplaySequence;
//Music variables
volatile float MusicStep;
volatile float MusicMover;
volatile unsigned int MusicDelay;
volatile int MusicState;
volatile int MusicPosition;
//RTTTL Info represents the stored tunes converted from RTTTL format
volatile int RTTTLCount;
volatile int RTTTLBPM;
volatile unsigned char RTTTLNote[80];
volatile unsigned char RTTTLDuration[80];
//Switch counters to track button debounce
volatile unsigned int SwitchCounter[3];
//Countdown timers to generate events
volatile unsigned int SolenoidTimer;
volatile unsigned int LightTimer;
volatile unsigned int DisplayTimer;
volatile unsigned int EndGameTimer;
//Flags to trigger update events
volatile unsigned char NoteUpdateFlag;
volatile unsigned char DisplayUpdateFlag;
volatile unsigned char ScoreUpdateFlag;
volatile unsigned char BallUpdateFlag;
volatile unsigned char SolenoidUpdateFlag;
volatile unsigned char LightUpdateFlag;
volatile unsigned char EndGameFlag;
// SineTable
unsigned char SineTable[256] = {133,136,139,142,145,149,152,155,158,161,164,167,169,172,175,178,
                             181,184,186,189,192,194,197,200,202,205,207,209,212,214,216,218,220,222,224,226,
                             228,230,232,233,235,237,238,240,241,242,243,245,246,247,248,248,249,250,251,251,
                             252,252,252,253,253,253,253,253,253,253,252,252,252,251,251,250,249,248,248,247,
                             246,245,243,242,241,240,238,237,235,233,232,230,228,226,224,222,220,218,216,214,
                             212,209,207,205,202,200,197,194,192,189,186,184,181,178,175,172,
                             169,167,164,161,158,155,152,149,145,142,139,136,133,130,127,124,
                             121,118,115,112,109,105,102,99,96,93,90,87,85,82,79,76,
                             73,70,68,65,62,60,57,54,52,49,47,45,42,40,38,36,34,32,30,28,
                             26,24,22,21,19,17,16,14,13,12,11,9,8,7,6,6,5,4,3,3,
                             2,2,2,1,1,1,1,1,1,1,2,2,2,3,3,4,5,6,6,7,8,9,11,12,
                             13,14,16,17,19,21,22,24,26,28,30,32,34,36,38,40,42,45,47,49,
                             52,54,57,60,62,65,68,70,73,76,79,82,85,87,90,93,96,99,102,105,
                             109,112,115,118,121,124,127,127};


int main (void)
{
	Init();
	sei();
	
	//Setup Attract Mode
	SetDisplay(1);
	SetLights(1);
	SetTune(1);			

	/*
		Welcome to the infinite loop where we look for flags generated
		from switch or timer events. This represents to logical flow 
		of the game.
	*/

	while(1)
	{			
		//Score change
		if(ScoreUpdateFlag==1)
		{
			TheScore=TheScore+10;	
			//A score of 150 is special and makes you a "Winner"
			//so we play a special tune and update the Winner light on the display
			if(TheScore==150)				
			{
				SetTune(3);
				LightUpdateFlag=1;
			}
			ScoreUpdateFlag=0;
			DisplayUpdateFlag=1;
			BallInPlayState++;
			if(BallInPlayState==1)
			{
				SetTune(2);			
			}
		
			
		}
		
		//Ball played
		if(BallUpdateFlag==1)
		{
			TheBallCount=TheBallCount+1;	
			BallUpdateFlag=0;
			DisplayUpdateFlag=1;
			//Last Ball
			if(TheBallCount==9)
			{
				EndGameTimer=31250;
			}
			else
			{
				//Ball out with no score
				//Play some sad little tune
				if(BallInPlayState==0)
				{
					SetTune(4);			
				}			
			}
			BallInPlayState=0;
		}
				

		//Look up next note
		if(NoteUpdateFlag==1)		
		{
			NextNote();		
		}

		
		//Solenoid Events
		if(SolenoidUpdateFlag==1)
		{
			SolenoidUpdateFlag=0;
			SolenoidState--;
			//Time to turn off
			if(SolenoidState==0)
			{				
				PORTC &= ~(1<<PC3);	
			}
			else
			{
				//Run it for another second
				SolenoidTimer=31250;			
			}		
		}
		
		//Light Events
		if(LightUpdateFlag==1)
		{
			LightEffects();
			
		}
		//Display Events
		if(DisplayUpdateFlag==1)
		{
			DisplayRender();
			
		}
		//End of game
		if(EndGameFlag==1)
		{
			EndGameFlag=0;
			SwitchCounter[0]=0;SwitchCounter[1]=0;SwitchCounter[2]=0;
			TheBallCount=0;
			TheScore=0;
			GameState=0;
			SetTune(5);			
			SetDisplay(2);
			SetLights(1);		
		}
		
	}
	

}

/*
   SetDiplay sets the global variables for what we want to show (DisplaySequence)
   and starts the update process by initializing the state (DisplayState)
   and throwing the flag for updating (DisplayUpdateFlag)
*/
void SetDisplay(int DisplayWhich)
{
	DisplaySequence=DisplayWhich;
	DisplayState=0;
	DisplayUpdateFlag=1;
}

/*
	DisplayRender triggers on the DisplayUpdateFlag and takes care of updating our display
	based on where we are on the scrolling messages (DisplayState) or just the score
	and ball played status otherwise. 
*/
void DisplayRender()
{
	char message[75];

	DisplayUpdateFlag=0;

	switch(DisplaySequence)
	{
		case 1:
			sprintf(message,"  Welcome to the Greene room  ");
			SevenSend(' ');
			SevenSend(message[DisplayState+2]);		
			SevenSend(message[DisplayState+1]);		
			SevenSend(message[DisplayState]);		
			DisplayState++;		
			if(DisplayState==29)
			{				
				DisplayState=0;
				DisplayUpdateFlag=1;			
			}
			DisplayTimer=16000;
			break;
		case 2:
			sprintf(message,"  Game Over  ");
			SevenSend(' ');
			SevenSend(message[DisplayState+2]);		
			SevenSend(message[DisplayState+1]);		
			SevenSend(message[DisplayState]);		
			DisplayState++;
			if(DisplayState==12)
			{
				DisplaySequence=1;
				DisplayState=0;
				DisplayUpdateFlag=0;			
			}
			DisplayTimer=16000;
			break;
	
		case 99:
		default:
			sprintf(message,"%3u",TheScore);
			SevenSend(48+TheBallCount);			
			SevenSend(message[2]);
			SevenSend(message[1]);
			SevenSend(message[0]);
			break;	
	
	}

}

/*
	SevenSend sends the given character to the 7 segment displays by controlling the
	clock and data lines on the score display. 
	% and ^ are used for just pretty rotating effects
*/
void SevenSend(char sendchar)
{
	int x;
	unsigned char item;
	
	item=0b00000000;
	
	switch(sendchar)
	{
		case '1':
			item=0b11000000;
			break;				
		case '2':
			item=0b10110110;
			break;				
		case '3':
			item=0b11100110;
			break;				
		case '4':
			item=0b11001010;
			break;				
		case '5':
			item=0b01101110;
			break;				
		case '6':
			item=0b01111110;
			break;				
		case '7':
			item=0b11000100;
			break;				
		case '8':
			item=0b11111110;
			break;				
		case '9':
			item=0b11001110;
			break;				
		case '0':
			item=0b11111100;
			break;				
		case 'A':
		case 'a':
			item=0b11011110;
			break;	
		case 'B':
		case 'b':
			item=0b01111010;
			break;	
		case 'C':
		case 'c':
			item=0b00111100;
			break;	
		case 'D':
		case 'd':
			item=0b11110010;
			break;	
		case 'E':
		case 'e':
			item=0b00111110;
			break;	
		case 'F':
		case 'f':
			item=0b00011110;
			break;	
		case 'G':
		case 'g':
			item=0b11101110;
			break;	
		case 'H':
		case 'h':
			item=0b11011010;
			break;	
		case 'I':
		case 'i':
			item=0b00011000;
			break;	
		case 'J':
		case 'j':
			item=0b11110000;
			break;	
		case 'K':
		case 'k':
			item=0b11011010;
			break;	
		case 'L':
		case 'l':
			item=0b00111000;
			break;	
		case 'M':
		case 'm':
			item=0b01010100;
			break;	
		case 'N':
		case 'n':
			item=0b01010010;
			break;	
		case 'O':
		case 'o':
			item=0b11111100;
			break;	
		case 'P':
		case 'p':
			item=0b10011110;
			break;	
		case 'Q':
		case 'q':
			item=0b11001110;
			break;	
		case 'R':
		case 'r':
			item=0b00010010;
			break;	
		case 'S':
		case 's':
			item=0b01101110;
			break;	
		case 'T':
		case 't':
			item=0b00111010;
			break;	
		case 'U':
		case 'u':
			item=0b11111000;
			break;	
		case 'V':
		case 'v':
			item=0b01110000;
			break;	
		case 'W':
		case 'w':
			item=0b10101000;
			break;	
		case 'X':
		case 'x':
			item=0b11011010;
			break;	
		case 'Y':
		case 'y':
			item=0b11101010;
			break;	
		case 'Z':
		case 'z':
			item=0b10110110;
			break;	
		case '%':
			item=0b00100110;
			break;	
		case '^':
			item=0b11011000;
			break;	
	}
	
	
	for(x=7;x>=0;x--)
	{
		if(item & (0x01<<x))
		{
			PORTB |= 1<<PB4;
		}
		else
		{
			PORTB &= ~(1<<PB4);		
		}
		PORTB |= 1<<PB5;		
		PORTB &= ~(1<<PB5);		 		
	}
	

}

/*
   SetLights sets the global variables for what effect we want (LightSequence)
   and starts the update process by initializing the state (LightState)
   and throwing the flag for updating (LightUpdateFlag)
*/

void SetLights(int WhichLights)
{

	LightSequence=WhichLights;
	LightState=1;
	LightUpdateFlag=1;

}

/*
	LightEffects triggers on the LightUpdateFlag and takes care of updating our lamps
	based on where we are on the chosen LightSequence based on the LightState. 
*/

void LightEffects()
{

	LightUpdateFlag=0;

	//PB1 = GameOver 
	//PB2 = Winner
	//PB3 = FreePlay
	//PC4 = Top Light
	
	switch(LightSequence)
	{	
		//WigWag
		case 1:
			if(LightState==1)
			{
				//All Off
				PORTB &= ~(1<<PB1);PORTB &= ~(1<<PB2);PORTB &= ~(1<<PB3);PORTC &= ~(1<<PC4);			
				PORTB |= 1<<PB1;			
				PORTB |= 1<<PB3;
				LightTimer=31250;
				LightState=2;
			}
			else
			{
				PORTB &= ~(1<<PB1);PORTB &= ~(1<<PB2);PORTB &= ~(1<<PB3);PORTC &= ~(1<<PC4);			
				PORTB |= 1<<PB2;			
				PORTC |= 1<<PC4;
				LightTimer=31250;
				LightState=1;			
			}			
			break;
		
		//Flash Top Light
		case 2:
			if(LightState==1)
			{
				//Off
				PORTC &= ~(1<<PC4);			
				LightTimer=31250;
				LightState=2;
			}
			else
			{
				//On				
				PORTC |= 1<<PC4;
				LightTimer=31250;
				LightState=1;			
			}		
			break;
			
		case 0:
		default:
			//All Off
			PORTB &= ~(1<<PB1);PORTB &= ~(1<<PB2);PORTB &= ~(1<<PB3);			
			//Free Play
			PORTB |= 1<<PB3;			
			//Game Over
			if(GameState==0)
			{
				PORTB |= 1<<PB1;			
			}
			//Winner
			if(TheScore>149)
			{
				PORTB |= 1<<PB2;						
			}
			break;
	}
	

}

/*
	SetTune loads the selected tune into the RTTTL global variables, 
	sets the initial position and triggers the initial note update event

*/


void SetTune(int TuneId)
{

	switch(TuneId)
	{
		case 1:
		// Start - Pacman
			RTTTLBPM = 112;
			RTTTLCount = 52;
			RTTTLNote[0]=0x35;RTTTLDuration[0]=0x5;RTTTLNote[1]=0x5;RTTTLDuration[1]=0x5;RTTTLNote[2]=0x36;RTTTLDuration[2]=0x5;RTTTLNote[3]=0x5;RTTTLDuration[3]=0x5;RTTTLNote[4]=0xA6;RTTTLDuration[4]=0x5;RTTTLNote[5]=0x5;RTTTLDuration[5]=0x5;RTTTLNote[6]=0x76;RTTTLDuration[6]=0x5;RTTTLNote[7]=0x5;RTTTLDuration[7]=0x5;RTTTLNote[8]=0x36;RTTTLDuration[8]=0x5;RTTTLNote[9]=0xA6;RTTTLDuration[9]=0x5;RTTTLNote[10]=0x5;RTTTLDuration[10]=0x4;RTTTLNote[11]=0x76;RTTTLDuration[11]=0x4;RTTTLNote[12]=0x5;RTTTLDuration[12]=0x4;RTTTLNote[13]=0x46;RTTTLDuration[13]=0x5;RTTTLNote[14]=0x5;RTTTLDuration[14]=0x5;RTTTLNote[15]=0x47;RTTTLDuration[15]=0x5;RTTTLNote[16]=0x5;RTTTLDuration[16]=0x5;RTTTLNote[17]=0xB6;RTTTLDuration[17]=0x5;RTTTLNote[18]=0x5;RTTTLDuration[18]=0x5;RTTTLNote[19]=0x86;RTTTLDuration[19]=0x5;RTTTLNote[20]=0x5;RTTTLDuration[20]=0x5;RTTTLNote[21]=0x47;RTTTLDuration[21]=0x5;RTTTLNote[22]=0xB6;RTTTLDuration[22]=0x5;RTTTLNote[23]=0x5;RTTTLDuration[23]=0x4;RTTTLNote[24]=0x86;RTTTLDuration[24]=0x4;RTTTLNote[25]=0x5;RTTTLDuration[25]=0x4;RTTTLNote[26]=0x35;RTTTLDuration[26]=0x5;RTTTLNote[27]=0x5;RTTTLDuration[27]=0x5;RTTTLNote[28]=0x36;RTTTLDuration[28]=0x5;RTTTLNote[29]=0x5;RTTTLDuration[29]=0x5;RTTTLNote[30]=0xA6;RTTTLDuration[30]=0x5;RTTTLNote[31]=0x5;RTTTLDuration[31]=0x5;RTTTLNote[32]=0x76;RTTTLDuration[32]=0x5;RTTTLNote[33]=0x5;RTTTLDuration[33]=0x5;RTTTLNote[34]=0x36;RTTTLDuration[34]=0x5;RTTTLNote[35]=0xA6;RTTTLDuration[35]=0x5;RTTTLNote[36]=0x5;RTTTLDuration[36]=0x4;RTTTLNote[37]=0x76;RTTTLDuration[37]=0x4;RTTTLNote[38]=0x5;RTTTLDuration[38]=0x4;RTTTLNote[39]=0x76;RTTTLDuration[39]=0x5;RTTTLNote[40]=0x86;RTTTLDuration[40]=0x5;RTTTLNote[41]=0x96;RTTTLDuration[41]=0x5;RTTTLNote[42]=0x5;RTTTLDuration[42]=0x5;RTTTLNote[43]=0x96;RTTTLDuration[43]=0x5;RTTTLNote[44]=0xA6;RTTTLDuration[44]=0x5;RTTTLNote[45]=0xB6;RTTTLDuration[45]=0x5;RTTTLNote[46]=0x5;RTTTLDuration[46]=0x5;RTTTLNote[47]=0xB6;RTTTLDuration[47]=0x5;RTTTLNote[48]=0xC6;RTTTLDuration[48]=0x5;RTTTLNote[49]=0x16;RTTTLDuration[49]=0x5;RTTTLNote[50]=0x5;RTTTLDuration[50]=0x5;RTTTLNote[51]=0x36;RTTTLDuration[51]=0x15;
			break;
				
		case 2:
		//Score - part of simpsons
			RTTTLBPM = 160;
			RTTTLCount = 4;
			RTTTLNote[0]=0xA5;RTTTLDuration[0]=0x3;RTTTLNote[1]=0xA5;RTTTLDuration[1]=0x3;RTTTLNote[2]=0xA5;RTTTLDuration[2]=0x3;RTTTLNote[3]=0xB5;RTTTLDuration[3]=0x1;		
			break;
		
		case 3:	
		//Tickets -  part of Super Mario World level cleared music
			RTTTLBPM = 125;
			RTTTLCount = 20;
			RTTTLNote[0]=0x15;RTTTLDuration[0]=0x13;RTTTLNote[1]=0x95;RTTTLDuration[1]=0x13;RTTTLNote[2]=0x45;RTTTLDuration[2]=0x3;RTTTLNote[3]=0x15;RTTTLDuration[3]=0x13;RTTTLNote[4]=0x95;RTTTLDuration[4]=0x2;RTTTLNote[5]=0xC5;RTTTLDuration[5]=0x4;RTTTLNote[6]=0x95;RTTTLDuration[6]=0x4;RTTTLNote[7]=0x45;RTTTLDuration[7]=0x4;RTTTLNote[8]=0x5;RTTTLDuration[8]=0x4;RTTTLNote[9]=0xC5;RTTTLDuration[9]=0x13;RTTTLNote[10]=0xB5;RTTTLDuration[10]=0x1;RTTTLNote[11]=0x15;RTTTLDuration[11]=0x13;RTTTLNote[12]=0x95;RTTTLDuration[12]=0x13;RTTTLNote[13]=0x45;RTTTLDuration[13]=0x3;RTTTLNote[14]=0x15;RTTTLDuration[14]=0x13;RTTTLNote[15]=0x95;RTTTLDuration[15]=0x2;RTTTLNote[16]=0xC5;RTTTLDuration[16]=0x4;RTTTLNote[17]=0x95;RTTTLDuration[17]=0x4;RTTTLNote[18]=0x45;RTTTLDuration[18]=0x3;RTTTLNote[19]=0x46;RTTTLDuration[19]=0x1;
			break;
		
		case 4:
		//Ball out without scoring points -- part of Street Fighter 2 stage music
			RTTTLBPM = 125;
			RTTTLCount = 5;
			RTTTLNote[0]=0xB5;RTTTLDuration[0]=0x4;RTTTLNote[1]=0xC5;RTTTLDuration[1]=0x4;RTTTLNote[2]=0xB5;RTTTLDuration[2]=0x4;RTTTLNote[3]=0xC5;RTTTLDuration[3]=0x4;RTTTLNote[4]=0x46;RTTTLDuration[4]=0x2;
			break;
			
		case 5:
		// End - Funeral March
			RTTTLBPM = 100;
			RTTTLCount = 11;
			RTTTLNote[0]=0x45;RTTTLDuration[0]=0x12;RTTTLNote[1]=0x45;RTTTLDuration[1]=0x2;RTTTLNote[2]=0x45;RTTTLDuration[2]=0x3;RTTTLNote[3]=0x45;RTTTLDuration[3]=0x12;RTTTLNote[4]=0x75;RTTTLDuration[4]=0x2;RTTTLNote[5]=0x65;RTTTLDuration[5]=0x3;RTTTLNote[6]=0x65;RTTTLDuration[6]=0x2;RTTTLNote[7]=0x45;RTTTLDuration[7]=0x3;RTTTLNote[8]=0x45;RTTTLDuration[8]=0x2;RTTTLNote[9]=0x45;RTTTLDuration[9]=0x3;RTTTLNote[10]=0x45;RTTTLDuration[10]=0x11;
			break;	
		
	}
	//Start em up
	MusicPosition=0;			
	NoteUpdateFlag=1;

}

/*
	NextNote loads the next note parameters and terminates the tune after the last note.
	Check the website for an explaintion of this process.

*/

void NextNote()
{
	int note;
	int octave;
	float duration;
	unsigned int NoteFrequency;
	
	//Check for end
	if(MusicPosition==RTTTLCount)
	{
		MusicState=0;
		PORTD=0;		
	}
	
	//Load next note
	else
	{		
		MusicState=1;
		
		note=RTTTLNote[MusicPosition]>>4;
		octave=RTTTLNote[MusicPosition] & 0x0f;		
		NoteFrequency =0;
		switch (note)    
		{
			case 1:
				NoteFrequency = 55 * (1 << (octave - 1));
				break;
			case 2:
				NoteFrequency = 58.27 * (1 << (octave - 1));
				break;
			case 3:
				NoteFrequency = 61.735 * (1 << (octave - 1));
				break;
			case 4:
				NoteFrequency = 65.406 * (1 << (octave - 1));
				break;
			case 5:
				NoteFrequency = 69.296 * (1 << (octave - 1));
				break;
			case 6:
				NoteFrequency = 73.416 * (1 << (octave - 1));
				break;
			case 7:
				NoteFrequency = 77.782 * (1 << (octave - 1));
				break;
			case 8:
				NoteFrequency = 82.407 * (1 << (octave - 1));
				break;
			case 9:
				NoteFrequency = 87.307 * (1 << (octave - 1));
				break;
			case 10:
				NoteFrequency = 92.499 * (1 << (octave - 1));
				break;
			case 11:
				NoteFrequency = 97.999 * (1 << (octave - 1));
				break;
			case 12:
				NoteFrequency = 103.826 * (1 << (octave - 1));
				break;
			case 0:
				NoteFrequency = 0;
				break;
		}
    	MusicStep=(float)((float)256/(float)(31250/NoteFrequency));		
		MusicMover=MusicStep;
		
			
		duration=4;
		switch (RTTTLDuration[MusicPosition] & 0x0f)    
		{
			case 0:
				duration=1;
				break;
			case 1:
				duration=2;
				break;
			case 2:
				duration=4;
				break;
			case 3:
				duration=8;
				break;
			case 4:
				duration=16;
				break;
			case 5:
				duration=32;
				break;	
		}
		//Check for duration modifier
		if((RTTTLDuration[MusicPosition] & 0xf0) > 0) 
		{
			duration = duration * 1.5;
		}
			
		MusicDelay= (float)((float)(60 /(float)RTTTLBPM) * (float)(4 /(float)duration) * (float)31250);				
		
		MusicPosition=MusicPosition+1;	
	}	
	NoteUpdateFlag=0;
}
/*
	ISR catches the timer interrupts and handles all the important stuff.
	If in a tune we play the next sample of the sine wave.
	we then check our switches (using a counter to handle debounce) to drive the logical state
	We decrement any running timers and flag where needed events for lights, solenoid, etc.

*/

ISR(TIMER1_COMPA_vect) 
{
	//Music : if in a tune play the next step in the sine wave and decrement the delay
	if(MusicState==1)
	{
		PORTD = SineTable[(int)MusicMover];
		MusicMover=MusicMover+MusicStep;
		if(MusicMover>255)
		{
			MusicMover=MusicMover-256;
		}		
		if(MusicDelay>0)
		{
			MusicDelay=MusicDelay-1;
		}
		else
		{
			PORTD=0;
			NoteUpdateFlag=1;
		}
	}
	
	//Check inputs PC0=Score, PC1 = ball counter, PC2 = start 
	// GameState = 0 means not in a game
	if(GameState==0)
	{
		//Start game switch
		if(PINC&(1<<PC2))
		{
			SwitchCounter[2]=SwitchCounter[2]+1;		
			//Start the game
			if(SwitchCounter[2]==30)
			{			
				GameState=1;
				SwitchCounter[0]=0;SwitchCounter[1]=0;SwitchCounter[2]=0;
				TheScore=0;
				TheBallCount=0;
				SetDisplay(99);
				SetTune(1);			
				//Start Ball Solenoid - run for 3 seconds			
				PORTC |= 1<<PC3;	
				SolenoidState=3;
				SolenoidTimer=31250;
				SetLights(0);
			}
			//SwitchCounter are used for debounce
			if(SwitchCounter[2]>15000) SwitchCounter[2]=100;				
		
		}
		else
		{			
			SwitchCounter[2]=0;
		}	
		
	}
	// Game in play
	if(GameState==1)
	{
	
		//Scores
		if(PINC&(1<<PC0))
		{
			SwitchCounter[0]=SwitchCounter[0]+1;		
			if(SwitchCounter[0]==30)
			{			
				ScoreUpdateFlag=1;		
			}
			if(SwitchCounter[0]>15000) SwitchCounter[0]=100;				
		
		}
		else
		{			
			SwitchCounter[0]=0;
		}

		//Ball Out
		if(PINC&(1<<PC1))
		{
			SwitchCounter[1]=SwitchCounter[1]+1;		
			if(SwitchCounter[1]==30)
			{			
				BallUpdateFlag=1;		
			}
			if(SwitchCounter[1]>15000) SwitchCounter[1]=100;				
		
		}
		else
		{			
			SwitchCounter[1]=0;
		}
	}	

	//Now we decrement any timers and generate update flags if necessary
	if(SolenoidTimer>0)
	{
		SolenoidTimer--;
		if(SolenoidTimer==0)
		{
			SolenoidUpdateFlag=1;
		}	
	}
	
	if(LightTimer>0)
	{
		LightTimer--;
		if(LightTimer==0)
		{
			LightUpdateFlag=1;
		}	
	}
	
	if(DisplayTimer>0)
	{
		DisplayTimer--;
		if(DisplayTimer==0)
		{
			DisplayUpdateFlag=1;
		}	
	}
	
	if(EndGameTimer>0)
	{
		EndGameTimer--;
		if(EndGameTimer==0)
		{
			EndGameFlag=1;
		}	
	}

}

/*
	Init handles port and timer setup as well as initial global values
*/

void Init()
{

	// Sound Outout on Port D	
	DDRD = _BV(PD0) | _BV(PD1) | _BV(PD2)| _BV(PD3) | _BV(PD4)| _BV(PD5) | _BV(PD6)| _BV(PD7); 
    PORTD=0;   
		
	// Outputs for score display P5 = clock P4 = Data 
	// Outputs for Lamps P1=game over  P2=Winner  P3=Free Play
	DDRB = _BV(PB1) | _BV(PB2) | _BV(PB3) | _BV(PB4) | _BV(PB5); 	
	PORTB = 0;
	
	// Inputs PC0 = Score, PC1=ball counter, PC2 = Start switch
	//Output for top light and ball solenoid PC4 & PC3
	DDRC=0;
	DDRC = _BV(PC3) | _BV(PC4) ;
	PORTC= (1<<PC0); //enable internal pullup resistor
	PORTC= (1<<PC1); //enable internal pullup resistor
	PORTC= (1<<PC2); //enable internal pullup resistor
		
	//Init Globals
	MusicState=0;
	MusicPosition=0;
	NoteUpdateFlag=0;
	SwitchCounter[0]=0;SwitchCounter[1]=0;SwitchCounter[2]=0;
	TheScore=0;
	ScoreUpdateFlag=0;
	BallUpdateFlag=0;
	BallInPlayState=0;
	TheBallCount=0;
	GameState=0;
	SolenoidUpdateFlag=0;
	SolenoidState=0;
	LightTimer=0;
	LightUpdateFlag=LightState=LightSequence=0;
	DisplayTimer=0;	
	DisplayUpdateFlag=DisplayState=DisplaySequence=0;
	EndGameTimer=0;
	EndGameFlag=0;
	//Setup Timer1 at 31,250hz
	TCCR1B = _BV(WGM12) | _BV(CS11) | _BV(CS10); 
	//WGM12= CTC Mode
	//CS10 & CS11 =  Prescaler of 64
	OCR1AL = 0x08;
	OCR1AH = 0x00;
	//OCIE1A = Enable Output compare match interrupt	
	TIMSK |= _BV(OCIE1A);

}