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

📄 alarm001.lst

📁 菜鸟板的时钟 第一次学51 师兄们帮小弟看看 还有很多要改进的地方
💻 LST
📖 第 1 页 / 共 3 页
字号:
 443               发送数据正常,ack=1; ack=0表示被控器无应答或损坏。
 444          ********************************************************************/
 445          void  SendByte(uchar c)
 446          {
 447   1       uchar BitCnt;
 448   1       
 449   1       for(BitCnt=0;BitCnt<8;BitCnt++)  /*要传送的数据长度为8位*/
 450   1          {
 451   2           if((c<<BitCnt)&0x80)SDA=1;   /*判断发送位*/
 452   2             else  SDA=0;                
 453   2           _Nop();
 454   2        _Nop();
 455   2           SCL=1;               /*置时钟线为高,通知被控器开始接收数据位*/
 456   2            _Nop(); 
 457   2            _Nop();               /*保证时钟高电平周期大于4μs*/
 458   2            _Nop();
 459   2            _Nop();
 460   2            _Nop();  
 461   2         _Nop(); 
 462   2            _Nop();               /*保证时钟高电平周期大于4μs*/
 463   2            _Nop();
 464   2            _Nop();
 465   2            _Nop();          
 466   2           SCL=0; 
 467   2          }
 468   1          
 469   1          _Nop();
 470   1          _Nop();
 471   1       _Nop();
 472   1          _Nop();
 473   1          SDA=1;               /*8位发送完后释放数据线,准备接收应答位*/
 474   1          
 475   1       _Nop();
 476   1          _Nop(); 
 477   1       _Nop();
 478   1          _Nop();   
 479   1          SCL=1;
 480   1          _Nop();
 481   1          _Nop();
 482   1          _Nop();
 483   1        _Nop();
 484   1          _Nop();
 485   1          _Nop();
 486   1          if(SDA==1)ack=0;     
 487   1             else ack=1;        /*判断是否接收到应答信号*/
 488   1          SCL=0;
C51 COMPILER V7.07   ALARM001                                                              02/02/2009 01:27:16 PAGE 9   

 489   1          _Nop();
 490   1          _Nop();
 491   1       _Nop();
 492   1          _Nop();
 493   1      }
 494          
 495           
 496          
 497           
 498          
 499          
 500          /*******************************************************************
 501                           字节数据传送函数               
 502          函数原型: uchar  RcvByte();
 503          功能:  用来接收从器件传来的数据,并判断总线错误(不发应答信号),
 504               发完后请用应答函数。  
 505          ********************************************************************/ 
 506          uchar  RcvByte(void)
 507          {
 508   1        uchar retc;
 509   1        uchar BitCnt;
 510   1        
 511   1        retc=0; 
 512   1        SDA=1;             /*置数据线为输入方式*/
 513   1        for(BitCnt=0;BitCnt<8;BitCnt++)
 514   1            {
 515   2              _Nop(); 
 516   2        _Nop();           
 517   2              SCL=0;       /*置时钟线为低,准备接收数据位*/
 518   2              _Nop();
 519   2              _Nop();         /*时钟低电平周期大于4.7μs*/
 520   2              _Nop();
 521   2              _Nop();
 522   2              _Nop();
 523   2        _Nop();
 524   2              _Nop();         /*时钟低电平周期大于4.7μs*/
 525   2              _Nop();
 526   2              _Nop();
 527   2              _Nop();
 528   2              SCL=1;       /*置时钟线为高使数据线上数据有效*/
 529   2              _Nop();
 530   2              _Nop();
 531   2          _Nop();
 532   2              _Nop();
 533   2              retc=retc<<1;
 534   2              if(SDA==1)retc=retc+1; /*读数据位,接收的数据位放入retc中 */
 535   2              _Nop();
 536   2              _Nop(); 
 537   2        _Nop();
 538   2              _Nop(); 
 539   2            }
 540   1        SCL=0;    
 541   1        _Nop();
 542   1        _Nop();
 543   1        _Nop();
 544   1        _Nop();
 545   1        return(retc);
 546   1      }
 547          
 548           
 549          
 550          
