📄 current.lst
字号:
759 1 close_gas1=0;
760 1 close_gas2=0;
761 1 close_gas1_ok=0;
762 1 close_gas2_ok=0;
763 1 close_gas_ok=0;
764 1 c_cm1=0;
765 1 to_begin=0;
766 1
767 1 PWMP=51; //产生采样保持脉冲,1K
768 1 PWM0=128;
769 1 PWM1=128;
770 1 EX1=1;
771 1 EX0=1;
772 1 while(start==0)
773 1 {
774 2 if(called==1)
775 2 {
776 3 ini_sbuf(M_main,infor,com_calling,S_ANSW,0,0,0);
777 3 s_byte_nums=6;
778 3 TR_noans();
779 3 called=0;
780 3 }
781 2 if(receive_p_out==1)
782 2 {
783 3 point=&pp.t01;
784 3 for(p_sec=0;p_sec<25;p_sec++)
785 3 *(point+p_sec)=rbuffer[p_sec*2+2]*256+rbuffer[p_sec*2+3];
786 3 pp.syn_type=rbuffer[52];
787 3
788 3 ini_sbuf(M_main,answer,OK,0,0,0,0);
789 3 s_byte_nums=4;
790 3 TR_noans();
791 3 demand=0;
792 3 receive_p_out=0;
793 3 }
794 2
795 2 if(receive_p_in==1)
796 2 {
797 3 point=&pp.x[nonce_sec][0];
798 3 for(p_sec=0;p_sec<10;p_sec++)
C51 COMPILER V7.06 CURRENT 06/21/2005 15:24:34 PAGE 14
799 3 *(point+p_sec)=rbuffer[p_sec*2+3]*256+rbuffer[p_sec*2+4];
800 3
801 3 ini_sbuf(M_main,answer,OK,0,0,0,0);
802 3 s_byte_nums=4;
803 3 TR_noans();
804 3 demand=0;
805 3 receive_p_in=0;
806 3 }
807 2 /*
808 2 if(new_switch==1)
809 2 {
810 2 ini_sbuf(M_main,answer,S_ANSW,0,0,0,0);
811 2 s_byte_nums=4;
812 2 TR_noans();
813 2 new_switch=0;
814 2 }
815 2 */
816 2 if(urgent_stop==1)
817 2 goto BEGIN;
818 2 }
819 1
820 1 n_pulse=pp.t14%256;
821 1 n_base=pp.t15%256;
822 1 if(pp.syn_type==ON)
823 1 {
824 2 CTCON=CTCON|0x02;
825 2 IEN1=IEN1|0x01;
826 2 }
827 1
828 1 work=3; //进入焊接过程
829 1 IEN1=IEN1&0xBF; //禁止CM2,停水计时
830 1 CML1=TML2+0XE2; //峰值时间
831 1 if(CML1<TML2)
832 1 CMH1=(TMH2+1)+0X04;
833 1 else
834 1 CMH1=TMH2+0X04;
835 1 CML2=TML2+0x24;
836 1 if(CML2<TML2)
837 1 CMH2=TMH2+1+0xF4;
838 1 else
839 1 CMH2=TMH2+0xF4;
840 1 delt1=(pp.t13*1000000)/(pp.i14-pp.i12);
841 1 if(delt1%256>=200)
842 1 delt1=delt1/256+1;
843 1 else
844 1 delt1=delt1/256;
845 1 if(YOUHU==1)
846 1 {
847 2 while(igniting==0)
848 2 {
849 3 if(urgent_stop==1)
850 3 goto BEGIN;
851 3 if(open_gas1==1)
852 3 {
853 4 ini_sbuf(M_main,answer,S_ANSW,0,0,0,0);
854 4 s_byte_nums=4;
855 4 TR_noans();
856 4 con_gas1=0; //开气1
857 4 con_water=0; //开水
858 4 open_gas1=0;
859 4 }
860 3 if(open_gas2==1)
C51 COMPILER V7.06 CURRENT 06/21/2005 15:24:34 PAGE 15
861 3 {
862 4 ini_sbuf(M_main,answer,S_ANSW,0,0,0,0);
863 4 s_byte_nums=4;
864 4 TR_noans();
865 4 con_gas2=0; //开气2
866 4 con_water=0; //开水
867 4 open_gas2=0;
868 4 }
869 3 if(resend==1)
870 3 {
871 4 ini_sbuf(M_main,answer,S_ANSW,0,0,0,0);
872 4 s_byte_nums=4;
873 4 TR_noans();
874 4 resend=0;
875 4 }
876 3 }
877 2 }
878 1 else
879 1 {
880 2 while(ignit_ok==0)
881 2 {
882 3 if(urgent_stop==1)
883 3 goto BEGIN;
884 3 if(open_gas1==1)
885 3 {
886 4 ini_sbuf(M_main,answer,S_ANSW,0,0,0,0);
887 4 s_byte_nums=4;
888 4 TR_noans();
889 4 con_gas1=0; //开气1
890 4 con_water=0; //开水
891 4 open_gas1=0;
892 4 }
893 3 if(open_gas2==1)
894 3 {
895 4 ini_sbuf(M_main,answer,S_ANSW,0,0,0,0);
896 4 s_byte_nums=4;
897 4 TR_noans();
898 4 con_gas2=0; //开气2
899 4 con_water=0; //开水
900 4 open_gas2=0;
901 4 }
902 3 if(resend==1)
903 3 {
904 4 ini_sbuf(M_main,answer,S_ANSW,0,0,0,0);
905 4 s_byte_nums=4;
906 4 TR_noans();
907 4 resend=0;
908 4 }
909 3 }
910 2 }
911 1 ini_sbuf(M_main,answer,S_ANSW,0,0,0,0);
912 1 s_byte_nums=4;
913 1 TR_noans();
914 1
915 1 I1=pp.i11;
916 1 I2=pp.i11;
917 1 IM=(unsigned int)(I1*0.4096);
918 1 IB=(unsigned int)(I2*0.4096);
919 1 IM8=IM%256; //(I1*4096/10000)%256
920 1 IM4=IM/256; //(I1*4096/10000)/256
921 1 IB8=IB%256; //((I2*4096/10000)%256
922 1 IB4=IB/256; //(I2*4096/10000)/256
C51 COMPILER V7.06 CURRENT 06/21/2005 15:24:34 PAGE 16
923 1 UPD=0X00; //引弧电流
924 1
925 1 if(YOUHU==1)
926 1 {
927 2 current_enable=1; //开电源使能
928 2 if(pp.ignit==HF)
929 2 con_hf=0; //开高频
930 2 avc_ok=P5;
931 2 avc_ok=avc_ok&0X04;
932 2 while(avc_ok==4)
933 2 {
934 3 avc_ok=P5;
935 3 avc_ok=avc_ok&0X04;
936 3 if(urgent_stop==1)
937 3 goto BEGIN;
938 3 }
939 2 delay(2);
940 2 RE_IGNIT: avc_ok=P5;
941 2 avc_ok=avc_ok&0X04;
942 2 if(avc_ok==4)
943 2 goto RE_IGNIT;
944 2 else
945 2 {
946 3 if(pp.ignit==HF) //引弧方式HF
947 3 con_hf=1; //关高频
948 3 ini_sbuf(M_main,command,com_ignit_ok,0,0,0,0);
949 3 s_byte_nums=4;
950 3 TR_ans();
951 3 // answer_judge();
952 3 }
953 2 }
954 1 if(urgent_stop==1)
955 1 goto BEGIN;
956 1 I1=pp.i12;
957 1 I2=pp.i12;
958 1 IM=(unsigned int)(I1*0.4096);
959 1 IB=(unsigned int)(I2*0.4096);
960 1 IM8=IM%256; //(I1*10/10)%256
961 1 IM4=IM/256; //(I1*10/10)/256
962 1 IB8=IB%256; //(I2*10/10)%256
963 1 IB4=IB/256; //(I2*10/10)/256
964 1 UPD=0X00; //预熔电流
965 1
966 1 ad_finish=1;
967 1 if(YOUHU==1) //焊接时进行电压、电流采样
968 1 {
969 2 c_adc=0;
970 2 i_v=0;
971 2 CTCON=CTCON|0X20; //捕捉下降沿
972 2 IEN1=IEN1|0X04; //允许CT2
973 2 }
974 1
975 1 while(pre_melt_ok==0) //预熔时间
976 1 {
977 2 if(urgent_stop==1)
978 2 goto BEGIN;
979 2 if(need_para==1) //显示焊接电流、焊接电压
980 2 {
981 3 sbuffer[0]=M_main;
982 3 sbuffer[1]=parameter2;
983 3 sbuffer[2]=ad_i/256;
984 3 sbuffer[3]=ad_i%256;
C51 COMPILER V7.06 CURRENT 06/21/2005 15:24:34 PAGE 17
985 3 sbuffer[4]=ad_v/256;
986 3 sbuffer[5]=ad_v%256;
987 3 s_byte_nums=7;
988 3 TR_noans();
989 3 need_para=0;
990 3 }
991 2 /*
992 2 if(resend==1)
993 2 {
994 2 ini_sbuf(M_main,answer,S_ANSW,0,0,0,0);
995 2 s_byte_nums=4;
996 2 TR_noans();
997 2 resend=0;
998 2 }
999 2 */
1000 2 }
1001 1
1002 1 ini_sbuf(M_main,answer,S_ANSW,0,0,0,0);
1003 1 s_byte_nums=4;
1004 1 TR_noans();
1005 1
1006 1 c_t0=0;
1007 1 while(i_slope_ok==0) //电流上升
1008 1 {
1009 2 TR0=1;
1010 2 while(c_t0<delt1) //电流增加1A
1011 2 {
1012 3 if(urgent_stop==1)
1013 3 goto BEGIN;
1014 3 }
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -