main.c

Proteus在MCS-51％26ARM7系统中的应用百例 Proteus在MCS-51％26ARM7系统中的应用百例

/****************************************************************************
* File: main.c
* 功能：向LCD输出计数值
****************************************************************************/
#include  "config.h"
#define rs (1<<8)
#define rw (1<<9)
#define en (1<<10)
#define busy (1<<7)		

uint8 BCD[6];			//十位二进制的显示码分别是千百十个位的显示

uint16 count=0;
/****************************************************************************
* File: enable_irq()
* 功能：中断使能函数
****************************************************************************/
__inline void enable_irq()
	{
	uint8 tmp;
	__asm
		{
		MRS tmp,CPSR
		BIC tmp,tmp,#0x80
		MSR CPSR_c,tmp
		}
	}


void delay(uint32  dly);
void timer0_init(void);
void __irq timerInt(void);
void int_init(void);
void ChkBusy(void);
void WrOp(uint8 dat);
void WrDat(uint8 dat);	
void lcd_init(void);
void DisText(uint8 addr,uint8 *p);
void ShowInt(uint8 addr,uint16 num);		
/****************************************************************************
* File: main()
* 功能：显示计数值
****************************************************************************/
int  main(void)
{
	IODIR=0x7ff;		//设置为输出
	IOCLR=0x7ff;
	lcd_init();
	
	int_init();
	timer0_init();
	ShowInt(0x80,count++);
	enable_irq();
	while(1);
}
/****************************************************************************
* File:delay()
* 功能：延时
****************************************************************************/
void  delay(uint32  dly)
{  uint32  i;

   for(; dly>0; dly--) 
      for(i=0; i<500; i++);
}

/****************************************************************************
* File:timer0_init
* 功能：定时器0初始化
****************************************************************************/
void timer0_init(void)
{//定时器计数器0设置,晶振为12M,1秒要运行1000000个周期,
	T0PR=1000;		//预分频寄存器
	T0MR0=1000;		//匹配值
	T0MCR=0x00000003;		//开放匹配0中断
	T0TCR=0x00000003;		//T0PC和T0TC复位
	T0TCR=0x00000001;		//T0PC和T0TC复位
}
/****************************************************************************
* File:timerInt
* 功能：中断处理程序
****************************************************************************/

void __irq timerInt(void)
{
	ShowInt(0x80,count++);
	VICVectAddr=0;
	T0IR=0x00000001;  
}

/****************************************************************************
* File:int_init()
* 功能：中断初始化
****************************************************************************/
void int_init(void)
{
	VICIntSelect=0x00000000;
	VICIntEnable=0x00000010;
	VICVectCntl0=0x00000024;
	VICVectAddr0=(int)timerInt;
}

/****************************************************************************
* 名称：ChkBusy()
* 功能：检查总线是否忙
****************************************************************************/
void ChkBusy()
{
	IODIR=0x700;
	while(1)
	{
		IOCLR=rs;
		IOSET=rw;
		IOSET=en;
		if(!(IOPIN & busy))break;
		IOCLR=en;
	}
	IODIR=0x7ff;
}
/****************************************************************************
* 名称：WrOp()
* 功能：写函数
****************************************************************************/
void WrOp(uint8 dat)
{
	ChkBusy();
	IOCLR=rs;		//全部清零
	IOCLR=rw;
	IOCLR=0xff;		//先清零
	IOSET=dat;		//再送数
	IOSET=en;
	IOCLR=en;
}
/****************************************************************************
* 名称：WrDat()
* 功能：写数据函数
****************************************************************************/
void WrDat(uint8 dat)	
{
	ChkBusy();
	IOSET=rs;
	IOCLR=rw;
	IOCLR=0xff;		//先清零
	IOSET=dat;		//再送数
	IOSET=en;
	IOCLR=en;
}
/****************************************************************************
* 名称：lcd_init()
* 功能：lcd初始化函数
****************************************************************************/
void lcd_init(void)
{
	WrOp(0x38);			
	WrOp(0x06);			//光标加1
	WrOp(0x0c);			//开显示
}
/****************************************************************************
* 名称：DisText()
* 功能：显示文本函数
****************************************************************************/
void DisText(uint8 addr,uint8 *p)
{
	WrOp(addr);
	while(*p !='\0')WrDat(*(p++));
}

void ShowInt(uint8 addr,uint16 num)			//在addr处显示数字num
{//将num转化成五个BCD码存放在全局数组BCD[5]中
	uint8 i;
	for(i=5;i>0;i--)       //将NUM数据转化成ASCII码,如521会转化为00521
	{
       	  BCD[i-1]=(uint8)(num%10+0x30);     //取出最低位
       	  num/=10;                           //去掉最低位
    }
    i=0;
	while(BCD[i] ==0x30 && i<4) BCD[i++]=' ';    //NUM转换成数组存放,但还没有加上小数点
	BCD[5]='\0';
	DisText(addr,BCD);
}