//シンプルな時計	2003.9.18 小山智史(弘前大学)
#include <io2313.h>
#include <interrupt.h>
#include <sig-avr.h>
#include <progmem.h>
uint8_t d,i,j,k,c100ms,hh,mm,ss,DIGIT[4];
uint16_t cntr;
prog_char LED[]={0x40, 0x79, 0x24, 0x30, 0x99, 0x92, 0x02, 0x58, 0x00, 0x18};
prog_char SEL[]={0x11, 0x12, 0x14, 0x18};
void countup(){
	cntr=0;
	ss=0;
	if(++mm>=60){	mm=0;	if(++hh>=12)	hh=0;	}
}
void wait(uint8_t n){	for(i=0;i<n;i++)	for(c100ms=0;c100ms<100;);}
SIGNAL(SIG_OUTPUT_COMPARE1A){				// 1ms int
	c100ms++;
	if(++cntr>=1000){	cntr=0;	if(++ss>=60)	countup();	}
	DIGIT[0]=mm%10;	DIGIT[1]=mm/10;	DIGIT[2]=hh%10;	DIGIT[3]=hh/10;
	d=((DIGIT[3]==0)?3:4);
	outp(PRG_RDB(&LED[DIGIT[cntr%d]]),PORTD);
	outp(PRG_RDB(&SEL[cntr%d]),PORTB);	
}

int main(void){
	cntr=hh=mm=ss=0;
	outp(0x10,PORTB);	outp(0x0f,DDRB);	// xxxroooo
	outp(0x00,PORTD);	outp(0x7f,DDRD);	// xooooooo
	outp((1<<CTC1)|(1<<CS12),TCCR1B);		// Timer1: CK/256...50kHz
	__outw_atomic(50,OCR1L);			// OCR1=50(1ms)
	__outw(0,TCNT1L);				// TCNT1=0
	outp((1<<OCIE1A)|(1<<TOIE0),TIMSK);
	sei();
	for(;;)	if(bit_is_clear(PINB,4)){		// SW on
		countup();
		wait(1);
		for(j=0;bit_is_clear(PINB,4);j++){
			wait(1);
			if(j>=60){
				for(k=0;k<10;k++)	countup();
				j--;
			}else if(j>10)	countup();
		}
	}
}