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

📄 news02.lst

📁 菜鸟板的时钟 第一次学51 师兄们帮小弟看看 还有很多要改进的地方
💻 LST
📖 第 1 页 / 共 2 页
字号:
 293   1      }
 294          
 295          
 296          
 297           
 298             
 299          /*******************************************************************
 300                               起动总线函数               
 301          函数原型: void  Start_I2c();  
 302          功能:       启动I2C总线,即发送I2C起始条件.
 303            
C51 COMPILER V7.07   NEWS02                                                                01/31/2009 21:56:17 PAGE 6   

 304          ********************************************************************/
 305          void Start_I2c(void)
 306          {
 307   1        SDA=1;   /*发送起始条件的数据信号*/
 308   1        _Nop();
 309   1        _Nop();
 310   1        SCL=1;
 311   1        _Nop();    /*起始条件建立时间大于4.7us,延时*/
 312   1        _Nop();
 313   1        _Nop();
 314   1        _Nop();
 315   1        _Nop(); 
 316   1        _Nop();    /*起始条件建立时间大于4.7us,延时*/
 317   1        SDA=0;   /*发送起始信号*/
 318   1        _Nop();    /* 起始条件锁定时间大于4μs*/
 319   1        _Nop();
 320   1        _Nop();
 321   1        _Nop();
 322   1        _Nop(); 
 323   1        _Nop();    /*起始条件建立时间大于4.7us,延时*/
 324   1        SCL=0;   /*钳住I2C总线,准备发送或接收数据 */
 325   1        _Nop();
 326   1        _Nop();
 327   1        _Nop();
 328   1        _Nop();
 329   1      }
 330          
 331           
 332          
 333          
 334          /*******************************************************************
 335                                结束总线函数               
 336          函数原型: void  Stop_I2c();  
 337          功能:       结束I2C总线,即发送I2C结束条件.
 338            
 339          ********************************************************************/
 340          void Stop_I2c(void)
 341          {
 342   1        SDA=0;  /*发送结束条件的数据信号*/
 343   1        _Nop();   /*发送结束条件的时钟信号*/
 344   1        _Nop();   /*发送结束条件的时钟信号*/
 345   1        SCL=1;  /*结束条件建立时间大于4μs*/
 346   1        _Nop();
 347   1        _Nop();
 348   1        _Nop();
 349   1        _Nop();
 350   1        _Nop();
 351   1        SDA=1;  /*发送I2C总线结束信号*/
 352   1        _Nop();
 353   1        _Nop();
 354   1        _Nop();
 355   1        _Nop();
 356   1        _Nop();
 357   1      }
 358          
 359           
 360          
 361          
 362          /*******************************************************************
 363                           字节数据传送函数               
 364          函数原型: void  SendByte(uchar c);
 365          功能:  将数据c发送出去,可以是地址,也可以是数据,发完后等待应答,并对
C51 COMPILER V7.07   NEWS02                                                                01/31/2009 21:56:17 PAGE 7   

 366               此状态位进行操作.(不应答或非应答都使ack=0 假)     
 367               发送数据正常,ack=1; ack=0表示被控器无应答或损坏。
 368          ********************************************************************/
 369          void  SendByte(uchar c)
 370          {
 371   1       uchar BitCnt;
 372   1       
 373   1       for(BitCnt=0;BitCnt<8;BitCnt++)  /*要传送的数据长度为8位*/
 374   1          {
 375   2           if((c<<BitCnt)&0x80)SDA=1;   /*判断发送位*/
 376   2             else  SDA=0;                
 377   2           _Nop();
 378   2        _Nop();
 379   2           SCL=1;               /*置时钟线为高,通知被控器开始接收数据位*/
 380   2            _Nop(); 
 381   2            _Nop();               /*保证时钟高电平周期大于4μs*/
 382   2            _Nop();
 383   2            _Nop();
 384   2            _Nop();  
 385   2         _Nop(); 
 386   2            _Nop();               /*保证时钟高电平周期大于4μs*/
 387   2            _Nop();
 388   2            _Nop();
 389   2            _Nop();          
 390   2           SCL=0; 
 391   2          }
 392   1          
 393   1          _Nop();
 394   1          _Nop();
 395   1       _Nop();
 396   1          _Nop();
 397   1          SDA=1;               /*8位发送完后释放数据线,准备接收应答位*/
 398   1          
 399   1       _Nop();
 400   1          _Nop(); 
 401   1       _Nop();
 402   1          _Nop();   
 403   1          SCL=1;
 404   1          _Nop();
 405   1          _Nop();
 406   1          _Nop();
 407   1        _Nop();
 408   1          _Nop();
 409   1          _Nop();
 410   1          if(SDA==1)ack=0;     
 411   1             else ack=1;        /*判断是否接收到应答信号*/
 412   1          SCL=0;
 413   1          _Nop();
 414   1          _Nop();
 415   1       _Nop();
 416   1          _Nop();
 417   1      }
 418          
 419           
 420          
 421           
 422          
 423          
 424          /*******************************************************************
 425                           字节数据传送函数               
 426          函数原型: uchar  RcvByte();
 427          功能:  用来接收从器件传来的数据,并判断总线错误(不发应答信号),
C51 COMPILER V7.07   NEWS02                                                                01/31/2009 21:56:17 PAGE 8   

 428               发完后请用应答函数。  
 429          ********************************************************************/ 
 430          uchar  RcvByte(void)
 431          {
 432   1        uchar retc;
 433   1        uchar BitCnt;
 434   1        
 435   1        retc=0; 
 436   1        SDA=1;             /*置数据线为输入方式*/
 437   1        for(BitCnt=0;BitCnt<8;BitCnt++)
 438   1            {
 439   2              _Nop(); 
 440   2        _Nop();           
 441   2              SCL=0;       /*置时钟线为低,准备接收数据位*/
 442   2              _Nop();
 443   2              _Nop();         /*时钟低电平周期大于4.7μs*/
 444   2              _Nop();
 445   2              _Nop();
 446   2              _Nop();
 447   2        _Nop();
 448   2              _Nop();         /*时钟低电平周期大于4.7μs*/
 449   2              _Nop();
 450   2              _Nop();
 451   2              _Nop();
 452   2              SCL=1;       /*置时钟线为高使数据线上数据有效*/
 453   2              _Nop();
 454   2              _Nop();
 455   2          _Nop();
 456   2              _Nop();
 457   2              retc=retc<<1;
 458   2              if(SDA==1)retc=retc+1; /*读数据位,接收的数据位放入retc中 */
 459   2              _Nop();
 460   2              _Nop(); 
 461   2        _Nop();
 462   2              _Nop(); 
 463   2            }
 464   1        SCL=0;    
 465   1        _Nop();
 466   1        _Nop();
 467   1        _Nop();
 468   1        _Nop();
 469   1        return(retc);
 470   1      }
 471          
 472           
 473          
 474          
 475          /********************************************************************
 476                               应答子函数
 477          原型:  void Ack_I2c(bit a);
 478           
 479          功能:主控器进行应答信号,(可以是应答或非应答信号)
 480          ********************************************************************/
 481          void Ack_I2c(bit a)
 482          {
 483   1        
 484   1        if(a==0)SDA=0;     /*在此发出应答或非应答信号 */
 485   1              else SDA=1;
 486   1        _Nop();
 487   1        _Nop();
 488   1        _Nop();
 489   1        _Nop();
C51 COMPILER V7.07   NEWS02                                                                01/31/2009 21:56:17 PAGE 9   

 490   1        _Nop();
 491   1        _Nop();         
 492   1        SCL=1;
 493   1          _Nop();
 494   1          _Nop();              /*时钟低电平周期大于4μs*/
 495   1          _Nop();
 496   1          _Nop();
 497   1          _Nop(); 
 498   1          _Nop();
 499   1          _Nop();              /*时钟低电平周期大于4μs*/
 500   1          _Nop();
 501   1          _Nop();
 502   1          _Nop();  
 503   1       SCL=0;                /*清时钟线,钳住I2C总线以便继续接收*/
 504   1          _Nop();
 505   1          _Nop();  
 506   1       _Nop();
 507   1          _Nop();   
 508   1      }
 509          
 510          /*******************************************************************
 511                              向有子地址器件发送字节数据函数               
 512          函数原型: bit  ISendByte(uchar sla,ucahr c);  
 513          功能:     从启动总线到发送地址,数据,结束总线的全过程,从器件地址sla.
 514                     如果返回1表示操作成功,否则操作有误。
 515          注意:    使用前必须已结束总线。
 516          ********************************************************************/
 517          bit ISendByte(uchar sla,uchar suba,uchar c)
 518          {
 519   1         Start_I2c();               /*启动总线*/
 520   1         SendByte(sla);            /*发送器件地址*/
 521   1           if(ack==0)return(0);
 522   1        SendByte(suba);            /*发送器件地址*/
 523   1           if(ack==0)return(0);
 524   1         SendByte(c);               /*发送数据*/
 525   1           if(ack==0)return(0);
 526   1        Stop_I2c();                 /*结束总线*/ 
 527   1        return(1);
 528   1      }
 529          
 530          /*******************************************************************
 531                              向有子地址器件读字节数据函数               
 532          函数原型: bit  IRcvByte(uchar sla,ucahr *c);  
 533          功能:     从启动总线到发送地址,读数据,结束总线的全过程,从器件地
 534                    址sla,返回值在c.
 535                     如果返回1表示操作成功,否则操作有误。
 536          注意:    使用前必须已结束总线。
 537          ********************************************************************/
 538          uchar IRcvByte(uchar sla,uchar suba)
 539          {
 540   1      uchar c;
 541   1         Start_I2c();                /*启动总线*/
 542   1         SendByte(sla);           /*发送器件地址*/
 543   1           if(ack==0)return(0);
 544   1         SendByte(suba);           /*发送子器件地址*/
 545   1           if(ack==0)return(0);
 546   1      
 547   1        Start_I2c();
 548   1      
 549   1       SendByte(sla+1);           /*发读器件地址*/
 550   1           if(ack==0)return(0);
 551   1         c=RcvByte();               /*读取数据*/
C51 COMPILER V7.07   NEWS02                                                                01/31/2009 21:56:17 PAGE 10  

 552   1           Ack_I2c(1);               /*发送非就答位*/
 553   1        Stop_I2c();                  /*结束总线*/ 
 554   1        return c;
 555   1      }
 556          
 557          
 558          
 559          
 560          
 561          void main(void)
 562          {  
 563   1           TIMERIni();
 564   1          ISendByte( PCF8583, 0x00, 0x00);
 565   1        //ISendByte(PCF8583, 0X00,0x80);
 566   1            while(1)
 567   1              {
 568   2                  keyboard();
 569   2                    if(key>0)
 570   2                      {
 571   3                        menu();
 572   3                      }
 573   2      
 574   2                      
 575   2              }
 576   1      }


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


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

⌨️ 快捷键说明

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