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

📄 ad.lst

📁 此程序为本人在公司开发的继电器功能测试仪
💻 LST
📖 第 1 页 / 共 5 页
字号:
 641   1                      TH0=T0_Time/256;//0.5ms
 642   1                      TL0=T0_Time%256;
 643   1                      if(Comp_Data_T[0]==12)
 644   1                      {
 645   2                              V_V=2048;
 646   2                      }
 647   1                      else if(Comp_Data_T[0]==24) V_V=4095;
 648   1                      //IE0=0;//clear external 0 flag;
 649   1                      TR0=1;
 650   1                      //EX0=1;//Enable External 0 Interrupt.  
 651   1                      while(!V_Up)
 652   1                      {
 653   2                              DA_Convert(V_Value);
 654   2                              while(!TF0);
 655   2                              TF0=0;
 656   2                              TH0=T0_Time/256;//0.5ms
 657   2                              TL0=T0_Time%256;
 658   2                              if(NO_TIME)
 659   2                              {
 660   3                                      p_v=V_Value-70;//about decrease 0.5v
 661   3                                      DA_Convert(0);  
 662   3                                      TR0=0;
 663   3                                      V_Up=1;
 664   3                              }
 665   2                              V_Value+=2;
 666   2                              if(V_Value>=V_V)
 667   2                              {
 668   3                                      V_Up=1;
 669   3                                      TR0=0;
 670   3                              }
 671   2                      }
 672   1                      for(i=0;i<50;i++) Delay_1(250);
 673   1                      V_Value=p_v;
 674   1                      DA_Convert(V_Value);
 675   1                      for(i=0;i<50;i++) Delay_1(250);
C51 COMPILER V7.06   AD                                                                    08/06/2007 17:38:09 PAGE 12  

 676   1                      TH0=T0_Time_2/256;//1ms
 677   1                      TL0=T0_Time_2%256;
 678   1                      V_Up=0;
 679   1                      TR0=1;
 680   1                      while(!V_Up)
 681   1                      {
 682   2                              DA_Convert(V_Value);
 683   2                              while(!TF0);
 684   2                              TF0=0;
 685   2                              TH0=T0_Time_2/256;//1ms
 686   2                              TL0=T0_Time_2%256;
 687   2                              if(EXT_Enbale)
 688   2                              {
 689   3                                      Count++;
 690   3                                      if(Count==5)
 691   3                                      {
 692   4                                              IE0=0;//clear external 0 flag;
 693   4                                              EX0=1;//Enable External 0 Interrupt.
 694   4                                              Count=0;
 695   4                                              EXT_Enbale=0;
 696   4                                      }
 697   3                              }
 698   2                              if(NO_TIME&&F)
 699   2                              {
 700   3                                      F=0;
 701   3                                      p_v=V_Value-REPAIR;
 702   3                                      V_Value_Temp=p_v;
 703   3                                      Test_Data[3]=(float)p_v*2.4*MULTI_V/4.095;
 704   3                                      //IE0=0;//clear external 0 flag;
 705   3                                      //EX0=1;//Enable External 0 Interrupt.
 706   3                                      EXT_Enbale=1;
 707   3                              }
 708   2                              //V_Value+=2;
 709   2                              V_Value++;
 710   2                              if(TH_Flag||(V_Value>=(V_V*0.625))) 
 711   2                              {
 712   3                                      EX0=0;
 713   3                                      TR0=0;
 714   3                                      //EX0=0;
 715   3                                      V_Up=1;
 716   3                                      DA_Convert(V_V);
 717   3                              }
 718   2                              if(V_Value>=V_V)
 719   2                              {
 720   3                                      V_Up=1;
 721   3                                      TR0=0;
 722   3                              }
 723   2                      }
 724   1      
 725   1                      if(TH_Flag)
 726   1                      {
 727   2                              if((Test_Data[3]>Comp_Data[6])&&(Test_Data[3]<=Comp_Data[7])) SetP_Data[4]=14;//ok
 728   2                              else SetP_Data[4]=13;//ng
 729   2                              Num_Convert(Test_Data[3],4);
 730   2                              if((Page_Val==0)||(Page_Val==6)) Tests_Data(SetP_Data,5,4);
 731   2                              else if(Page_Val==3) Tests_Data(SetP_Data,5,5);
 732   2                              if(SetP_Data[4]==13)
 733   2                              {
 734   3                                      NG_Flag=1;
 735   3                                      IO_A&=0xFB;
 736   3                                      IO_C&=0xFD;
 737   3                              }
C51 COMPILER V7.06   AD                                                                    08/06/2007 17:38:09 PAGE 13  

 738   2                              if((Test_Data[4]>=Comp_Data[8])&&(Test_Data[4]<=Comp_Data[9])) SetP_Data[4]=14;//ok
 739   2                              else 
 740   2                              {
 741   3                                      SetP_Data[4]=13;//ng
 742   3                                      IO_A&=0xFB;
 743   3                                      IO_C&=0xFC;
 744   3                              }
 745   2                              Num_Convert(Test_Data[4],4);
 746   2                              //Tests_Data(SetP_Data,5,5);
 747   2                              if((Page_Val==0)||(Page_Val==6)) Tests_Data(SetP_Data,5,5);
 748   2                              else if(Page_Val==3) Tests_Data(SetP_Data,5,6);
 749   2                              if((SetP_Data[4]==13)||(NG_Flag==1))
 750   2                              {
 751   3                                      IO_B=0xFF;
 752   3                                      V_Up=0;
 753   3                                      DA_Convert(0);
 754   3                                      return(0);
 755   3                              }
 756   2                      }
 757   1                      else
 758   1                      {
 759   2                              if(Page_Val==6) Test_Data[4]=Test_Data[3];
 760   2                              else Test_Data[4]=0;
 761   2                              if((Test_Data[3]>Comp_Data[6])&&(Test_Data[3]<=Comp_Data[7])) SetP_Data[4]=14;//ok
 762   2                              else SetP_Data[4]=13;//ng
 763   2                              Num_Convert(Test_Data[3],4);
 764   2                              //Tests_Data(SetP_Data,5,4);
 765   2                              if((Page_Val==0)||(Page_Val==6)) Tests_Data(SetP_Data,5,4);
 766   2                              else if(Page_Val==3) Tests_Data(SetP_Data,5,5);
 767   2                              if(SetP_Data[4]==13)
 768   2                              {
 769   3                                      NG_Flag=1;
 770   3                                      IO_A&=0xFB;
 771   3                                      IO_C&=0xFD;
 772   3                              }
 773   2                              if((Test_Data[4]>=Comp_Data[8])&&(Test_Data[4]<=Comp_Data[9])) SetP_Data[4]=14;//ok
 774   2                              else 
 775   2                              {
 776   3                                      SetP_Data[4]=13;//ng
 777   3                                      IO_A&=0xFB;
 778   3                                      IO_C&=0xFC;
 779   3                              }
 780   2                              Num_Convert(Test_Data[4],4);
 781   2                              //Tests_Data(SetP_Data,5,5);
 782   2                              if((Page_Val==0)||(Page_Val==6)) Tests_Data(SetP_Data,5,5);
 783   2                              else if(Page_Val==3) Tests_Data(SetP_Data,5,6);
 784   2                              if((SetP_Data[4]==13)||(NG_Flag==1))
 785   2                              {
 786   3                                      //IO_B|=0x60;
 787   3                                      IO_B=0xFF;
 788   3                                      V_Up=0;
 789   3                                      //V_Value=0;
 790   3                                      DA_Convert(0);
 791   3      
 792   3                                      return(0);
 793   3                              }                       
 794   2                      }
 795   1                      for(i=0;i<20;i++) Delay_1(250);
 796   1                      TH_Flag=0;
 797   1                      F=1;
 798   1                      //OP_F=0;
 799   1                      V_Value=V_Value_Temp;
