剑杆织布机单片机C语言程序
时间:11-30
来源:互联网
点击:
#include
#includesbit P3_7=P0^6; // 点动按钮sbit P3_6=P0^5; // 单梭按钮sbit P3_5=P0^4; // 启动按钮sbit P3_4=P0^3; // 停止按钮sbit P3_3=P2^6; // 经停信号输入sbit P3_2=P2^7; // 纬停信号输入sbit P3_1=P3^1; // “加”指示灯sbit P3_0=P3^0; // “减”指示灯//sbit P2_7=P2^7; ////sbit P2_6=P2^6; // sbit P2_5=P2^5; // “减”按钮sbit P2_4=P2^4; // “加”按钮//sbit P2_4=P2^4; // 储纬继电器sbit P2_3=P1^2 ; // 保护输出,至指示灯, 继电器sbit P2_2=P3^7 ; // 高压输出sbit P2_1=P3^6; // 离合输出sbit P2_0=P2^0; // 制动输出sbit P1_7=P0^7; // 储纬停信号输入sbit P1_6=P0^2; // H3信号输入sbit P1_5=P0^1; // H2信号输入sbit P1_4=P0^0; // H1信号输入sbit P1_3=P3^4; // DIP2sbit P1_2=P3^5; // DIP3sbit P1_1=P3^3; // DIP4// sbit P1_0=P1^0; // // sbit P0_7=P0^7; //sbit P0_6=P3^2; // 过载保护输入sbit P0_5=P2^1; // 保护输入,高压检测sbit P0_4=P2^2; // 保护输入,离合检测sbit P0_3=P2^3; // 保护输入,制动检测sbit P0_2=P1^3; // 储纬停输出,至指示灯,继电器。 sbit P0_1=P1^0; // 纬停输出sbit P0_0=P1^1; // 经停输出#define uchar unsigned char# define uint unsigned int //注意 无冒号static unsigned char flag,flag1,flag2,flag3,flag4,flag5,flag6,flag7;bit testflag,testflag1,testflag2,testflag3;static unsigned char temp=0,temp1=0,temp2=0,temp3=0,tag=0,tag1=0,tag2=0,tag3=0,count=0;static unsigned char tag4=0,tag5=0,tag6=0,tag7=0;static unsigned char temp4=0,temp5=0,temp6=0,temp7=0,temp8=0,temp9=0, xx=0,count1=0,enable=0,mean=0;static unsigned char x,x1,x2,x3;static unsigned int i,j,k,i1,j1,k1;sfr T2MOD = 0xC9;void delay(uchar ms);//sfr WDT_CONTR=0xe1; //看门狗地址sfr ISP_DATA = 0xE2; /* Flash Data Register */sfr ISP_ADDRH = 0xE3; /* flash address high */sfr ISP_ADDRL = 0xE4; /* flash address low */sfr ISP_CMD = 0xE5; /* flash command register */sfr ISP_TRIG = 0xE6; /* flash command trigger */sfr ISP_CONTR = 0xE7; /* isp/iap control register */#define ISP_IAP_BYTE_READ 1; /* 读字节 */#define ISP_IAP_BYTE_PROGRAM 2; /* 字节编程 */#define ISP_IAP_SECTOR_ERASE 3; /* 扇区擦除 */#define ISP_IAP_ENABLE 0x81; /* 系统工作时钟<12M,对ISP_CONTR寄存器设置此值 ,0x81*/unsigned char byte_read(unsigned int addr);void byte_write(unsigned int addr,unsigned char program_data);void Sector_Erase(unsigned int addr);void IAP_Disable();unsigned int eeprom_address;unsigned char read_eeprom;unsigned char value_buf[22];void main (void){ P2_0=0; xx=0;TMOD=0x11;EA=1;ET0=1;ET1=1;TH0=(65536-10000)/256;TL0=(65536-10000)%256; TR0=0;TH1=(65536-10000)/256;TL1=(65536-10000)%256; TR1=0;ET2=1; //T2中断允许T2MOD=0x00; //如果T2MOD=0X02,则从P1_0输出T2CON=0x00;//CP_RL2=1;EXEN2=1;TH2=(65536-50000)/256;TL2=(65536-50000)%256;RCAP2H=(65536-50000)/256; //重装载计数器赋初值RCAP2L=(65536-50000)%256;read_eeprom=byte_read(0x2000);x=read_eeprom;if (x<5) x=5;if(x>25) x=25;x1=byte_read(0x2200);if (x1<35) x1=35;if(x1>45) x1=45;while(1){if ((P3_7==1) &&(temp1==1) || (P3_6==1)&&(temp1==1) ) temp2=1; // temp2点动单梭终止运行标志while (temp2==1){//if (!((P1_6==1) && (P1_4==1)&&(P1_5==0)) ) continue;// elseif((P1_6==1)&&(P1_5==0)&&(P1_4==1)){P2_1=1;P2_0=0;temp=0;temp1=0;temp2=0;enable=0;}}if ((P3_3==1)&&(temp1==1) &&(xx==0)) {temp3=1;P0_0=0;} // temp3经停标志while((temp3==1) && (temp1==1)&&(xx==0)){// if(!((P1_6==1) && (P1_4==1)&&(P1_5==0))) continue;// elseif((P1_6==1)&&(P1_5==0)&&(P1_4==1)){P2_1=1;temp1=0;P2_0=0; P0_0=0;enable=0;temp3=0;} }if ((P1_7==1)&&(temp1==1) &&(xx==0) ) {temp4=1;P0_2=0;} //temp4储纬停标志while((temp4==1) &&(temp1==1)&&(xx==0)){//if(!((P1_6==1) && (P1_4==1)&&(P1_5==0)) ) continue;// elseif((P1_6==1)&&(P1_5==0)&&(P1_4==1)){P2_1=1;temp1=0;P0_2=0;P2_0=0;enable=0;}}if ((temp4==1) && (temp1==0) && (P3_4==1)) {P0_2=1; temp4=0;} //解除储纬停标志if ((P3_2==0)&&(temp1==1) && (enable==1)&&(xx==0)) //纬停负输入{delay(10); if ((temp1==1) && (enable==1)&&(P3_2==0) &&(xx==0)){//count1数字滤波计数 略{}if (mean==5) //mean 采样值 之和 略{ //enable=1 纬停允许while ((temp1==1) && (enable==1)&&(P3_2==0)&&(xx==0)&&(P0_5==0)&&(P0_3==0)&&(P0_6==1)){/*if(!((P1_6==1) && (P1_5==1))) continue; //断纬时 仍可保护else {delay(2); P2_1=1;P2_0=0;temp1=0;temp5=1;enable=0;P0_1=0;} */ //temp5 纬停标志if((P1_6==1)&&(P1_4==0)&&(P1_5==1)&&(P3_2==0)) //传感器正输入flag=1; //flag 断纬,传感器后沿停机记忆while ((flag==1)&&(P3_2==0)&&(xx==0)&&(P0_5==0)&&(P0_3==0)&&(P0_6==1) ){if ((P1_6==0)&&(P1_5==0)){temp5=1;flag=0;enable=0;} //temp5 纬停标志}} }}}if(P3_2==1){flag=0; //松开按钮 flag=0;for (count1=0;count1<5;count1++) //count1数字滤波计数{value_buf[count1]=0;}mean=0;} if (temp5==1){delay(2); P2_1=1;delay(1);P2_0=0;temp1=0;enable=0;P0_1=0;_nop_(); for (count1=0;count1<5;count1++){value_buf[count1]=0;}mean=0;temp5=0;}if ((P3_6==1) && (temp1==0) &&(temp==0)&&(temp4==0)&&(xx==0)) //单梭 ,temp 单梭标志{P2_0=1;P2_1=0;temp=1;}while (temp==1){//if (!(( P1_5==1)&&(P1_6==0)&&(P1_4==0)|| (P3_4==1)) ) continue; //P1_5 ,H2信号 单梭停止// elseif((P1_6==0)&&(P1_5==1)&&(P1_4==0) ||(P3_4==1)){P2_1=1;temp=0;P2_0=0; } }if ((P3_5==1) && (temp4==0)&&(P3_4==0)&&(xx==0)) //无储纬停,无保护 ,启动{P2_0=1;P2_1=0;_nop_(); temp=0;temp1=1;temp3=0;temp5=0;_nop_();P0_0=1;P0_1=1;}//temp1 启动标志 ,temp8==1,开机瞬间纬停无效//while ( (temp3==0)&&(temp4==0)&& (temp5==0)&&(xx==0)&&(temp1==1))if ((temp3==0)&&(temp4==0)&& (temp5==0)&&(xx==0)) //停止{if (P3_4==1){ P2_1=1; P2_0=0;_nop_();temp=0;temp1=0;enable=0;}} if ((temp==0) && (temp1==0) &&(temp4==0)&& (P3_7==1) &&(xx==0) && (tag==0)) //tag 切断点动动作按钮{//delay(1);temp9=1; //temp9 点动状态运行中P2_0=1; tag=1; tag1=0; count=1; //开机瞬间无高压,count==0;delay(1); //间隔P2_1=0; P2_2=0;delay(20);P2_2=1; //高压1时间delay(x1); //离合时间if (P3_7==0) //松开点动按钮{P2_1=1;}}if ((P3_7==0)&&(temp==0) && (temp1==0) &&(temp4==0)&&(xx==0) ) //松开点动按钮{// delay(1);tag=0;P2_1=1;delay(1); //间隔P2_0=0; //delay(1);} /* if ((P3_7==0)&&(P2_1==1)&&(temp==0)&&(temp1==0)&&(temp4==0)&&(tag1==0)&&(xx==0)){tag=0;P2_1=1;_nop_();P2_0=0;tag1=1; //tag1 切断点动制动if (count==1) P2_2=0; //点动制动后,瞬间高压delay(20); //高压2时间P2_2=1; _nop_(); temp9=0; //temp9 点动状态标志} */if ((P2_0==0) && (P2_1==1) &&(temp==0)&& (temp1==0)&&(temp4==0) &&(tag1==0)&&(tag==0)) {tag1=1;tag=0; //tag1 切断点动制动if (count==1) P2_2=0; //点动制动后,瞬间高压delay(20); //高压2时间P2_2=1; delay(20); _nop_(); temp9=0;} if ((tag==1) && (tag1==1)) tag=0; //防止互锁 if ((P0_3==1) &&(P0_4==1)){//delay(200); //延时时间不能太长delay(10);if ((P0_3==1) &&(P0_4==1))//{ temp6=1;xx=1;P2_1=1;P2_0=1;P2_2=1;P2_3=0; } //temp6 逻辑保护标志TR1=1;// else {TR1=0;k=0;}} if ((P0_5==1)&&(P3_7==0)) TR1=1; //无点动,高压触发保护定时器if(!((P0_3==1)&&(P0_4==1))&&(P0_5==0)) {TR1=0;k=0;}if (P0_6==0) //过载信号负输入{delay(200);if (P0_6==0){temp7=1;xx=1;P2_1=1;P2_0=1;P2_2=1;P2_3=0; } //temp7 过载保护} if ((temp6==1) ||(temp7==1)) {xx=1;P2_1=1;P2_0=1;P2_2=1;P2_3=0; } //保护if((P1_3==0)&&(P1_2==1)&&(P1_1==0)) // DIP2 DIP4 ON DIP3 OFF 纬停采样调整{ if(P3_4==1) //停止按钮按下 { if ((P2_4==0) &&(tag2==0) ) // tag2切断 加按钮 最多按18次{if(x<=24) {x+=1; P3_1=0;}tag4=0;tag2=1;delay(10);P3_1=1;}if (P2_4==1) tag2=0;if ((P2_5==0) &&(tag3==0)) //tag3切断 减按钮 最多按18次{if(x>=6) {x-=1; P3_0=0;}tag4=0;tag3=1;delay(10);P3_0=1;}if (P2_5==1) tag3=0; }if((P3_4==0)&&(tag4==0)) //tag4==0 写允许 停止按钮松开{Sector_Erase(0x2000); _nop_();byte_write( 0x2000, x); _nop_();_nop_();tag4=1;}}if((P1_3==0)&&(P1_2==0)&&(P1_1==1)) // DIP2 DIP3 ON DIP4 OFF 点动距离调整{ if(P3_4==1) //停止按钮按下 { if ((P2_4==0) &&(tag2==0) ) // tag2切断 加按钮 最多按10次{if(x1<=44) {x1+=1; P3_1=0;}tag4=0;tag2=1;delay(10);P3_1=1;}if (P2_4==1) tag2=0;if ((P2_5==0) &&(tag3==0)) //tag3切断 减按钮 最多按10次{if(x1>=36) {x1-=1; P3_0=0;}tag4=0;tag3=1;delay(10);P3_0=1;}if (P2_5==1) tag3=0; }if((P3_4==0)&&(tag4==0)) //tag4==0 写允许 停止按钮松开{Sector_Erase(0x2200); _nop_();byte_write( 0x2200, x1); _nop_();_nop_();tag4=1;}}//if (temp1==1) {delay(10); enable=1;} // 开机瞬间纬停无效if (P3_5==1) TR2=1; //按钮输入正if ((temp1==0)&&(P3_5==0)) {enable=0; i1=0;TR2=0;} if (P2_0==0) //制动后 所有状态复位 ,temp4除外{ //count1数字滤波计数for (count1=0;count1<5;count1++){value_buf[count1]=0;}mean=0;enable=0;temp=0;temp1=0;temp2=0;temp3=0;temp5=0;}}}void int_1(void) interrupt 1{TR0=0;TH0=(65536-10000)/256;TL0=(65536-10000)%256; } void int_3(void) interrupt 3 //保护定时器{k++;if(k>=100){xx=1;P2_1=1;P2_0=1;P2_2=1;P2_3=0; _nop_(); P2_0=1;TR1=0; k=0; temp6=1;}TH1=(65536-10000)/256;TL1=(65536-10000)%256; } void timer2() interrupt 5{i1++; TF2=0; //T2中断 溢出标志,必须清除if (i1>=10) //1S, 0.5s{TR2=0; i1=0; enable=1; // 定时时间到标志 ,纬停允许}// TH2=(65536-50000)/256;//TL2=(65536-50000)%256; }unsigned char byte_read(unsigned int addr){unsigned char ii;ISP_ADDRH = (addr>>8);ISP_ADDRL = (addr&0x00ff);ISP_CONTR = ISP_IAP_ENABLE; //0x81ISP_CMD = ISP_IAP_BYTE_READ; //1ISP_TRIG = 0x46;ISP_TRIG = 0xb9;_nop_();_nop_();ii = ISP_DATA;ISP_CONTR = 0x00;ISP_CMD = 0x00;ISP_TRIG = 0x00;return ii;}void byte_write(unsigned int addr,unsigned char program_data){ISP_DATA = program_data;ISP_ADDRH = (addr>>8);ISP_ADDRL = (addr&0x00ff);ISP_CONTR = ISP_IAP_ENABLE; // 0x81ISP_CMD = ISP_IAP_BYTE_PROGRAM; // 2ISP_TRIG = 0x46;ISP_TRIG = 0xb9;_nop_();ISP_CONTR = 0x00;ISP_CMD = 0x00;ISP_TRIG = 0x00;}// void IAP_Disable()// {//IAP_CONTR=0;// IAP_CMD=0;// IAP_TRIG=0;// IAP_ADDRH=0;//IAP_ADDRL=0;// }void Sector_Erase(unsigned int addr){//addr=(addr&0xfe00); //地址小于0xfe00?ISP_ADDRH = (addr>>8);ISP_ADDRL = (addr&0x00ff);ISP_CONTR = ISP_IAP_ENABLE; //0x81ISP_CMD = ISP_IAP_SECTOR_ERASE; //3ISP_TRIG = 0x46;ISP_TRIG = 0xb9;_nop_();_nop_();_nop_();ISP_CONTR = 0x00;ISP_CMD = 0x00;ISP_TRIG = 0x00;}void delay(uchar ms){uchar m;while (ms--){for (m=0;m<250;m++){;}}}
剑杆织布机单片机C语言程 相关文章:
- Windows CE 进程、线程和内存管理(11-09)
- RedHatLinux新手入门教程(5)(11-12)
- uClinux介绍(11-09)
- openwebmailV1.60安装教学(11-12)
- Linux嵌入式系统开发平台选型探讨(11-09)
- Windows CE 进程、线程和内存管理(二)(11-09)