/*************************************

* 方波頻率發(fā)生器 *
* 功 能：產(chǎn)生從100HZ到999KHZ方波 *
* 工作環(huán)境: ICCAVR網(wǎng)站M16學習板 *
* 版 本：V1.0 *
* 芯 片：Mega16L *
* 時鐘頻率：外部7.3728Mhz *
*************************************/

#include
#include

#define uchar unsigned char
#define uint unsigned int
#define ulong unsigned long

uchar s[4]={9,9,9,9};
uchar e;
uchar g,b,c=3;

//定義顯示代碼:0,1,2,3,4,5,6,7,8,9
uchar disp[] = {0xC0,0xF9,0xA4,0xB0,0x99,0x92,0x82,0xF8,0x80,0x90};

//端口初始化函數(shù)
void port_init(void)
{
DDRA=0x00;
PORTA=0xFF;
DDRB=0xFF;
PORTB=0x00;
DDRC=0x00;
PORTC=0x00;
DDRD=0xFF;
PORTD=0xFF;
}
/************************************
* 延時函數(shù)：7.3M時鐘時為MS *
************************************/
void delay_ms(uint b)
{
uint a;
for(;b;b--)
{
for (a = 1144; a; a--)
{
;
}
}
}

/*SPI接口初始化函數(shù)*/
void SPI_MasterInit(void)
{
DDRB|=(1<SPCR =(1<}

/*SPI數(shù)據(jù)發(fā)送函數(shù)*/
void SPI_MasterTransmit(uchar i)
{
SPDR = i;/* 啟動數(shù)據(jù)傳輸*/
while (!(SPSR & (1<{
;
}
}

/*595數(shù)據(jù)輸出函數(shù)*/
void SPI_595_Out(uchar i)
{
PORTB &= ~(1 << 4); /*準備鎖存*/
SPI_MasterTransmit(i);
PORTB |= (1 << 4); /*鎖存數(shù)據(jù)*/
}

/* 定時器0中斷配置函數(shù)
預分頻數(shù):256
定時時間: 4mSec
實際時間: 4mSec (0%)
功能：用于LED數(shù)碼管顯示掃描*/
void timer0_init(void)
{
TCCR0 = 0x00; //stop
TCNT0 = 0x83; //set count
TCCR0 = 0x04; //start timer
}
/* 定時器0中斷入口函數(shù) */
#pragma interrupt_handler timer0_ovf_isr:iv_TIMER0_OVF
void timer0_ovf_isr(void)
{
TCNT0 = 0x83; //重裝初值
PORTB=255; //先關顯示
if(e==0)
{
if(b==1)
{
g++;
if(g<30)SPI_595_Out((disp[s[e]])&0x7F); //送顯示數(shù)據(jù)
else SPI_595_Out(disp[s[e]]); //送顯示數(shù)據(jù)
PORTB=~BIT(e); //再開相應位顯示
if(g>=60)g=0;
}
else
{
SPI_595_Out(disp[s[e]]); //送顯示數(shù)據(jù)
PORTB=~BIT(e); //再開相應位顯示
}
}
else
{
if(c!=0)
{
if(e==(4-c))SPI_595_Out(disp[s[e]]&0x7F); //送顯示數(shù)據(jù)
else SPI_595_Out(disp[s[e]]); //送顯示數(shù)據(jù)
PORTB=~BIT(e); //再開相應位顯示
}
else
{
SPI_595_Out(disp[s[e]]); //送顯示數(shù)據(jù)
PORTB=~BIT(e); //再開相應位顯示
}
}
if(e++>3)e=0; //準備下一位顯示
}
//------定時器1初始化函數(shù)-------
void timer1_init(void) //定時器1初始化：1秒定時，預分頻256
{
TCCR1A = 0x40;//將T/C1配置為CTC模式，OC1A取反
OCR1A=1;
TCCR1B=0x09;
}

//-------定時器初始化函數(shù)-------
void timer_init(void)
{
CLI(); //先關閉所有中斷
timer0_init(); //設定定時器
timer1_init();

MCUCR = 0x00;
GICR = 0x00;
TIMSK = 0x01 //允許定時器0中斷
SEI(); //開總中斷
}

//--------頻率計算函數(shù)----------
void f_js(void)
{
ulong m;
m=s[0]+s[1]*10+s[2]*100+s[3]*1000;
switch(c)
{
case 0:break;
case 1:m=m;break;
case 2:m=m*10;break;
case 3:m=m*100;break;
default:break;
}
m=3686400/m;
OCR1A=m;
}
//-----------主函數(shù)-------------
void main(void)
{
uchar a;
uchar key;
port_init();
timer_init();
SPI_MasterInit(); //初始化SPI接口

f_js(); //計算頻率并輸出

while(1)
{
if((~PINA)!=0)
{
key=~PINA;
delay_ms(10);
if(~(PINA)==key)
{
switch(key)
{
case 0x01:
if(b==0)
b=1; //置調(diào)整標志
else
{
b=0; //清調(diào)整標志
f_js(); //計算頻率并輸出
}
break;
case 0x02:
if(b==1)
{
c++; //換檔
if(c>3)c=0;
}
break;
case 0x04:
if(b==1)
{
s[3]--; //最高位減：0-9之間
if(s[3]>=10)s[3]=9;
}
break;
case 0x08:
if(b==1)
{
s[3]++; //最高位加
if(s[3]>=10)s[3]=0;
}
break;
case 0x10:
if(b==1)
{
s[2]--; //次高位
if((c==0)&&(s[3]==0))
if(s[2]==0)s[2]=9;
if(c!=0)
if(s[2]>=10)s[2]=9;
}
break;
case 0x20:
if(b==1)
{
s[2]++; //次高位
if((c==0)&&(s[3]==0))
if(s[2]>=10)s[2]=1;
if(c!=0)
if(s[2]>=10)s[2]=0;
}
break;
case 0x40:
if(b==1)
{
s[1]++; //末2位
if(s[1]>=10)s[1]=0;
}
break;
case 0x80:
if(b==1)
{
s[0]++; //末位
if(s[0]>=10)s[0]=0;
}
break;
default:break;
}
}
while((~PINA)!=0)delay_ms(10);
}
}
}