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

📄 scan.lst

📁 实验室连线监控原代码,一台主机采用485总线方式与从机通讯,可以检测学生的连线是否正常,那些线没有连好,非常好的教学实验检测.
💻 LST
📖 第 1 页 / 共 4 页
字号:
 333   8                        *s=8*i+j+289;
 334   8                         s++;
 335   8                         m++;
 336   8                         d++;
 337   8                      }
 338   7                    continue;
 339   7                  }
 340   6                }
 341   5                  if(m>=2)
 342   5                    {
 343   6                      *s=8*temp0+temp1+1;
 344   6                       s+=2;
 345   6                       d+=2;
 346   6                    }
 347   5              }
 348   4           else continue;
 349   4             }
 350   3         }
 351   2          }
 352   1        if(m==0)
 353   1          {
 354   2        for(i=0;i<18;i++)
 355   2         {
 356   3           for(j=0;j<8;j++)
 357   3             {
 358   4              for(k=0;k<18;k++)
 359   4               {
 360   5                 XBYTE[P8255CW+k]=0x80;
 361   5               }
 362   4              XBYTE[P8255IA+temp0]=_crol_(0x01,temp1);
 363   4              XBYTE[P8255IB+i]=_crol_(0x01,j);
 364   4              for(k=0;k<18;k++)
 365   4               {
C51 COMPILER V7.06   SCAN                                                                  01/19/2007 08:32:20 PAGE 7   

 366   5                 a[k]=XBYTE[P8255IA+k];
 367   5                 b[k]=XBYTE[P8255IB+k];
 368   5                 c[k]=XBYTE[P8255IC+k];
 369   5               }
 370   4              for(k=0;k<18;k++)
 371   4               {
 372   5                 for(l=0;l<8;l++)
 373   5                   {
 374   6                     pa[k][l]=_cror_(a[k],l)&0x01;
 375   6                     pb[k][l]=_cror_(b[k],l)&0x01;
 376   6                     pc[k][l]=_cror_(c[k],l)&0x01;
 377   6                   }
 378   5               }
 379   4           if(pa[temp0][temp1]==1)
 380   4              {
 381   5               for(i=0;i<18;i++)
 382   5                {
 383   6                  for(j=0;j<8;j++)
 384   6                  {
 385   7                    if(pb[i][j]==1)
 386   7                      {
 387   8                        *s=8*i+j+145;
 388   8                         s++;
 389   8                         m++;
 390   8                         d++;
 391   8                      }
 392   7                    else if(pc[i][j]==1)
 393   7                      {
 394   8                        *s=8*i+j+289;
 395   8                         s++;
 396   8                         m++;
 397   8                         d++;
 398   8                      }
 399   7                    continue;
 400   7                  }
 401   6                }
 402   5                  if(m>=2)
 403   5                    {
 404   6                      *s=8*temp0+temp1+1;
 405   6                       s+=2;
 406   6                       d+=2;
 407   6                    }
 408   5                  break;
 409   5              }
 410   4           else continue;
 411   4             }
 412   3         }
 413   2          }
 414   1        if(m==0)
 415   1          {
 416   2        for(i=0;i<18;i++)
 417   2         {
 418   3           for(j=0;j<8;j++)
 419   3             {
 420   4              for(k=0;k<18;k++)
 421   4               {
 422   5                 XBYTE[P8255CW+k]=0x80;
 423   5               }
 424   4              XBYTE[P8255IA+temp0]=_crol_(0x01,temp1);
 425   4              XBYTE[P8255IC+i]=_crol_(0x01,j);
 426   4              for(k=0;k<18;k++)
 427   4               {
C51 COMPILER V7.06   SCAN                                                                  01/19/2007 08:32:20 PAGE 8   

 428   5                 a[k]=XBYTE[P8255IA+k];
 429   5                 b[k]=XBYTE[P8255IB+k];
 430   5                 c[k]=XBYTE[P8255IC+k];
 431   5               }
 432   4              for(k=0;k<18;k++)
 433   4               {
 434   5                 for(l=0;l<8;l++)
 435   5                   {
 436   6                     pa[k][l]=_cror_(a[k],l)&0x01;
 437   6                     pb[k][l]=_cror_(b[k],l)&0x01;
 438   6                     pc[k][l]=_cror_(c[k],l)&0x01;
 439   6                   }
 440   5               }
 441   4           if(pa[temp0][temp1]==1)
 442   4              {
 443   5               for(i=0;i<18;i++)
 444   5                {
 445   6                  for(j=0;j<8;j++)
 446   6                  {
 447   7                    if(pc[i][j]==1)
 448   7                      {
 449   8                        *s=8*i+j+289;
 450   8                         s++;
 451   8                         m++;
 452   8                         d++;
 453   8                      }
 454   7                    continue;
 455   7                  }
 456   6                }
 457   5                  if(m>=2)
 458   5                    {
 459   6                      *s=8*temp0+temp1+1;
 460   6                       s+=2;
 461   6                       d+=2;
 462   6                    }
 463   5                  break;
 464   5              }
 465   4           else continue;
 466   4             }
 467   3         }
 468   2          }
 469   1      }
 470          
 471          void thr_fou_pnts_conn2(void)
 472          {
 473   1        unsigned char i,j,k,l,m=0;
 474   1        for(j=temp1+1;j<8;j++)
 475   1         {
 476   2           for(k=0;k<18;k++)
 477   2           {
 478   3             XBYTE[P8255CW+k]=0x80;
 479   3           }
 480   2           XBYTE[P8255IB+temp0]=_crol_(0x01,temp1)|_crol_(0x01,j);
 481   2           for(k=0;k<18;k++)
 482   2           {
 483   3             b[k]=XBYTE[P8255IB+k];
 484   3             c[k]=XBYTE[P8255IC+k];
 485   3           }
 486   2           for(k=0;k<18;k++)
 487   2            {
 488   3              for(l=0;l<8;l++)
 489   3               {
C51 COMPILER V7.06   SCAN                                                                  01/19/2007 08:32:20 PAGE 9   

 490   4                 pb[k][l]=_cror_(b[k],l)&0x01;
 491   4                 pc[k][l]=_cror_(c[k],l)&0x01;
 492   4               }
 493   3            }
 494   2              if(pb[temp0][temp1]==1)
 495   2                {
 496   3                  for(j=temp1+1;j<8;j++)
 497   3                   {
 498   4                     if(pb[temp0][j]==1)
 499   4                       {
 500   5                         *s=8*temp0+j+145;
 501   5                          s++;
 502   5                          m++;
 503   5                          d++;
 504   5                       }
 505   4                     else continue;
 506   4                   }
 507   3                  for(i=temp0+1;i<18;i++)
 508   3                   {
 509   4                     for(j=0;j<8;j++)
 510   4                      {
 511   5                        if(pb[i][j]==1)
 512   5                          {
 513   6                            *s=8*i+j+145;
 514   6                             s++;
 515   6                             m++;
 516   6                             d++;
 517   6                          }
 518   5                        else continue;
 519   5                      }
 520   4                   }
 521   3                  for(i=0;i<18;i++)
 522   3                   {
 523   4                     for(j=0;j<8;j++)
 524   4                      {
 525   5                        if(pc[i][j]==1)
 526   5                          {
 527   6                            *s=8*i+j+289;
 528   6                             s++;
 529   6                             m++;
 530   6                             d++;
 531   6                          }
 532   5                        else continue;
 533   5                      }
 534   4                   }
 535   3                     if(m>=2)
 536   3                       {
 537   4                         *s=8*temp0+temp1+145;
 538   4                          s+=2;
 539   4                          d+=2;
 540   4                       }
 541   3                     break;
 542   3                }
 543   2                        else continue;
 544   2         }
 545   1        if(m==0)
 546   1          {
 547   2        for(i=temp0+1;i<18;i++)
 548   2         {
 549   3           for(j=0;j<8;j++)
 550   3            {
 551   4              for(k=0;k<18;k++)
C51 COMPILER V7.06   SCAN                                                                  01/19/2007 08:32:20 PAGE 10  

 552   4               {
 553   5                 XBYTE[P8255CW+k]=0x80;
 554   5               }
 555   4              XBYTE[P8255IB+temp0]=_crol_(0x01,temp1);
 556   4              XBYTE[P8255IB+i]=_crol_(0x01,j);
 557   4              for(k=0;k<18;k++)
 558   4               {
 559   5                 b[k]=XBYTE[P8255IB+k];
 560   5                 c[k]=XBYTE[P8255IC+k];
 561   5               }
 562   4              for(k=0;k<18;k++)
 563   4               {
 564   5                 for(l=0;l<8;l++)
 565   5                  {
 566   6                    pb[k][l]=_cror_(b[k],l)&0x01;
 567   6                    pc[k][l]=_cror_(c[k],l)&0x01;
 568   6                  }
 569   5               }
 570   4                 if(pb[temp0][temp1]==1)
 571   4                   {
 572   5                     for(i=temp0+1;i<18;i++)
 573   5                      {
 574   6                        for(j=0;j<8;j++)
 575   6                         {
 576   7                           if(pb[i][j]==1)
 577   7                             {
 578   8                               *s=8*i+j+145;
 579   8                                s++;
 580   8                                m++;
 581   8                                d++;
 582   8                             }
 583   7                           else continue;
 584   7                         }
 585   6                      }
 586   5                     for(i=0;i<18;i++)
 587   5                      {
 588   6                        for(j=0;j<8;j++)
 589   6                         {
 590   7                           if(pc[i][j]==1)
 591   7                             {
 592   8                               *s=8*i+j+289;
 593   8                                s++;
 594   8                                m++;
 595   8                                d++;
 596   8                             }
 597   7                           else continue;
 598   7                         }
 599   6                      }
 600   5                        if(m>=2)
 601   5                          {
 602   6                            *s=8*temp0+temp1+145;
 603   6                             s+=2;
 604   6                             d+=2;
 605   6                          }
 606   5                        break;
 607   5                   }
 608   4                 else continue;
 609   4            }
 610   3         }
 611   2          }
 612   1        if(m==0)
 613   1          {
C51 COMPILER V7.06   SCAN                                                                  01/19/2007 08:32:20 PAGE 11  

 614   2        for(i=0;i<18;i++)
 615   2         {
 616   3           for(j=0;j<8;j++)
 617   3            {
 618   4              for(k=0;k<18;k++)
 619   4               {
 620   5                 XBYTE[P8255CW+k]=0x80;
 621   5               }
 622   4              XBYTE[P8255IB+temp0]=_crol_(0x01,temp1);
 623   4              XBYTE[P8255IC+i]=_crol_(0x01,j);
 624   4              for(k=0;k<18;k++)
 625   4               {
 626   5                 b[k]=XBYTE[P8255IB+k];
 627   5                 c[k]=XBYTE[P8255IC+k];
 628   5               }
 629   4              for(k=0;k<18;k++)
 630   4               {
 631   5                 for(l=0;l<8;l++)
 632   5                  {
 633   6                    pb[k][l]=_cror_(b[k],l)&0x01;
 634   6                    pc[k][l]=_cror_(c[k],l)&0x01;
 635   6                  }
 636   5               }
 637   4                 if(pb[temp0][temp1]==1)
 638   4                   {
 639   5                     for(i=0;i<18;i++)
 640   5                      {
 641   6                        for(j=0;j<8;j++)
 642   6                         {
 643   7                           if(pc[i][j]==1)
 644   7                             {
 645   8                               *s=8*i+j+289;
 646   8                                s++;
 647   8                                m++;
 648   8                                d++;
 649   8                             }
 650   7                           else continue;
 651   7                         }
 652   6                      }
 653   5                        if(m>=2)
 654   5                          {
 655   6                            *s=8*temp0+temp1+145;
 656   6                             s+=2;
 657   6                             d+=2;
 658   6                          }
 659   5                        break;
 660   5                   }
 661   4                 else continue;
 662   4            }
 663   3         }
 664   2          }
 665   1      }
 666          
 667          void thr_fou_pnts_conn3(void)
 668          {
 669   1        unsigned char i,j,k,l,m=0;
 670   1        for(j=temp1+1;j<8;j++)
 671   1         {
 672   2           for(k=0;k<18;k++)
 673   2           {

⌨️ 快捷键说明

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