C51 COMPILER V7.07   ALARM001                                                              02/02/2009 01:27:16 PAGE 10  

 551          /********************************************************************
 552                               应答子函数
 553          原型:  void Ack_I2c(bit a);
 554           
 555          功能:主控器进行应答信号,(可以是应答或非应答信号)
 556          ********************************************************************/
 557          void Ack_I2c(bit a)
 558          {
 559   1        
 560   1        if(a==0)SDA=0;     /*在此发出应答或非应答信号 */
 561   1              else SDA=1;
 562   1        _Nop();
 563   1        _Nop();
 564   1        _Nop();
 565   1        _Nop();
 566   1        _Nop();
 567   1        _Nop();         
 568   1        SCL=1;
 569   1          _Nop();
 570   1          _Nop();              /*时钟低电平周期大于4μs*/
 571   1          _Nop();
 572   1          _Nop();
 573   1          _Nop(); 
 574   1          _Nop();
 575   1          _Nop();              /*时钟低电平周期大于4μs*/
 576   1          _Nop();
 577   1          _Nop();
 578   1          _Nop();  
 579   1       SCL=0;                /*清时钟线,钳住I2C总线以便继续接收*/
 580   1          _Nop();
 581   1          _Nop();  
 582   1       _Nop();
 583   1          _Nop();   
 584   1      }
 585          
 586          /*******************************************************************
 587                              向有子地址器件发送字节数据函数               
 588          函数原型: bit  ISendByte(uchar sla,ucahr c);  
 589          功能:     从启动总线到发送地址,数据,结束总线的全过程,从器件地址sla.
 590                     如果返回1表示操作成功,否则操作有误。
 591          注意:    使用前必须已结束总线。
 592          ********************************************************************/
 593          bit ISendByte(uchar sla,uchar suba,uchar c)
 594          {
 595   1         Start_I2c();               /*启动总线*/
 596   1         SendByte(sla);            /*发送器件地址*/
 597   1           if(ack==0)return(0);
 598   1        SendByte(suba);            /*发送器件地址*/
 599   1           if(ack==0)return(0);
 600   1         SendByte(c);               /*发送数据*/
 601   1           if(ack==0)return(0);
 602   1        Stop_I2c();                 /*结束总线*/ 
 603   1        return(1);
 604   1      }
 605          
 606          /*******************************************************************
 607                              向有子地址器件读字节数据函数               
 608          函数原型: bit  IRcvByte(uchar sla,ucahr *c);  
 609          功能:     从启动总线到发送地址,读数据,结束总线的全过程,从器件地
 610                    址sla,返回值在c.
 611                     如果返回1表示操作成功,否则操作有误。
 612          注意:    使用前必须已结束总线。
C51 COMPILER V7.07   ALARM001                                                              02/02/2009 01:27:16 PAGE 11  

 613          ********************************************************************/
 614          uchar IRcvByte(uchar sla,uchar suba)
 615          {
 616   1      uchar c;
 617   1         Start_I2c();                /*启动总线*/
 618   1         SendByte(sla);           /*发送器件地址*/
 619   1           if(ack==0)return(0);
 620   1         SendByte(suba);           /*发送子器件地址*/
 621   1           if(ack==0)return(0);
 622   1      
 623   1        Start_I2c();
 624   1      
 625   1       SendByte(sla+1);           /*发读器件地址*/
 626   1           if(ack==0)return(0);
 627   1         c=RcvByte();               /*读取数据*/
 628   1           Ack_I2c(1);               /*发送非就答位*/
 629   1        Stop_I2c();                  /*结束总线*/ 
 630   1        return c;
 631   1      }
 632          
 633          
 634          
 635          
 636          
 637          void main(void)
 638          {  
 639   1           TIMERIni();
 640   1          ISendByte( PCF8583, 0x00, 0x0C);
 641   1        //ISendByte(PCF8583, 0X00,0x80);
 642   1          ISendByte( PCF8583, 0x08, 0x04);
 643   1        while(1)
 644   1              {
 645   2                  keyboard();
 646   2                    if(key>0)
 647   2                      {
 648   3                        menu();
 649   3                      }
 650   2      
 651   2                      
 652   2              }
 653   1      }
 654          


MODULE INFORMATION:   STATIC OVERLAYABLE
   CODE SIZE        =   1637    ----
   CONSTANT SIZE    =   ----    ----
   XDATA SIZE       =   ----    ----
   PDATA SIZE       =   ----    ----
   DATA SIZE        =     39       1
   IDATA SIZE       =   ----    ----
   BIT SIZE         =      1       1
END OF MODULE INFORMATION.


C51 COMPILATION COMPLETE.  1 WARNING(S),  0 ERROR(S)

⌨️ 快捷键说明

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