⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 复件 current.c.bak

📁 基于485的51单片机多机通讯程序
💻 BAK
📖 第 1 页 / 共 2 页
字号:
//#pragma la
#include <current.h>
sbit con_hf=P4^0;
sbit con_water=P4^1;
sbit con_gas1=P4^6;
sbit con_gas2=P4^7;
sbit con_avc=P4^2;
sbit current_out=P4^4;
sbit current_enable=P4^5;
sbit send_enable=P3^4;

xdata unsigned char sbuffer[7]	_at_ 0x6000;
xdata unsigned char rbuffer[55] _at_ 0x6007;
xdata unsigned int  *point 	_at_ 0x603E;
xdata unsigned int  adl		_at_ 0x6040;
xdata unsigned int  adh		_at_ 0x6042;
xdata unsigned int  ad		_at_ 0x6044;
xdata unsigned int  numbers	_at_ 0x6046;
xdata unsigned int  I1		_at_ 0x6048;
xdata unsigned int  I2		_at_ 0x604A;
xdata unsigned int  ad_v	_at_ 0x604C;
xdata unsigned int  ad_i	_at_ 0x604E;
xdata unsigned long delt	_at_ 0x6050;
xdata unsigned long delt1	_at_ 0x6054;
xdata unsigned long c_t0	_at_ 0x6058;
xdata unsigned long AD1		_at_ 0x605C;
xdata unsigned long AD2		_at_ 0x6060;
xdata unsigned long AD3		_at_ 0x6064;
xdata unsigned long AD4		_at_ 0x6068;
xdata unsigned long AD5		_at_ 0x606C;
xdata unsigned long da		_at_ 0x6070;
xdata unsigned char c_cm1	_at_ 0x6074;
xdata unsigned char n_pulse	_at_ 0x6076;
xdata unsigned char n_base	_at_ 0x6078;

unsigned char	COMM,SLA,FF,GET,S_ANSW,R_ANSW,POINTER0,POINTER1,work,RSUM,SSUM,
		err,tab2,tab3,c_adc,c_t1,p_sec,s_byte_nums,r_byte_nums,
		nonce_sec,c_cm2,avc_ok;
bit receive_p_out,receive_p_in,demand,in_sector,YOUHU,ad_finish,
    pre_melt_ok,igniting,new_sec,close_gas1,close_gas2,i_v,decrease,overtime,
    start,urgent_stop,edge,resend,send,called,open_gas1,open_gas2,close_gas1_ok,
    close_gas2_ok,close_gas_ok,ans,i_slope_ok,need_para,to_begin,ignit_ok,
    current_add,current_dec;

void delay(unsigned int num)
{
  data unsigned int i,ii;
  for(i=0;i<num;i++)
   {
     for(ii=0;ii<255;ii++);
   }
}

void start_i2()
{
   data unsigned int time;
   P1_6=1;		//SCL
   P1_7=1;		//SDA
   S1CON=0x47;		//ENS1=1 STA=0 STO=0 SI=0 AA=1
   PS1=1;FF=0;
   EA=1;
   ES1=1;
   STA=1;
   time=0;
   do
     {
      time++;
      if(time>10000)
          {
           FF=1;
          }
     }while(FF==0);
   FF=0;
   ES1=0;
}

void start_i2a()
{
   P1_6=1;		//SCL
   P1_7=1;		//SDA
   S1CON=0x47;		//ENS1=1 STA=0 STO=0 SI=0 AA=1
   PS1=1;
   EA=1;
   ES1=1;
   STA=1;
}

void ini_sbuf(unsigned char a,b,c,d,e,f,g)
{
	sbuffer[0]=a;
	sbuffer[1]=b;
	sbuffer[2]=c;
	sbuffer[3]=d;
	sbuffer[4]=e;
	sbuffer[5]=f;
	sbuffer[6]=g;
}

unsigned char get_byte_nums(unsigned char type)
{
	unsigned char numbers;
	switch(type)
	{
		case	infor_sec:
		case	command:
		case	program:
		case	answer:		numbers=4;
					break;
		case	err_infor:
		case	parameter1:	numbers=5;
					break;
		case	parameter:
		case	infor:		numbers=6;
					break;
		case	parameter2:	numbers=7;
					break;
		case	call_result:	numbers=8;
					break;
		case	p_out_sec:	numbers=55;
					break;
		case	p_in_sec:	numbers=24;
					break;
		case	edit_sec:	numbers=64;
					break;
		default:		break;
	}
	return numbers;
}

