tycl.c

我在公司做的基于430F206的互感器现场效验仪

/*#include	<C:\TDS-EMU2XX\c2000\cgtools\include\string.h> 
#include	<C:\TDS-EMU2XX\c2000\cgtools\include\stdlib.h> */
#include	<C:\TDS-EMU2XX\c2000\cgtools\include\math.h>
#include	<C:\TDS-EMU2XX\tycl\tyclh.h>

/*-------------------------------------------------*/
int	nTbSysTime,tt;
int j,k,iii=0;
/*-------------------------------------------------*/
void InitSystem();  
/*-------------------------------------------------*/ 
void main()
{
Initsysdata();  /*this is a dome ,please del*/
	WatchDog;
	InitSystem();
	WatchDog;
	Current1=3.12;

while(1)
{  

datatest(&tt); /*this is a dome ,please del*/   
	asm("	setc	intm");
	for(j=0;j<0xffff;j++)
	for(k=0;k<0x10;k++);
	Current1=Current1+iii;
	iii++; 
	
	asm("	clrc	intm");
    
    for(j=0;j<0xffff;j++)
	SysTb(&nTbSysTime,1500);
	
	WatchDog;

}}/*-------------------------------------------------*/
void InitSystem()
{
int	i;
volatile unsigned int *reg_p;
	asm("	setc    INTM");
	asm("	clrc    CNF");
	asm("	setc	XF"  );
	*reg_p=0x0000;
	reg_p=(unsigned int *)reg_ifr;
	*reg_p=0xffff;
/*	reg_pmst &=0xffe1;
	reg_pmst |=0xffe4;
*/	reg_wsgr=0x0ffff;
	
	
	TbTxInit();
    	  	
	reg_prd=2500;		/*TIMER */
	reg_tcr=0x0c2f;	    /*1100 0010 0111*/
	
	reg_p=(unsigned int *)reg_greg;
	*reg_p=0x0000;
	reg_p=(unsigned int *)reg_ifr;
	*reg_p=0xffff;	
	reg_p=(unsigned int *)reg_imr;
	*reg_p=0x001c;	
	reg_icr=0x0010;
	nTbSysTime=0x5555;
    asm("	clrc    INTM");
}/*-------------------------------------------------*/
interrupt	void time_int()
{
	reg_tcr=0x0c27; 
	nTbSysTime++;
	tt++;
}
/*---------------------------------*/