vb.lst

上位机控制16路继电器源码

C51 COMPILER V8.05a   VB                                                                   07/12/2008 00:55:11 PAGE 1   


C51 COMPILER V8.05a, COMPILATION OF MODULE VB
OBJECT MODULE PLACED IN VB.OBJ
COMPILER INVOKED BY: C:\Keil\C51\BIN\C51.EXE VB.c BROWSE DEBUG OBJECTEXTEND

line level    source

   1          /**************************************************
   2                          失恋过度
   3                            QQ:175264198
   4                                    TEL:[phone]
   5                            [e-mail]
   6                                    www.QINGHAI.com
   7          
   8                    >>>>>>>>>>>>>>>>>>>>>>>>>>>
   9          ***************************************************/
  10          #include <io.h>                                                                      
  11          /********************延时函数**********************/
  12          void delay(int ms)
  13          {
  14   1          while(ms--)
  15   1              {
  16   2            uchar i;
  17   2                for(i=0;i<250;i++)  
  18   2                 {
  19   3                  _nop_();                       
  20   3                      _nop_();
  21   3                      _nop_();
  22   3                      _nop_();
  23   3                 }
  24   2              }
  25   1      } 
  26          /********************接收数据函数******************/
  27          void recvdata()
  28          {
  29   1                  while(RI==0);
  30   1                  RI = 0;
  31   1                  buf = SBUF;
  32   1      }                                                                  
  33          /********************串口初始化函数 ***************/
  34          void init()
  35          {       
  36   1              TMOD = 0x20;                // 定时器T1使用工作方式2
  37   1              TH1 = 250;
  38   1              TL1 = 250;
  39   1              TR1 = 1;                            // 开始计时
  40   1        //PCON = 0x80;                        // SMOD = 1
  41   1              SCON = 0xd0;                    // 工作方式，9位数据位，波特率9600kbit/s，允许接收 
  42   1              EA = 1;                                 // 关闭所有中断
  43   1              P33 = 1;        
  44   1              P1=0xFF;                            // 关闭输出
  45   1              P2=0xFF;
  46   1      }
  47          /**********************主程序**********************/
  48          void main()
  49          { 
  50   1              init();                         // 串口初始化  
  51   1                                                                      
  52   1              while(1)                                // 进入设备应答 
  53   1              {
  54   2                      recvdata();                 // 数据接收
  55   2                      out();                          // 输出控制继电器
C51 COMPILER V8.05a   VB                                                                   07/12/2008 00:55:11 PAGE 2   

  56   2                  P33 = 0;            //绿灯亮,表示接收数据成功
  57   2                      delay(2);
  58   2                      P33 = 1;         
  59   2              }        
  60   1      }
  61          /**********************主程序END*******************/


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


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