void TR_noans()
{
        REN=0;
        POINTER0=0;
	SSUM=0;
	send=1;
	send_enable=0;
	c_t1=0;
	TR1=1;
	while(POINTER0<s_byte_nums);
	TR1=0;
	send_enable=1;
        REN=1;
}

void err_operate()
{
	if(YOUHU)
		current_enable=0;						//关电源使能
	IM8=0;
	IM4=0;
	IB8=0;
	IB4=0;
	UPD=0;
	ini_sbuf(M_ALL,err_infor,0,0,0,0,0);
	switch(err)
	{
		case 1:						//发送超时
		case 2:						//接收超时
		case 3:		sbuffer[1]=commuFail;break;	//三次校验和错误				//通讯出错
		case 4:		sbuffer[1]=IgnitFail;break;	//引弧失败
		case 5:		sbuffer[1]=systemErr;break;	//电源出错
		case 6:		sbuffer[1]=overTemp;break;	//过温
		case 7:		sbuffer[1]=lackWater;break;	//缺水
		case 8:		sbuffer[1]=lackGas1;break;	//缺气1
		case 9:		sbuffer[1]=lackGas2;break;	//缺气2
	}
	s_byte_nums=get_byte_nums(err_infor);
	TR_noans();
//	urgent_stop=1;
}

void TR_ans()
{
	ans=1;
	REN=0;
	POINTER1=0;
	RSUM=0;
//	TB8=1;
	POINTER0=0;
	SSUM=0;
	send=1;
	send_enable=0;
	c_t1=0;
	TR1=1;
	while(POINTER0<s_byte_nums);
	TR1=0;
	send_enable=1;
	if(overtime==1)
		overtime=0;

	REN=1;
	send=0;
	c_t1=0;
//	TR1=1;
	while(POINTER1<r_byte_nums&&overtime==0);
	TR1=0;
	POINTER1=0;
	RSUM=0;
	if(overtime==1)
	{
		err=3;
		err_operate();
		overtime=0;
	}
	ans=0;
}

void com_type()
{
	switch(rbuffer[2])
  	{
		case com_calling:	called=1;break;
		case com_start:		start=1;break;
		case com_decrease:	decrease=1;break;	//衰减
		case com_current_add:	current_add=1;break;	//电流加
		case com_current_dec:	current_dec=1;break;	//电流减
		case com_demand:	demand=1;break;
		case com_open_gas1:	open_gas1=1;break;
		case com_open_gas2:	open_gas2=1;break;
		case com_close_gas1:	close_gas1=1;break;
		case com_close_gas2:	close_gas2=1;break;
		case com_ignit:		igniting=1;break;
		case com_ignit_ok:	ignit_ok=1;break;
		case com_i_slope_ok:	i_slope_ok=1;break;
//		case com_ignit_fail:	ignit_fail=1;break;
		case com_pre_melt_ok:	pre_melt_ok=1;break;
		case com_need_para:	need_para=1;break;
		case com_goto_begin:	to_begin=1;break;
		default:		 break;
	}
}

void data_type()						//对接收到的数据分辨类型
{
	switch(rbuffer[1])
	{
		case command:	com_type();break;

		case answer:	R_ANSW=rbuffer[1];break;

		case infor_sec:	nonce_sec=rbuffer[2];break;

		case edit_sec:	if(in_sector==0)
				{
					nonce_sec=rbuffer[2];
					in_sector=1;
				}break;
		case infor:	{
					if(rbuffer[2]==com_sector)
					{
						nonce_sec=rbuffer[3];
						if(in_sector==0)
							in_sector=1;
						if(in_sector==1&&new_sec==0)
							new_sec=1;
					}
					if(rbuffer[2]==com_weld_simu)//模拟/焊接
					{
//						new_switch=1;
						YOUHU=rbuffer[3];
					}break;
				}break;

		case p_out_sec:	receive_p_out=1;break;

		case p_in_sec:	{
					nonce_sec=rbuffer[2];
					receive_p_in=1;
				}break;
		default:	break;
	}
}

void answer_judge()
{
	unsigned char c_err;
	c_err=0;
resend:	if(R_ANSW!=OK)
	{
		c_err++;
		if(c_err<3)
		{
			TR_ans();
			goto resend;
		}
		else
		{
			err=3;
			err_operate();
		}
	}
	else
		R_ANSW=0;

}

void start_t2()
{
	TM2CON=0x8D;    //16位溢出,分频系数8,f/12
	EA=1;
	TM2IR=0;
}

