/*
 * taptempo.cpp
 *
 * Created: 7-6-2019 20:53:38
 * Author : ed
 */ 

#define F_CPU 16000000L
#include <stdint.h>
#include <avr/io.h>
#include <avr/interrupt.h>
#include <util/delay.h>
#include <stdlib.h>

#define OneQuarter_ON		PORTD |= (1<<PD4)
#define OneQuarter_OFF		PORTD &= ~(1<<PD4)
#define TwoQuarter_ON		PORTD |= (1<<PD5)
#define TwoQuarter_OFF		PORTD &= ~(1<<PD5)
#define ThreeQuarter_ON		PORTD |= (1<<PD6)
#define ThreeQuarter_OFF	PORTD &= ~(1<<PD6)
#define FourQuarter_ON		PORTD |= (1<<PD7)
#define FourQuarter_OFF		PORTD &= ~(1<<PD7)
#define TheChoosen_ON		PORTB |= ~(1<<PB0)
#define TheChoosen_OFF		PORTB &= ~(1<<PB0)

volatile uint16_t	Time_Between_Pulses, Pulse_Width;
volatile uint8_t	OldSwitchValue,Tempi_out, SwitchValue, NewSwitchValue, GetTheSwitches;
volatile bool		mSec_tick, Start_Input_Trigger, Got_Tick, Check_Start;
volatile bool		Choosen_Released, no_pulses;
void init (void)
{
	//disable watchdog if enabled
	MCUSR=0;
	WDTCSR|=(_BV(WDCE) | _BV(WDE));
	WDTCSR=0;
	DDRD = (1<<DDD0)|(1<<DDD4)|(1<<DDD5)|(1<<DDD6)|(1<<DDD7);
	PORTD |= (1<<PORTD2)|(1<<PORTD3);//pull ups int inputs
	PORTC |= (1<<PORTC0)|(1<<PORTC1)|(1<<PORTC2)|(1<<PORTC3)|(1<<PORTC4)|(1<<PORTC5);//pull ups switches
	DDRB = (1<<PORTB0);//output for TheChoosen
	
	// initialize Timer1
	TCCR1A = 0;// set entire TCCR1A register to 0
	TCCR1B = 0;// same for TCCR1
	// set compare match register to desired timer count:
	OCR1A = 0x0800;// 1mSec
	// turn on CTC mode:
	TCCR1B |= (1 << WGM12);
	/*
	CS12 	CS11 	CS10 	Description
	0 		0 		0 		No clock source (Timer/Counter stopped).
	0 		0 		1 		(No prescaling)
	0 		1 		0 		clk/8 (From prescaler)			2.4usec
	0 		1 		1 		clk/64 (From prescaler)			16usec
	1 		0 		0 		clk/256 (From prescaler)		32usec
	1 		0 		1 		clk/1024 (From prescaler)		128us
	1 		1 		0 		ext. clock on T1. Clock on falling edge
	1 		1 		1 		ext. clock on T1. Clock on rising edge
	*/
	EICRA |= (1 << ISC01)|(1 << ISC00)|(1 << ISC10)|(1 << ISC11);// set INT0 and INT1 to trigger on rising edges
	EIMSK |= (1 << INT0)|(1 << INT1);		// Turns on INT0 and INT1
	/*
	--ISC Bit Settings--
	ISCx1	ISCx0 	DESCRIPTION
	0		0		Low level of INTx generates an interrupt request
	0		1		Any logic change on INTx generates an interrupt request
	1		0		The falling edge of INTx generates an interrupt request
	1		1		The rising edge of INTx generates an interrupt request
	*/
}

ISR (INT0_vect)	//Trig IN
{
	Start_Input_Trigger = true;	// set interrupt flag
}

ISR (INT1_vect)	//TAP switch
{
	Start_Input_Trigger = true;	// set interrupt flag
}

ISR (TIMER1_COMPA_vect)  // timer1 overflow interrupt
{
	Check_Start = Start_Input_Trigger;
	if (Pulse_Width<=8000)
	{
		Pulse_Width++;
		if (Check_Start)
		{
			Time_Between_Pulses = Pulse_Width;
			Pulse_Width = 0;
			Start_Input_Trigger = false;
		}
	}
	if ((Pulse_Width>=8000)&(Check_Start))
	{
		Pulse_Width = 0;
		Start_Input_Trigger = false;
	}
  mSec_tick=true;
}

