信号发生器 8038 51单片机

用51单片机控制8038设计的一个频率发生器，成产生正弦波，三角波，方波

/***********************************************************
共阴数码管
***********************************************************/
#include
#define uchar 	unsigned char
#define uint	unsigned int
uchar code acLEDCS[]={0x010x020x040x08};	/* 位选地址码，“0”有效，位选接的是P0口低4位 */
uchar code acLedSegCode[]={0x3f0x060x5b0x4f
						   0x660x6d0x7d0x07
						   0x7f0x6f0x770x7c};/* 段码 */
uchar acLED[4];							/* 显示缓冲区 */
char  cScanIndex=0flag=0;					/* 位选指针0~3 */
uchar bdata cBakP0 = 0xf0;
uint f=0nTimer=0speed=0;


void display（）			
{				  
  						//数据处理
	acLED[0]=acLedSegCode[speed/10/1000];	/* LED显示第1位 */
	acLED[1]=0x80|acLedSegCode[speed/10/100%10];	/* LED显示第2位 */
	acLED[2]=acLedSegCode[speed/10/10%10];	/* LED显示第3位 电机速率*/
	acLED[3]=acLedSegCode[speed/10%10];		/* LED显示第4位 */	
}

void main（）
{
	TMOD= 0x15;
	TH0 =0; 		
	TL0 = 0;			
	TR0 = 1;
	ET0 = 1;

	TH1 = （65536-49989）/256; 		
	TL1 = （65536-49989）%256;			
	TR1 = 1;
	ET1 = 1;

	EX0 = 1;				/* 允许外部中断0 */
	EA = 1;					/* 开总中断	*/
	while（1）
	{
	
		//*************************显示刷新******************
		display（）;
		P1 = 0;					/* 先清显示再换位选 */
		P0 = cBakP0 | acLEDCS[cScanIndex];		/* 送位选数据 */
		P1 = acLED[cScanIndex++];		/* 送显示数据，位选指针移位 */   
		cScanIndex &= 3;				/* 位选指针回位 */
	if（flag==1）
	{
		flag=0;
		display（）;
		f=0;
		nTimer=0;
		TH0=0; 													
        TL0=0; 
        TR0=1;
	}

	}
}

void  IntT0（） interrupt 1
{  
	f++;
}

void  IntT1（） interrupt 3 
{

	TH1 = （65536-50045）/256; 		
	TL1 = （65536-50045）%256;  
	nTimer++;
	if（nTimer == 20）
	{
		speed =f*65536+TH0*256+TL0;
		TR0=0;
		flag=1;
		//nTimer=0;
	}

}
/*void  Pint0（） interrupt 0
{
}  */

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件     259970  2010-12-05 22:33  信号发生器ILC8038\8038加程序.rar

     文件     770048  2010-11-01 22:47  信号发生器ILC8038\experiment2.Ddb

     文件      18432  2008-12-13 21:42  信号发生器ILC8038\experiment2元件清单.xls

     文件     158869  2007-09-10 22:22  信号发生器ILC8038\ICL8038.pdf

     文件    4544512  2010-12-07 14:34  信号发生器ILC8038\8038加程序\experiment2最终.Ddb

     文件       1820  2010-12-05 22:12  信号发生器ILC8038\8038加程序\51测频\51cepin.c

     文件       4862  2010-12-05 22:12  信号发生器ILC8038\8038加程序\51测频\51cepin.LST

     文件       5094  2010-12-05 22:12  信号发生器ILC8038\8038加程序\51测频\51cepin.OBJ

     文件       5087  2010-12-05 22:12  信号发生器ILC8038\8038加程序\51测频\51测频1

     文件       2131  2010-12-05 22:12  信号发生器ILC8038\8038加程序\51测频\51测频1.hex

     文件         62  2010-12-05 22:12  信号发生器ILC8038\8038加程序\51测频\51测频1.lnp

     文件       8064  2010-12-05 22:12  信号发生器ILC8038\8038加程序\51测频\51测频1.M51

     文件       1027  2010-12-06 19:42  信号发生器ILC8038\8038加程序\51测频\51测频1.Opt

     文件        175  2010-12-06 19:42  信号发生器ILC8038\8038加程序\51测频\51测频1.plg

     文件       2154  2010-11-04 20:54  信号发生器ILC8038\8038加程序\51测频\51测频1.Uv2

     文件       1029  2010-12-05 22:13  信号发生器ILC8038\8038加程序\51测频\51测频1_Opt.Bak

     文件       2154  2010-11-04 18:44  信号发生器ILC8038\8038加程序\51测频\51测频1_Uv2.Bak

     文件       6376  2005-03-22 15:22  信号发生器ILC8038\8038加程序\51测频\STARTUP.A51

     文件      14048  2010-12-05 22:12  信号发生器ILC8038\8038加程序\51测频\STARTUP.LST

     文件        758  2010-12-05 22:12  信号发生器ILC8038\8038加程序\51测频\STARTUP.OBJ

     目录          0  2011-03-27 16:32  信号发生器ILC8038\8038加程序\51测频

     目录          0  2011-03-27 16:32  信号发生器ILC8038\8038加程序

     目录          0  2011-03-27 16:32  信号发生器ILC8038

----------- ---------  ---------- -----  ----

              5806672                    23