analog.lst

tcpip.rar 是一个51控制8019的程序,我已用于商用.还很稳定,有兴趣的可以看一下,对TCP IP UDP ICMP ARP RARP HTTP均可以实现.

C51 COMPILER V7.06   ANALOG                                                                05/19/2004 15:18:10 PAGE 1   


C51 COMPILER V7.06, COMPILATION OF MODULE ANALOG
OBJECT MODULE PLACED IN ANALOG.OBJ
COMPILER INVOKED BY: d:\Keil\C51\BIN\C51.EXE ANALOG.C LARGE BROWSE DEBUG OBJECTEXTEND

stmt level    source

   1          //-----------------------------------------------------------------------------
   2          // Net ANALOG.C
   3          //
   4          // This module handles the analog inputs which are external temperature
   5          // sensor, the on-chip temperature sensor, and operating voltage.
   6          //-----------------------------------------------------------------------------
   7          #include <string.h>
   8          #include <stdlib.h>
   9          #include <stdio.h>
  10          #include <reg52.h>
  11          #include "net.h"
  12          #include "serial.h"
  13          #include "analog.h"
  14          #include <intrins.h>
  15                  sbit adclk=P1^5;
  16                  sbit addata=P1^6;
  17                  sbit adcs=P1^7;
  18          #define uchar unsigned char
  19          #define uint  unsigned int
  20          extern char xdata text[];
  21          UINT idata cpu_temperature, air_temperature, cpu_voltage;
  22          UCHAR idata mux_select;
  23          
  24          /*********TLC549子程序***********************/
  25          unsigned char ad(void)            //TLC549的采样子程序
  26          {
  27   1      //    unsigned char i,sample_data;
  28   1      //      bit ea_flag;
  29   1      //
  30   1      //    ea_flag=EA;
  31   1      //    EA=0;
  32   1      //    adcs=0;
  33   1      //    _nop_();
  34   1      //    _nop_();
  35   1      //    if(addata==1)
  36   1      //    {
  37   1      //        sample_data=1;
  38   1      //    }
  39   1      //    else
  40   1      //    {
  41   1      //        sample_data=0;
  42   1      //    }
  43   1      //    for(i=0;i<7;i++)
  44   1      //    {
  45   1      //        sample_data=(sample_data<<1);
  46   1      //        adclk=1;
  47   1      //        _nop_();
  48   1      //        _nop_();
  49   1      //        adclk=0;
  50   1      //        if(addata==1)
  51   1      //       {
  52   1      //            sample_data=(sample_data|0x01);
  53   1      //        }
  54   1      //    }
  55   1      //    adclk=1;
C51 COMPILER V7.06   ANALOG                                                                05/19/2004 15:18:10 PAGE 2   

  56   1      //    _nop_();
  57   1      //    _nop_();
  58   1      //    adclk=0;
  59   1      //    _nop_();
  60   1      //    _nop_();
  61   1      //    
  62   1      //    adcs=1;
  63   1      //    EA=ea_flag;
  64   1          return 2500;
  65   1      
  66   1      }
  67          //--------------------------------------------------------------------------
  68          // This function is a little state machine which reads one analog
  69          // inputs at a time, out of the 3 possible inputs
  70          //  1. On-chip temperature
  71          //  2. External air temperature
  72          //  3. CPU operating voltage
  73          //--------------------------------------------------------------------------
  74          void read_analog_inputs(void)
  75          {
  76   1         cpu_temperature=2500;
  77   1         air_temperature=(uint)ad()*19;
  78   1         cpu_voltage=50;
  79   1      }
  80           
  81          


MODULE INFORMATION:   STATIC OVERLAYABLE
   CODE SIZE        =     37    ----
   CONSTANT SIZE    =   ----    ----
   XDATA SIZE       =   ----    ----
   PDATA SIZE       =   ----    ----
   DATA SIZE        =   ----    ----
   IDATA SIZE       =      7    ----
   BIT SIZE         =   ----    ----
END OF MODULE INFORMATION.


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