int main (void)
{
	init();
	Choosen_Released = true;
	SwitchValue = 1;
	OneQuarter_OFF;TwoQuarter_OFF;ThreeQuarter_OFF;FourQuarter_OFF;TheChoosen_OFF;//all outputs LOW
	Time_Between_Pulses = 500;
	Pulse_Width = 150;
	mSec_tick = true;
	sei(); // Enable the Global Interrupt Enable flag so that interrupts can be processed
	TCCR1B |= (1 << CS11);TIMSK1 |= (1 << OCIE1A);// enable timer compare interrupt:
	while(1)
	{
		uint8_t High_Time = 1;
		uint16_t Two_Quarter_Time = Time_Between_Pulses/2;
		uint16_t Three_Quarter_Time = Time_Between_Pulses/3;
		uint16_t Four_Quarter_Time = Time_Between_Pulses/4;
		for (uint16_t n=0;n<=Time_Between_Pulses;n++)
		{
		Got_Tick=false;
		if (n==0)	{Tempi_out=0xF0;if ((SwitchValue==1)|(SwitchValue==2)|(SwitchValue==4)|(SwitchValue==8)){Got_Tick=true;}}//{OneQuarter_ON;TwoQuarter_ON;ThreeQuarter_ON;FourQuarter_ON;}
		if (n==High_Time){Tempi_out=0x00;}//{OneQuarter_OFF;TwoQuarter_OFF;ThreeQuarter_OFF;FourQuarter_OFF;}
		if (n==Four_Quarter_Time){Tempi_out=0x80;if (SwitchValue==8){Got_Tick=true;}}	//{FourQuarter_ON;}
		if (n==(Four_Quarter_Time+High_Time)){Tempi_out=0x00;}//{FourQuarter_OFF;}
		if (n==Three_Quarter_Time){Tempi_out=0x40;if (SwitchValue==4){Got_Tick=true;}}	//{ThreeQuarter_ON;}
		if (n==(Three_Quarter_Time+High_Time)){Tempi_out=0x00;}//{ThreeQuarter_OFF;}
		if (n==Two_Quarter_Time){Tempi_out=0xA0;if ((SwitchValue==2)|(SwitchValue==8)){Got_Tick=true;}}	//{TwoQuarter_ON;FourQuarter_ON;}
		if (n==(Two_Quarter_Time+High_Time)){Tempi_out=0x00;}//{TwoQuarter_OFF;FourQuarter_OFF;}
		if (n==(Three_Quarter_Time<<1)){Tempi_out=0x40;if (SwitchValue==4){Got_Tick=true;}}	//{ThreeQuarter_ON;}
		if (n==(High_Time+(Three_Quarter_Time<<1))){Tempi_out=0x00;}//{ThreeQuarter_OFF;}
		if (n==(Four_Quarter_Time*3)){Tempi_out=0x80;if (SwitchValue==8){Got_Tick=true;}}	//{FourQuarter_ON;}
		if (n==(High_Time+(Four_Quarter_Time*3))){Tempi_out=0x00;}//{FourQuarter_OFF;}
		while (!(mSec_tick));// wait for interrupt flag
		PORTD = 0x0F | Tempi_out;
		if (Got_Tick)
		{
			PORTB|=0x01;	//Chose output goes high
		}else PORTB=0x00;	//Chose output goes or stays low
		mSec_tick=false;
		GetTheSwitches=(PINC&0x30);	//looking at PC4 and PC5
		while (GetTheSwitches==0x30){GetTheSwitches=(PINC&0x30);}	// if the switch is in mid position, all outputs are halted
		if (GetTheSwitches&0x10){OCR1A = 0x0400;}	// 0.5mSec
			else OCR1A = 0x0800;// 1mSec
		NewSwitchValue=0x0F-(PINC&0x0F);	// Check to see if a SET xN switch is pressed
		if (NewSwitchValue!=0){SwitchValue=NewSwitchValue;}
		}
	}
}