void EX0_INT (void) interrupt 0			//急停
{
	if(YOUHU)
	{
		current_enable=0;		//关电源使能
		con_hf=1;			//关高频使能
	}
	EA=0;
	urgent_stop=1;
}

void T0_INT (void) interrupt 1
{
	c_t0++;
}
/*
void EX1_INT(void) interrupt 2		//错误检测
{
	if(YOUHU)
		current_enable=0;			//关电源使能
	if(P5^3==0)
	{
		err=5;			//电源出错
		err_operate();
	}
	if(P5^4==0)
	{
		err=6;			//过温
		err_operate();
	}
	if(P5^5==0)
	{
		err=7;			//缺水
		err_operate();
	}
	if(P5^6==0)
	{
		err=8;			//缺气1
		err_operate();
	}
	if(P5^7==0)
	{
		err=9;			//缺气2
		err_operate();
	}
}
*/
void T1_INT (void) interrupt 3
{
	c_t1++;
	if(send==1)
	{
		if(c_t1==7)
		{
			S0BUF=sbuffer[POINTER0];
			c_t1=0;
		}
	}
	else
	{
		if(c_t1==100)
		{
			TR1=0;
			overtime=1;
		}
	}
}

void TR_INT (void) interrupt 4					//串行口中断
{
	EA=0;							//关中断
	if(TI==1)						//发送完成
	{
		TI=0;
		POINTER0++;					//发送缓冲指针加1
		if(POINTER0<s_byte_nums-1)
			SSUM=SSUM+sbuffer[POINTER0];	//6个数据字节求和
		else
			sbuffer[s_byte_nums-1]=SSUM+sbuffer[0];	//数据和加地址生成校验码
		if(POINTER0==s_byte_nums)
			REN=1;
	}

	if(RI==1)						//接收完成
	{
		RI=0;
		POINTER1++;				//接收缓冲指针加1
		rbuffer[POINTER1-1]=S0BUF;		//从接收缓冲读出数据
		if(rbuffer[0]==M_current||rbuffer[0]==M_ALL||rbuffer[0]==M_current_RW)
		{
			SM2=0;
			if(POINTER1==2)				//获取字节个数
				r_byte_nums=get_byte_nums(rbuffer[1]);
			if(POINTER1<r_byte_nums)
				RSUM=RSUM+rbuffer[POINTER1-1];	//生成校验码
			else
			{
				SM2=1;
				if(RSUM==rbuffer[r_byte_nums-1])
				{
					if(ans==0)
					{
						POINTER1=0;
						RSUM=0;
					}
					S_ANSW=OK;
					data_type();
				}
				else
				{
					S_ANSW=FAIL;
					if(resend==0)
						resend=1;
				}
			}
		}
		else
			POINTER1=0;
	}
	EA=1;                                       //开中断
}

void S1_int (void) interrupt 5      //I2C
{
	ES1=0;
	if(S1STA==0x00)
	{
		FF=1;
		S1CON=0xD5; //STA=0   STO=1    SI=0     AA=1
	}
	if(S1STA==0x08)
	{
		S1DAT=SLA;
		S1CON=0xC5; //STA=0   STO=0    SI=0     AA=1
	}
	if(S1STA==0x10)
	{
		S1DAT=SLA;
		S1CON=0xC5; //STA=0   STO=0    SI=0     AA=1
	}
	if(S1STA==0x18)
	{
		S1DAT=COMM;
		S1CON=0xC5; //STA=0   STO=0    SI=0     AA=1
	}
	if(S1STA==0x20)
	{
		FF=1;
		S1CON=0xD5; //STA=0   STO=1    SI=0     AA=1
	}
	if(S1STA==0x28)
	{
		S1CON=0xD5; //STA=0   STO=1    SI=0     AA=1
		FF=1;
	}
	if(S1STA==0x30)
	{
		FF=1;
		S1CON=0xD5; //STA=0   STO=1    SI=0     AA=1
	}
	if(S1STA==0x38)
		S1CON=0xE5; //STA=1   STO=0    SI=0     AA=1
	if(S1STA==0x40)
		S1CON=0xC5; //STA=0   STO=0    SI=0     AA=1
	if(S1STA==0x48)
	{
		FF=1;
		S1CON=0xD5; //STA=0   STO=1    SI=0     AA=1
	}
	if(S1STA==0x50)
	{
		GET=S1DAT;
		S1CON=0xC1; //STA=0   STO=0    SI=0     AA=0
	}
	if(S1STA==0x58)
	{
		FF=1;
		S1CON=0xD5; //STA=0   STO=1   SI=0     AA=1
	}
	ES1=1;
}

