main.c

主要是DSP的程序,能够控制闪烁的LED。在2407的平台上面开发的！

/*Main.c*/ 
/*按键与走马灯程序*/
#include "global.c" 
void SystemInit();
void Timer1Init(); 
void KickDog();  
void KeyLed();
unsigned int numled0=200,numkey=0,numled=0,numled_back=200;   
unsigned int t0=0,t0_back=0,test;   
unsigned int PB6_FLAG=0;

main()
{  

   SystemInit();         	//系统初始化
   
   MCRA=MCRA & 0x80FF; 	    //IOPB0-6设为IO口模式
   PBDATDIR=0xBFC2;   	    //所有LED=0,并置IOPB6为输入口 
   
   Timer1Init();          	//定时器初始化
   asm(" CLRC INTM ");
   while(1)
   {
   		KeyLed();
   } 
   
}

void SystemInit() 
{  
 
	asm(" SETC	INTM ");	/* 关闭总中断 */
	asm(" CLRC  SXM  ");	/* 禁止符号位扩展 */ 
	asm(" CLRC  CNF  ");    /* B0块映射为 on-chip DARAM*/
	asm(" CLRC  OVM  ");    /* 累加器结果正常溢出*/
	SCSR1=0x83FE;         	/* 系统时钟CLKOUT=20*2=40M */
	WDCR=0x006F;			/* 禁止看门狗,看门狗时钟64分频 */ 
	KickDog();    			/* 初始化看门狗 */  
    IFR=0xFFFF;				/* 清除中断标志 */
    IMR=0x0002;				/* 打开中断2*/      
    
}  

void Timer1Init()           
{ 

    EVAIMRA=0x0080;			//  定时器1周期中断使能 
    EVAIFRA=0xFFFF;			//  清除中断标志 
    GPTCONA=0x0000;
	T1PR=2500;				//  定时器1初值,定时0.4us*2500=1ms 			
	T1CNT=0;
	T1CON=0x144E;           //增模式, TPS系数40M/16=2.5M,T1使能
				
}  

void KeyLed()
{   
   
   if((numled!=numled_back)&&((numled%200)==0))   
	{ numled_back=numled;  
    
   	  if(numkey==1)
   		{	PBDATDIR=PBDATDIR & 0xFFC7;        //将其他的led灭掉
			if((PBDATDIR & 0x0004)==0x0004) 
				PBDATDIR=PBDATDIR & 0xFFFB;    //IOPB2=0;LED1灭  
			else
				PBDATDIR=PBDATDIR |0x0404;     //IOPB2=1;LED1亮 
		}
      if(numkey==2)
   		{	PBDATDIR=PBDATDIR & 0xFFCB;
			if((PBDATDIR & 0x0008)==0x0008) 
				PBDATDIR=PBDATDIR & 0xFFF7;    //IOPB3=0;LED2灭  
			else
				PBDATDIR=PBDATDIR |0x0808;     //IOPB3=1;LED2亮 
		}
      if(numkey==3)
   		{	PBDATDIR=PBDATDIR & 0xFFD3;
			if((PBDATDIR & 0x0010)==0x0010) 
				PBDATDIR=PBDATDIR & 0xFFEF;    //IOPB4=0;LED3灭  
			else
				PBDATDIR=PBDATDIR |0x1010;     //IOPB4=1;LED3亮 
		}
      if(numkey==4)
   		{	PBDATDIR=PBDATDIR & 0xFFE3;	
			if((PBDATDIR & 0x0020)==0x0020) 
				PBDATDIR=PBDATDIR & 0xFFDF;    //IOPB5=0;LED4灭  
			else
				PBDATDIR=PBDATDIR |0x2020;     //IOPB5=1;LED4亮 
		} 
      if(numkey==5)
   		{	
   		
			if(numled==400)       //200ms    
			{
			    PBDATDIR=PBDATDIR & 0xFFC3;    //IOPB2,3,4,5=0;LED全灭  
   			}
   			if(numled==600)       //400ms  
   			  {
   			    PBDATDIR=PBDATDIR & 0xFFC3;    //IOPB2,3,4,5=0;LED全灭  
				PBDATDIR=PBDATDIR | 0x0404;    //IOPB2=1;LED1亮    				
			  }  
			if(numled==800)       //600ms  
			  {
				PBDATDIR=PBDATDIR & 0xFFC3;    //IOPB2,3,4,5=0;LED全灭  
				PBDATDIR=PBDATDIR | 0x0808;    //IOPB3=1;LED2亮 
			  }
			if(numled==1000)       //800ms    
			  {
				PBDATDIR=PBDATDIR & 0xFFC3;    //IOPB2,3,4,5=0;LED全灭  
				PBDATDIR=PBDATDIR | 0x1010;    //IOPB4=1;LED3亮 
			  }
			if(numled==1200)       //1000ms  
			  { 
			  	PBDATDIR=PBDATDIR & 0xFFC3;    //IOPB2,3,4,5=0;LED全灭  
				PBDATDIR=PBDATDIR | 0x2020;    //IOPB5=1;LED4亮 
			  }  
			if(numled==1400)       //1200ms  
			    PBDATDIR=PBDATDIR | 0x3c3c;    //IOPB2,3,4,5=1;LED全亮
		}      
	if(numled>=1400)   numled=1;	
	
    }  
    
} 
void c_int2()               /*定时器1中断服务程序*/
{

    if(PIVR!=0x27)
		{  	asm(" CLRC INTM ");
			return;
		}
	T1CNT=0; 
	numled++;
	t0++;

	numled0--;  

	if(numled0==0)
	{
		numled0=200;
		if((PBDATDIR & 0x0001)==0x0001) 
			PBDATDIR=PBDATDIR & 0xFFFE;    	//IOPB0=0;LED灭  
		else
			PBDATDIR=PBDATDIR |0x0101;     	//IOPB0=1;LED亮 
	} 
	if((PB6_FLAG==0)&&((t0%50)==0))         //每50ms查询一次按键
	{
		if((PBDATDIR & 0x0040)!=0x0040)		//若有按键情况,IOPB6=0 
		{
			t0_back=t0;  
			PB6_FLAG=1;  
		}
	}	  
	if(t0==(t0_back+100))     //按键滤波,100ms后查询仍然为低电平,则认可按键有效
	{ 
	  	t0_back=0;
		if(PB6_FLAG==1)   
		{ 
		  	PB6_FLAG=0;
   		  	if((PBDATDIR & 0x0040)!=0x0040)	//若有按键仍为低,IOPB6=0 
	   			numkey++; 
	    	if(numkey==6)  numkey=1;        //按键标志循环1~5
	    }			
	}  
    
	EVAIFRA=0x80; 
	asm(" CLRC	INTM ");   
	
}  

void KickDog()				/*踢除看门狗 */
{
	WDKEY=0x5555;
	WDKEY=0xAAAA;
}