当前日期:2019年09月23日 星期一
Hi 你好,欢迎访问!登录
搜索 导航

凯特网-Think and Do it , as Soon as!

当前位置:首页 - 程序设计 - 正文
阅读模式

基于STC11F04E单片机的信号发生器之程序设计

2015-07-27 | 程序设计 | caterwang | 780°c

前机有文章已经提到过硬件电路的设计了,这里主要描述程序的设计,以下代码就是信号发生器的主体代码,其他的程序函数因与其他文章重复,故不再贴出。

/******************************************************************************
单片机:STC11F04E,晶振:22.1184MHZ
时间:2012.12.01
全新的输出波形

时间:2015.05.12
修正反三角输出波形不完整的问题
******************************************************************************/
#include "IODefine.h"
#include "DADriver.h"
#include "DADriver_main.h"
#include "math.h"
#define DEBUG 0	//调试时设为1,否则设为0
/****************************************************
*10us延时子程序
*用示波器调试过的延时程序@22.1184MHz
****************************************************/
void Del10us(unsigned n) 
 	{
	unsigned char i;
	while(n--)							  
		{
		_nop_();
		i = 50;
		while (--i);
		}
	}
void Del50us(unsigned n)
{
	unsigned char i, j;
	while(n--)
	{
		i = 1;
		j = 60;
		do
		{
			while (--j);
		} while (--i);
	}	
}
void Del100us(unsigned n)		//@22.1184MHz
{
	unsigned char i, j;
    while(n--)
		{
		_nop_();
		_nop_();
		i = 3;
		j = 34;
		do
		{
			while (--j);
		} while (--i);
	}
}
void Del2ms_DA(unsigned int k,int m,int n,int z)
{
	while(k--)
	{
		WriteTLC5615(m);
		Del100us(1);
		WriteTLC5615(z);
		Del100us(4);

		WriteTLC5615(n);
		Del100us(1);
		WriteTLC5615(z);
		Del100us(4);
	}
}
void main(void)
{
unsigned int DianYamax;		//电压
unsigned char BoXing;		//波形
unsigned int TimeCtl;
int i,m,n,k,dd;
int m1,n1,z1;			   
float sin;
SysConfig();
WriteTLC5615(512);	//上电时确保输出电压为0
#if DEBUG
//------------测试输出波形-----------------
TimeCtl = 200;//100*buf[3]
RunFlag = 1;
BoXing  = 4;
DianYamax = 100+1*9;//1023-->5V,818-->4V,409-->2V
sin = DianYamax/530.0;
//------------测试输出波形-----------------	
#endif
while(1)
	{
	 if(RunFlag) //系统处于运行状态--即治疗状态
	 {
		 switch(BoXing)
		 {
		//以下波形,疏[150HZ],密[500HZ],其他[500HZ]
		case 1:	//疏--150Hz
			WriteTLC5615(512);
			TimeOutS = 0;			 
			TimeOutD = TimeCtl/10;
			TR0 =1;
			while(TimeOutS<TimeOutD) //超时等待
				{
				WriteTLC5615(512+DianYamax);	 //0.05ms=50us	,脉冲宽度为200us
				Del50us(16);
				WriteTLC5615(512);
	
				Del50us(250);			 	//3.33ms-0.05ms=3.28ms
	
			    WriteTLC5615(512-DianYamax);	  //50us
				Del50us(16);
				WriteTLC5615(512);
	
				Del50us(250);
				}
			TR0 =0;
			WriteTLC5615(512);
		 	break;
		
		case 2:	  	//密--500Hz
			WriteTLC5615(512);
			TimeOutS = 0;			 
			TimeOutD = TimeCtl/10;
			TR0 =1;
			while(TimeOutS<TimeOutD) //超时等待
				{
				WriteTLC5615(512+DianYamax);	 //0.05ms=50us
				Del50us(16);
				WriteTLC5615(512);
	
				Del50us(62);			 		//1ms-0.05ms=0.95ms=950us
	
			    WriteTLC5615(512-DianYamax);	  //50us
				Del50us(16);
				WriteTLC5615(512);
	
				Del50us(62);			 	//1ms-0.05ms=0.95ms=950us
				}
			TR0 =0;
			WriteTLC5615(512);
			break;
			
		case 3:		//疏密
			WriteTLC5615(512);
			TimeOutS = 0;			 
			TimeOutD = TimeCtl/10;
			TR0 =1;
			while(TimeOutS<TimeOutD) //超时等待
				{
				WriteTLC5615(512+DianYamax);	 //0.05ms=50us
				Del50us(16);
				WriteTLC5615(512);
	
				Del50us(62);			 	//1ms-0.05ms=0.95ms=950us
	
			    WriteTLC5615(512-DianYamax);	  //50us
				Del50us(16);
				WriteTLC5615(512);
	
				Del50us(62);			 	//1ms-0.05ms=0.95ms=950us
				}
			TR0 =0;
			/*----------------------------------------------------*/
			WriteTLC5615(512);
			TimeOutS = 0;			 
			TimeOutD = TimeCtl/10;
			TR0 =1;
			while(TimeOutS<TimeOutD) //超时等待						
				{
				WriteTLC5615(512+DianYamax);	 //0.05ms=50us	,脉冲宽度为200us
				Del50us(16);
				WriteTLC5615(512);
	
				Del50us(250);			 	//3.33ms-0.05ms=3.28ms
	
			    WriteTLC5615(512-DianYamax);	  //50us
				Del50us(16);
				WriteTLC5615(512);
	
				Del50us(250);
				}
			TR0 =0;
			WriteTLC5615(512);
			break;
			
		case 4:	   	//正三角
			m=512;													
			n=512;
			//TimeCtl是时间,单位为ms ,DianYamax是电压最大值,k是数据更新的频率
			if(TimeCtl>=DianYamax)
				{
				k=TimeCtl/DianYamax;
				dd=1;
				}
			else
				{
				k=1;
				dd=DianYamax/TimeCtl;
				}
			for(i=0;i<TimeCtl;i++)
				{
				Del2ms_DA(1,m,n,512);  //1ms
				if((i%k)==0)	//控制多少时间更新一次数据
					{
					m+=dd;
					n-=dd;
					}
				if(m>1000)
					{
					//k=i;
					break;
					}
				}
			for(i=0;i<TimeCtl;i++)
				{
				Del2ms_DA(1,512,512,512);
				//if(i>=k)
				//	break;
				}
			break;

		case 5:		//反三角
			m=512-DianYamax;
			n=512+DianYamax;
			if(TimeCtl>=DianYamax)
				{
				k=TimeCtl/DianYamax;
				dd=1;
				}
			else
				{
				k=1;
				dd=DianYamax/TimeCtl;
				}
			for(i=0;i<TimeCtl;i++)
				{
				Del2ms_DA(1,m,n,512);  //1ms
				if((i%k)==0)	//控制多少时间更新一次数据
					{
					m+=dd;
					n-=dd;
					}
				if(m>512)
					{
					m=500;
					n=524;
					Del2ms_DA(1,m,n,512);  //1ms
					//k=i;
					break;
					}
				}
			for(i=0;i<TimeCtl;i++)
				{
				Del2ms_DA(1,512,512,512);
				//if(i>=k)
				//	break;
				}
			break;
		case 6:				//手针(Del10us)
		case 7:
			sin = DianYamax/530.0;
			m=0;
			n=64;
			m1=(int)(Sin128N[m]*(sin));
			n1=(int)(Sin128N[n]*(sin));
			z1=(int)(Sin128N[0]*(sin));
			k=TimeCtl/32;
			dd=2;
			for(i=0;i<TimeCtl;i++)
			{
				Del2ms_DA(1,m1,n1,z1);  //2ms
				if((i%k)==0)	//控制多少时间更新一次数据
					{
					m+=dd;
					n+=dd;
					m1=(int)(Sin128N[m]*(sin));
					n1=(int)(Sin128N[n]*(sin));
					}
				if(m>=64)	 //输出值不能等于64
					{
					break;
					}
			}
			if(BoXing==7)
			{
			for(i=0;i<TimeCtl;i++)
				{
				Del100us(10);
				}
			}
			break;
		default:	//无效
			BoXing = 0x00;
			DianYamax = 0x00;
			WriteTLC5615(512);
			break;
		 }
	} 
	//以下这段代码是解析主机的指令的
	if(RecOK)
		{
 		switch(Buffer[1])	 			//功能号服务程序,读取传感器
			{
			case 0x01:	 			//01号功能,读多线圈
				//DianYamax=DianYamax+Buffer[5];
				Buffer[0]=Add;			//地址
				Buffer[1]=0x01;			//功能号
				Buffer[2]=0x00;	//低八位//0x01;	//字节个数
				Buffer[3]=0x01;//高八位//0x01;	//要返回的数据
				//CRC16(Buffer,4);		//产生前五位的校验码
				CRCParity(Buffer,4);
				Buffer[4]=CRC16L;		//CRC16是低八位在前,高八位在后
				Buffer[5]=CRC16H;
				SendStrCom(Buffer,6); 	//回应上位机
				break;			
			case 0x06:	 				//DA输出的电压值及波形
				TimeCtl = Buffer[3]*100;	//时间单位为ms
				BoXing  = Buffer[4];
				DianYamax = 80+Buffer[5]*10;		//Min[50+5*22=160],Max[50+20*22=490]
				if(Buffer[5]>40)
					DianYamax=480;
				if(BoXing==0)  //如果波形值为0,则说明要停止输出波形
					{
					RunFlag=0;
					WriteTLC5615(512);
					}
				else
					RunFlag=1;
				SendStrCom(Buffer,8);
				break;
			default:  
				break;
			}
		ES		  = 1;
		RecOK	  = 0;
		//RS485_ctl = 0;				//允许接收
		//rs485_num=0;
		//RecStart = 0;
		}
		  
	}
}
//====================================串口接收中断函数 ======================================
void ReceDatCom () interrupt 4 using 3 
{
	unsigned char RecDatNum;	//要接收的数据字节数
	unsigned char ch;
	TI=0;
	RecDatNum = 8;
	if(RI)
		{
		RI=0;
		ch=SBUF;
		if(RecStart)   //已经开始接收数据
			{
			if(RecOK==0)
				{
				Buffer[rs485_num++]=ch;
				if(rs485_num>=RecDatNum)	//一帧接收完成		
					{
					rs485_num=0;
					RecStart = 0;
					CRCParity(Buffer,6); 
					if( (CRC16L==Buffer[6]) && (CRC16H==Buffer[7]) && (Buffer[0]==Add)) //CRC16校验	
						{
						ES = 0;		//接收完八字节有效数据,关串行中断
						RecOK	  = 1;
						//RS485_ctl = 1;//不再接收新数据
						}
					}
				}
			}
		else if((ch==0xEB)&&(RecOK==0))		//字符是0xEB且没有接收完成
			{
			RecStart = 1;
			}
		}
	else
		{
		TI = 0;
		}
	_nop_();
}
/**********************定时中断0服务子程序[]*******************************/
//1.每10Ms一个单位,总长时间可通过外部变量TimerCounter设置(TimerCounter*20)
void TimerCTL(void) interrupt 1   using 2 //计时,精确到10Ms
 	{
		TR0 = 0;
		if(TimeOutS<TimeOutD)
			TimeOutS++;	
		TH0	= 0xC6;				//定时器0,方式1中断,10Ms
		TL0	= 0x66;
		TR0 = 1;
	}


请使用支付宝赞助我

支付宝打赏

请使用微信赞助我

微信打赏

版权声明

欢迎转载,但注明出处,谢谢!

分享:
0
QR:  基于STC11F04E单片机的信号发生器之程序设计

扫一扫,用手机打开吧

共0条评论

暂时没有评论,你可以来抢个沙发!

发表评论

◎欢迎参与讨论,请在这里发表您的看法、交流您的观点。

展开