void CT0_int (void) interrupt 6			//横摆使能输入
{
	CTI0=0;
	CTCON=CTCON&0XFC;			//禁止上升、下降
	IEN1=IEN1&0xFE;
	if(edge==0)
	{
		current_out=1;					//峰值
		IEN1=IEN1&0XDF;				//禁止CM1,停峰、基时间
		edge=1;
		CTCON=CTCON|0X01;			//CT0上升沿
	}
	else
	{
		edge=0;
		current_out=0;
		CTCON=CTCON|0X02;			//CT0下降沿
		CML1=TML2+0XE2;		//峰值时间
		if(CML1<TML2)
			CMH1=(TMH2+1)+0X04;
		else
			CMH1=TMH2+0X04;
		c_cm1=0;
		IEN1=IEN1|0X20;				//允许CM1,峰、基时间
	}
	IEN1=IEN1|0x01;
}

void CT2_int (void) interrupt 8			//采样保持脉冲
{
	CTI2=0;
	if(current_out==1&&ad_finish==1)
	{
		ad_finish=0;			//采样进行标志
		if(i_v==0)
			ADCON=0x09;		//启动电流采样
		else
			ADCON=0X08;		//启动电压采样
	}
}

void ADC_int (void) interrupt 10		//AD采样中断
{
	ADCON=ADCON&0xEF;			//清ADC中断标志
	CTCON=CTCON&0XCF;
	IEN1=IEN1&0XFB;				//禁止CT2
	c_adc++;
	adh=ADCH;
	adl=ADCON&0xC0;
	adh=adh<<2;
	adl=adl>>6;
	ad=adh+adl;
	da=ad;
	AD5=(da*5000)/0x3FF;

	if(i_v==0)						//电流采样
	{
		ad_i=10000*AD5/4920;
		if(ad_i<50)					//电流小于5.0A
			tab2++;
		if(c_adc==1)
		{
			AD1=ad_i;
			AD2=ad_i;
			AD3=ad_i;
			AD4=ad_i;
		}
		else
		{
			ad_i=(ad_i+AD1+AD2+AD3+AD4)/5;
	          	AD1=AD2;
	          	AD2=AD3;
	          	AD3=AD4;
	          	AD4=ad_i;
		}
	}
	else							//电压采样
	{

		ad_v=1000*AD5/4920;
		if(ad_v<25)
			tab3++;
		if(c_adc==6)
		{
			AD1=ad_v;
			AD2=ad_v;
			AD3=ad_v;
			AD4=ad_v;
		}
		else
		{
			ad_v=(ad_v+AD1+AD2+AD3+AD4)/5;
	          	AD1=AD2;
	          	AD2=AD3;
	          	AD3=AD4;
	          	AD4=ad_v;
		}				//电压小于2.5V
	}

/*
	if((tab2>=5||tab3>=5)&&work==3)
	{
//		err_operate();
	}
	else
	{
*/
		if(c_adc<=5)					//电流采样
		{
			if(c_adc==5)				//电流——电压
			{
				i_v=1;				//电压采样标志
				AD1=0;
				AD2=0;
				AD3=0;
				AD4=0;
				tab2=0;
			}
			ad_finish=1;
			CTCON=CTCON|0X20;
			IEN1=IEN1|0X04;			//允许CT2
		}
		if(c_adc>5&&c_adc<=10)
		{
				if(c_adc==10)			//电压——电流
				{
					i_v=0;			//电流采样标志
					c_adc=0;
					AD1=0;
					AD2=0;
					AD3=0;
					AD4=0;
					tab3=0;
				}
				ad_finish=1;
				CTCON=CTCON|0X20;
				IEN1=IEN1|0X04;			//允许CT2
		}
//	}
}

void CM1_int (void)   interrupt 12		//电流脉冲输出(峰、基值时间)
{
	CMI1=0;
	c_cm1++;
	if(current_out==1&&c_cm1==n_pulse||current_out==0&&c_cm1==n_base)
	{
		current_out=~current_out;
		c_cm1=0;
	}
	CML1=TML2+0XE2;		//峰值时间
	if(CML1<TML2)
		CMH1=(TMH2+1)+0X04;
	else
		CMH1=TMH2+0X04;
}

void CM2_int (void)   interrupt 13		//关水计时
{
	CMI2=0;
	c_cm2++;
	if(c_cm2==240)
	{
		con_water=1;			//关水
		IEN1=IEN1&0xDF;			//禁止CM1

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -