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

📄 ad.lst

📁 此程序为本人在公司开发的继电器功能测试仪
💻 LST
📖 第 1 页 / 共 5 页
字号:
 426   2                              case 100: //1A
 427   2                              {
C51 COMPILER V7.06   AD                                                                    08/06/2007 17:38:09 PAGE 8   

 428   3                                      IO_B&=0xFE; //1A CURRENT,transistor
 429   3                                      for(i=0;i<10;i++) Delay_1(250);
 430   3                                      IO_B&=0xEF;//COM CURRENT ON,relay
 431   3                                      for(i=0;i<50;i++) Delay_1(250);
 432   3                                      DA_Convert(Comp_Data_T[0]*409.5/(2.4*MULTI_V));
 433   3                                      //for(i=0;i<80;i++) Delay_1(250);
 434   3                              } break;
 435   2                              case 10: //100MA
 436   2                              {
 437   3                                      IO_B&=0xFD; 
 438   3                                      for(i=0;i<10;i++) Delay_1(250);
 439   3                                      DA_Convert(Comp_Data_T[0]*409.5/(2.4*MULTI_V));
 440   3                                      for(i=0;i<50;i++) Delay_1(250);
 441   3                                      IO_B&=0xEF;//COM CURRENT ON
 442   3                                      //for(i=0;i<80;i++) Delay_1(250);
 443   3                              } break;//100MA CURRENT
 444   2                              case 1: //10MA
 445   2                              {
 446   3                                      IO_B&=0xFB; 
 447   3                                      for(i=0;i<10;i++) Delay_1(250);
 448   3                                      DA_Convert(Comp_Data_T[0]*409.5/(2.4*MULTI_V));
 449   3                                      for(i=0;i<50;i++) Delay_1(250);
 450   3                                      IO_B&=0xEF;//COM CURRENT ON
 451   3                                      //for(i=0;i<80;i++) Delay_1(250);
 452   3                              } break;//10MA CURRENT
 453   2                      }
 454   1                      for(i=0;i<60;i++) Delay_1(250);
 455   1                      AD_COM=0x08;//SW_A1 SET 0;SELECT NC
 456   1                      AD_COM=0x07;//SW_A0 SET 1;
 457   1                      AD_COM=0x0B;//SW_EN SET 1;
 458   1                      Test_Data[2]=10*ConR_Test_Child();
 459   1                      AD_COM=0x0A;//SW_EN SET 0;
 460   1                      if((Test_Data[2]<=Comp_Data[5])&&(Test_Data[2]>Comp_Data[4]))
 461   1                      {
 462   2                              SetP_Data[4]=14;//ok
 463   2                      }
 464   1                      else 
 465   1                      {
 466   2                              SetP_Data[4]=13;//NG
 467   2                              IO_A&=0xFD;//led ng display
 468   2                              IO_C&=0xFD;
 469   2                      }
 470   1                      Num_Convert(Test_Data[2],4);
 471   1                      if((Page_Val==0)||(Page_Val==5)||(Page_Val==6)) Tests_Data(SetP_Data,5,3);
 472   1                      else if(Page_Val==2) Tests_Data(SetP_Data,5,4);//lcd display
 473   1      
 474   1                      if(SetP_Data[4]==13)
 475   1                      {
 476   2                              DA_Convert(0);
 477   2                              IO_B|=0x77;//off relay
 478   2                              return(0);
 479   2                      }
 480   1                      for(i=0;i<80;i++) Delay_1(250);
 481   1                      if(Comp_Data_T[2]==12)//1c type
 482   1                      {
 483   2                              switch(Comp_Data_T[1])
 484   2                              {
 485   3                                      case 100: 
 486   3                                      {
 487   4                                              DA_Convert(0);
 488   4                                              for(i=0;i<50;i++) Delay_1(250);
 489   4                                      } break;
C51 COMPILER V7.06   AD                                                                    08/06/2007 17:38:09 PAGE 9   

 490   3                                      case 10: //IO_B|=0x10; break;//COM CURRENT ON
 491   3                                      case 1: 
 492   3                                      {
 493   4                                              IO_B|=0x10; 
 494   4                                              for(i=0;i<50;i++) Delay_1(250);
 495   4                                              DA_Convert(0);
 496   4                                              for(i=0;i<50;i++) Delay_1(250);
 497   4                                              IO_B&=0xEF; 
 498   4                                              for(i=0;i<50;i++) Delay_1(250);
 499   4                                      } break;//COM CURRENT ON
 500   3                              }
 501   2                              AD_COM=0x09;//SW_A1 SET 1;SELECT NC
 502   2                              AD_COM=0x06;//SW_A0 SET 0;
 503   2                              AD_COM=0x0B;//SW_EN SET 1;
 504   2                              Test_Data[1]=10*ConR_Test_Child();
 505   2                              AD_COM=0x0A;//SW_EN SET 0;
 506   2                              if((Test_Data[1]<=Comp_Data[3])&&(Test_Data[1]>Comp_Data[2]))
 507   2                              {
 508   3                                      SetP_Data[4]=14;//ok
 509   3                              }
 510   2                              else 
 511   2                              {
 512   3                                      SetP_Data[4]=13;//NG
 513   3                                      IO_A&=0xFD;
 514   3                                      IO_C&=0xFD;
 515   3                              }
 516   2                              Num_Convert(Test_Data[1],4);
 517   2                              if((Page_Val==0)||(Page_Val==5)||(Page_Val==6)) Tests_Data(SetP_Data,5,2);
 518   2                              else if(Page_Val==2) Tests_Data(SetP_Data,5,3);
 519   2                              if(SetP_Data[4]==13)
 520   2                              {
 521   3                                      IO_B|=0x77;//off relay                          
 522   3                                      return(0);
 523   3                              }
 524   2                      }
 525   1                      DA_Convert(0);
 526   1                      IO_B|=0x17;//off relay
 527   1                      for(i=0;i<20;i++) Delay_1(250);
 528   1                      return(1);
 529   1              }
 530          
 531          
 532                  bit Fast_V_Test(void)
 533                  {
 534   1                      unsigned char i=0;
 535   1                      unsigned int pu_v=0,pd_v=0;
 536   1                      bit NG_Flag=0;
 537   1                      for(i=0;i<11;i++)
 538   1                      {
 539   2                              SetP_Data[i]=15;
 540   2                      }
 541   1                      IO_B&=0xF7;//K1,K2,K7,K8 ON;
 542   1                      for(i=0;i<50;i++) Delay_1(250);
 543   1                      pd_v=(float)Comp_Data[6]*40.95/(24*MULTI_V);
 544   1                      pu_v=(float)Comp_Data[7]*40.95/(24*MULTI_V);
 545   1                      DA_Convert(pd_v);
 546   1                      for(i=0;i<100;i++) Delay_1(250);
 547   1                      if(NO_TIME)
 548   1                      {
 549   2                              SetP_Data[4]=13;//ng
 550   2                              Set_Data_fast(SetP_Data,5,0,4);
 551   2                              IO_B=0xFF;
C51 COMPILER V7.06   AD                                                                    08/06/2007 17:38:09 PAGE 10  

 552   2                              DA_Convert(0);
 553   2                              IO_A&=0xFB;
 554   2                              IO_C&=0xFD;
 555   2                              return(0);
 556   2                      }
 557   1                      else
 558   1                      {
 559   2                              DA_Convert(pu_v);
 560   2                              for(i=0;i<100;i++) Delay_1(250);
 561   2                              if(NO_TIME)
 562   2                              {
 563   3                                      SetP_Data[4]=14;//ok
 564   3                                      Set_Data_fast(SetP_Data,5,0,4); 
 565   3                              }
 566   2                              else
 567   2                              {
 568   3                                      SetP_Data[4]=13;//ng
 569   3                                      Set_Data_fast(SetP_Data,5,0,4);
 570   3                                      IO_B=0xFF;
 571   3                                      IO_A&=0xFB;
 572   3                                      IO_C&=0xFC;     
 573   3                                      DA_Convert(0);
 574   3      
 575   3                                      return(0);                      
 576   3                              }
 577   2      
 578   2                      }
 579   1                      pd_v=(float)Comp_Data[12]*40.95/(24*MULTI_V);
 580   1                      pu_v=(float)Comp_Data[13]*40.95/(24*MULTI_V);
 581   1                      DA_Convert(pu_v);
 582   1                      for(i=0;i<200;i++) Delay_1(250);
 583   1                      if(NO_TIME)     
 584   1                      {
 585   2                              DA_Convert(Comp_Data_T[0]*4095/(24*MULTI_V));
 586   2                              for(i=0;i<100;i++) Delay_1(250);
 587   2                              DA_Convert(pd_v);
 588   2                              for(i=0;i<100;i++) Delay_1(250);
 589   2                              if(NO_TIME)
 590   2                              {
 591   3                                      SetP_Data[4]=13;//ng
 592   3                                      Set_Data_fast(SetP_Data,5,0,7);
 593   3                                      IO_B=0xFF;
 594   3                                      IO_A&=0xF7;
 595   3                                      IO_C&=0xFD;             
 596   3                                      DA_Convert(0);
 597   3                                      return(0);              
 598   3                              }
 599   2                              else
 600   2                              {
 601   3                                      SetP_Data[4]=14;//ok
 602   3                                      Set_Data_fast(SetP_Data,5,0,7);
 603   3                                      IO_B|=0x08;
 604   3                                      DA_Convert(0);
 605   3                                      for(i=0;i<20;i++) Delay_1(250);
 606   3                                      return(1);                                      
 607   3                              }
 608   2                      }
 609   1                      else
 610   1                      {
 611   2                              SetP_Data[4]=13;//ng
 612   2                              Set_Data_fast(SetP_Data,5,0,7);
 613   2                              IO_B=0xFF;
C51 COMPILER V7.06   AD                                                                    08/06/2007 17:38:09 PAGE 11  

 614   2                              IO_A&=0xF7;
 615   2                              IO_C&=0xFC;                             
 616   2                              DA_Convert(0);
 617   2                              return(0);              
 618   2                      }
 619   1              }
 620          
 621                  bit V_Test(void)
 622                  {
 623   1                      unsigned char i,Count=0;
 624   1                      unsigned long V_V=0,V_Value_Temp=0;
 625   1                      bit NG_Flag=0,EXT_Enbale=0;//OP_F=0;//
 626   1                      //unsigned float Test_Data[3]_Temp=0;
 627   1                      for(i=0;i<11;i++)
 628   1                      {
 629   2                              SetP_Data[i]=15;
 630   2                      }
 631   1                      IO_B&=0xF7;
 632   1                      for(i=0;i<30;i++) Delay_1(250);
 633   1                      V_Value=0;
 634   1                      V_Up=0;
 635   1                      F=1;
 636   1                      TH_Flag=0;
 637   1                      p_v=0;
 638   1                      Test_Data[3]=0;
 639   1                      Test_Data[4]=0;
 640   1                      TMOD=0x21;//T1 IS Method 2; T0 is method 1;

⌨️ 快捷键说明

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