demo_11_4.c~

这是马潮老师最新力做<<AVR单片机潜入式系统原理与应用实践>>中有关带音乐报时的C程序,用CVAVR编译,对想熟悉和学习AVR单片机的朋友一定有用.注释详细,一看就懂.

/*********************************************
File name	        : demo_11_4.c
Chip type           : ATmega16
Program type        : Application
Clock frequency     : 1.000000 MHz
Memory model        : Small
External SRAM size  : 0
Data Stack size     : 256
*********************************************/

#include <mega16.h>

flash unsigned char led_7[10]={0x3F,0x06,0x5B,0x4F,0x66,0x6D,0x7D,0x07,0x7F,0x6F}; 
flash unsigned char position[6]={0xfe,0xfd,0xfb,0xf7,0xef,0xdf};

flash unsigned int t[9] = {0,956,865,759,716,638,568,506,470};
flash unsigned unsigned char d[9] = {0,105,116,132,140,157,176,198,209};
#define Max_note    32
flash unsigned unsigned char music[Max_note] = {5,2,8,2,5,2,4,2,3,2,2,2,1,4,1,2,1,2,2,2,3,2,3,2,1,2,3,2,4,2,5,8}; 

unsigned unsigned char note_n;
unsigned int int_n;
bit play_on;

unsigned char time[3],time_set[3];			// 时、分、秒计数和设置单元
unsigned char dis_buff[6];					// 显示缓冲区，存放要显示的6个字符的段码值
unsigned char time_counter,key_stime_counter;	// 时间计数单元，
unsigned char clock_state = 6,return_time;
bit	point_on,set_on,time_1s_ok,key_stime_ok;

void display(void)					// 6位LED数管动态扫描函数
{
    static unsigned char posit=0;
	PORTC = 0xff;
	PORTA = led_7[dis_buff[posit]];
	if (set_on && (posit==clock_state)) PORTA= 0x00;		// 校时闪烁
	if (point_on && (posit==2||posit==4)) PORTA |= 0x80;	// 秒闪烁
	PORTC = position[posit]; 
	if (++posit >=6 ) posit = 0;	// （3）
}

// Timer 0 比较匹配中断服务，2ms定时
interrupt [TIM0_COMP] void timer0_comp_isr(void)
{
	display();						// LED扫描显示
	if (++key_stime_counter >=5)
	{
		key_stime_counter = 0;
	    key_stime_ok = 1;							// 10ms到
		if (!(++time_counter % 25)) set_on = !set_on;	// 设置校时闪烁标志
		if (time_counter >= 100)
		{
			time_counter = 0;
			time_1s_ok = 1;        					// 1s到
		}
	}
}

// T/C1 比较匹配A中断服务
interrupt [TIM1_COMPA] void timer1_compa_isr(void)
{
    if (!play_on)
    {
        note_n = 0;
        int_n = 1;
        play_on = 1;
    }
    else
    {    
        if (--int_n == 0)
        {
            TCCR1B = 0x08;
            if (note_n < Max_note)
            {
                OCR1A = t[music[note_n]];
                int_n = d[music[note_n]];
                note_n++;
                int_n = int_n * music[note_n];
                note_n++;
                TCCR1B = 0x09;
            }
            else
                play_on = 0;
        }
    }
}

void time_to_disbuffer(unsigned char *time)				// 时钟时间送显示缓冲区函数
{
	unsigned char i,j=0;
	for (i=0;i<=2;i++)
	{
		dis_buff[j++] = time[i] % 10;
     	dis_buff[j++] = time[i] / 10;
	}
}

#define key_input	PINC			// 按键输入口
#define key_mask	0b11000000	// 按键输入屏蔽码
#define key_no		0
#define key_k1		1
#define key_k2		2
#define key_state_0	0
#define key_state_1	1
#define key_state_2	2

unsigned char read_key(void)
{
	static unsigned char key_state = 0,key_press;
	unsigned char key_return = key_no;

	key_press = key_input & key_mask;	// 读按键I/O电平
	switch (key_state)
	{
		case key_state_0:				// 按键初始态
			if (key_press != key_mask) key_state = key_state_1;	
			break;				    	// 键被按下，状态转换到键确认态
		case key_state_1:				// 按键确认态
			if (key_press == (key_input & key_mask))
			{
				if (key_press == 0b01000000) key_return = key_k1;
				else if (key_press == 0b10000000) key_return = key_k2;
				key_state = key_state_2;	// 状态转换到键释放态
			}
			else
				key_state = key_state_0;	// 按键已抬起，转换到按键初始态
			break;
		case key_state_2:
			if (key_press == key_mask) key_state = key_state_0;
			break;						//按键已释放，转换到按键初始态
	}
   	return key_return;
}

void main(void)
{
	unsigned char key_temp,i;

	DDRA=0xFF;          // LED段码输出
	PORTC=0xFF;
	DDRC=0x3F;          // LED位控输出
	DDRD=0x20;          // PD5音乐播放输出

	// T/C0初始化
	OCR0 = 0xF9;		// OCR0 = 0xF9(249),(249+1)/125=2ms
	TCCR0 = 0x0A;		// 内部时钟，8分频（1M/8=125KHz），CTC模式
	// T/C1初始化	
	TCCR1A=0x40;
    TCCR1B=0x08;
	TIMSK = 0x12;		// 允许T/C1比较匹配A中断，允许T/C0比较匹配中断

	time[2] = 23; time[1] = 58; time[0] = 55;	// 设时间初值23:58:55 

	#asm("sei")			// 开放全局中断

	while (1)
	{
		if (time_1s_ok)				// 1秒到
		{
			time_1s_ok = 0;
			point_on = ~point_on;		// 秒闪烁标志
			if (++time[0] >= 60)		// 秒加1，以下为时间调整
			{
				time[0] = 0;
				if (!play_on) TCCR1B = 0x09;    // 1分钟到，播放音乐
				if (++time[1] >= 60)
				{
					time[1] = 0;
					if (++time[2] >= 24) time[2] = 0;
				}
			}
			if ((++return_time >= 20) && (clock_state != 6)) clock_state = 6;
			if (clock_state == 6) time_to_disbuffer(time);
		}
		if (key_stime_ok)				// 10ms到，键处理
		{
			key_stime_ok = 0;
			key_temp = read_key();		// 调用按键接口程序
			if (key_temp)				// 确认有键按下
            {
				return_time = 0;
				if (key_temp == key_k1)		// K1键按下，状态转换
				{
					if (++clock_state >= 7) clock_state = 0;
					if (clock_state == 0)
					{
						for (i=0;i<=2;i++)	time_set[i] = 0;
						time_to_disbuffer(time_set);
					} 
 		    		if (clock_state == 6)
 		    		{
 		    			for (i=0;i<=2;i++)	time[i] = time_set[i];
 		    			time_to_disbuffer(time);	
 		    		}
				}
				if ((clock_state != 6) && (key_temp == key_k2))		// K2键按下
				{
					if (clock_state%2)	time_set[clock_state/2] += 10;
					else
					{
						if ((time_set[clock_state/2] % 10) == 9)
					 		time_set[clock_state/2] -= 9;
					 	else
					 		time_set[clock_state/2]+=1;
					}
					if (time_set[0] >= 60) time_set[0]-= 60;	// 以下设置时间调整
					if (time_set[1] >= 60) time_set[1]-= 60;
					if (time_set[2] >= 24) time_set[2]-= 10;
			 		time_to_disbuffer(time_set);				// 设置时间送显示缓存
				}
			}
		}
	}
}