fancy_blink.c

#include <avr/io.h>
#include <avr/interrupt.h>
#include <util/delay.h>

// prescaler is set so timer0 ticks every 64 clock cycles, and the overflow handler
// is called every 256 ticks.

#define MICROSECONDS_PER_TIMER0_OVERFLOW \
  (64UL * 256UL * 100000UL / ((F_CPU + 5UL) / 10UL))

// the whole number of milliseconds per timer0 overflow
#define MILLIS_INC (MICROSECONDS_PER_TIMER0_OVERFLOW / 1000U)

// the fractional number of milliseconds per timer0 overflow
#define FRACT_INC ((MICROSECONDS_PER_TIMER0_OVERFLOW % 1000U) >> 3)

// shift right to fit in a byte
#define FRACT_MAX (1000U >> 3)

volatile unsigned long timer0_millis = 0;
volatile unsigned char timer0_fract = 0;

#if defined(__AVR_ATtiny13__) || defined(__AVR_ATtiny13A__) || defined(__AVR_ATtiny84__) || defined(__AVR_ATtiny85__)
ISR(TIM0_OVF_vect)
#else
ISR(TIMER0_OVF_vect)
#endif
{
  // Copy to local vars so they can go in registers
  unsigned long m = timer0_millis;
  unsigned char f = timer0_fract;

  f += FRACT_INC;
  if (f >= FRACT_MAX) {
    f -= FRACT_MAX;
    m += MILLIS_INC + 1;
  }
  else {
    m += MILLIS_INC;
  }

  timer0_millis = m;
  timer0_fract = f;
}


void init_timer()
{
  sei();
  // Set timer0 prescaler to 64
#ifdef TCCR0B
  TCCR0B |= _BV(CS01) | _BV(CS00);
#else
  TCCR0 |= _BV(CS01) | _BV(CS00); // Atmega32a
#endif
  // Set timer0 interrupt mask - TimerOverflowInterruptEnable
#ifdef TIMSK0
  TIMSK0 |= _BV(TOIE0);
#else
  TIMSK |= _BV(TOIE0); // Atmega32a
#endif
}

unsigned long millis()
{
  unsigned long m;
  uint8_t oldSREG = SREG;

  // copy millis into 'm' atomically by disabling interrupts
  cli();
  m = timer0_millis;
  SREG = oldSREG;

  return m;
}

int times[] = { 250, 250, 250, 1000, 50, 50, 50, 50, 50, 50, 50, 2000, 0 };

#define LEDPIN PB1
#define LEDDD DDB1
#define LEDDDR DDRB
#define LEDPORT PORTB

int main(void)
{
  init_timer();

  LEDDDR |= _BV(LEDDD);
  LEDPORT = _BV(LEDPIN);

  unsigned long lastTime = 0;
  uint8_t t_index = 0;

  for (;;) {
    unsigned long currentTime = millis();

    if (currentTime > lastTime + times[t_index]) {
      LEDPORT ^= _BV(LEDPIN);
      lastTime = currentTime;
      t_index++;
      if (!times[t_index])
        t_index = 0;
    }

    // Do other stuff

  }

  return 0;
}