#include <avr/io.h>

// #define FIRST_LETTER_IMPL(x) #x[0]
// #define FIRST_LETTER(x) FIRST_LETTER_IMPL(x)
// #define PORT_LETTER(PIN) FIRST_LETTER(PIN)

// global registers
#define SET(register, bit)			register |= 1 << bit
#define CLEAR(register, bit)		register &= ~(1 << bit)
#define TEST(register, bit)			register & 1 << bit
#define TOGGLE(register, bit)		register ^= 1 << bit

// actions on ports
#define TEST_PIN(port, bit)			TEST(PIN ## port, bit)
#define TOGGLE_PIN(port, bit)		SET(PIN ## port, bit)
#define MODE_INPUT(port, bit)		CLEAR(DDR ## port, bit)
#define MODE_OUTPUT(port, bit)		SET(DDR ## port, bit)
#define IS_PIN_SET(port, bit)		(TEST_PIN(port, bit)) == 0
#define IS_PIN_CLEAR(port, bit)		(TEST_PIN(port, bit)) == 1
#define TURN_ON(_PORT, BIT)			SET(PORT ## _PORT, BIT)
#define TURN_OFF(_PORT, BIT)		CLEAR(PORT ## _PORT, BIT)

// LEDs
#define TURN_ON_LED(bit)			SET(PORTB, bit)
#define TURN_OFF_LED(bit)			CLEAR(PORTB, bit)
#define TOGGLE_LED(led)				TOGGLE_PIN(B, led)

// ELEMENTS
#define D1 0
#define D2 1
#define D3 2
#define D4 4
#define SW1 2
#define SW2 4

// TIME
#define PRESCALE_VALUE				1024
#if (PRESCALE_VALUE == 1)
	#define PRESCALE_SET			(1 << CS10)
#elif (PRESCALE_VALUE == 8)
	#define PRESCALE_SET			(1 << CS11)
#elif (PRESCALE_VALUE == 64)
	#define PRESCALE_SET			(1 << CS10) | (1 << CS11)
#elif (PRESCALE_VALUE == 256)
	#define PRESCALE_SET			(1 << CS12)
#elif (PRESCALE_VALUE == 1024)
	#define PRESCALE_SET			(1 << CS10) | (1 << CS12)
#endif
#define TIME_MS(ms)					(((F_CPU / PRESCALE_VALUE) * ms) / 1000)

int main() {
	MODE_OUTPUT(B, D2);
	TURN_OFF_LED(D2);

	TCCR1B |= (PRESCALE_SET);				// set timer with prescale
											//   -> 16.4 : set timer with bits CS10-12, in register TCCR1B
											//   -> table 16-5 : prescale values

	while(1) {
		if (TCNT1 >= TIME_MS(500)) {		// 16.11.4 : read timer with register TCNT1 (read/write allowed), that combines two 8 bits registers
			TOGGLE_LED(D2);
			TCNT1 = 0;						// reset timer value, also in register TCNT1
		}
	}
}