C51 COMPILER V7.06   AD                                                                    08/06/2007 17:38:09 PAGE 14  

 800   1                      DA_Convert(V_Value);
 801   1                      for(i=0;i<40;i++) Delay_1(250);
 802   1                      Test_Data[5]=0;
 803   1                      Test_Data[6]=0;
 804   1                      TH0=T0_Time/256;//0.5ms
 805   1                      TL0=T0_Time%256;
 806   1                      //IE0=0;
 807   1                      TR0=1;
 808   1                      //EX0=1;
 809   1                      while(V_Up)
 810   1                      {
 811   2                              DA_Convert(V_Value);
 812   2                              while(!TF0);
 813   2                              TF0=0;
 814   2                              TH0=T0_Time/256;//0.5ms
 815   2                              TL0=T0_Time%256;
 816   2      /*                      if(EXT_Enbale) 
 817   2                              {
 818   2                                      EX0=1;//Enable External 0 Interrupt.
 819   2                                      EXT_Enbale=0;
 820   2                              }*/
 821   2                              if((NO_TIME==0)&&F)
 822   2                              {
 823   3                                      F=0;
 824   3                                      if(Page_Val==6)
 825   3                                      {
 826   4                                              Test_Data[5]=(float)(V_Value+REPAIR_1)*2.4*MULTI_V/4.095;
 827   4                                      }       
 828   3                                      else
 829   3                                      {
 830   4                                              p_v=V_Value+REPAIR_1;                           
 831   4                                              Test_Data[6]=(float)p_v*2.4*MULTI_V/4.095;
 832   4                                      }
 833   3                                      
 834   3                                      IE0=0;//clear external 0 flag;
 835   3                                      EX0=1;//Enable External 0 Interrupt.
 836   3                                      //EXT_Enbale=1;
 837   3                              }
 838   2                              //V_Value-=2;
 839   2                              V_Value--;
 840   2                              if(TH_Flag||(V_Value<=10)) 
 841   2                              {
 842   3                                      EX0=0;
 843   3                                      TR0=0;
 844   3                                      V_Up=0;
 845   3                              }
 846   2      /*                      if((OP_F==0)&&TH_Flag) 
 847   2                              {
 848   2                                      EX0=0;
 849   2                                      OP_F=1;
 850   2                              }
 851   2                              if(V_Value<=10) 
 852   2                              {
 853   2                                      
 854   2                                      TR0=0;
 855   2                                      EX0=0;
 856   2                                      //EA=0;
 857   2                                      V_Up=0;

⌨️ 快捷键说明

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