泵控制.lst

小型循环热水泵定时自动控制程序

A51 MACRO ASSEMBLER  _每_制                                                               12/09/2003 20:54:33 PAGE     1


MACRO ASSEMBLER A51 V7.04
OBJECT MODULE PLACED IN 泵控制.OBJ
ASSEMBLER INVOKED BY: G:\Program Files\EDA\Keil\C51\BIN\A51.EXE 泵控制.asm SET(SMALL) DEBUG EP

LOC  OBJ            LINE     SOURCE

                       1     
                       2     ;************************************口线定义
  0092                 3     KEY_1                   BIT             P1.2
  0091                 4     LED_1                   BIT             P1.1            
  0097                 5     OUT_1                   BIT             P1.7
                       6                     
  0090                 7     KEY_2                   BIT             P1.0
  00B7                 8     LED_2                   BIT             P3.7            
  0095                 9     OUT_2                   BIT             P1.5
                      10     
  00B5                11     KEY_3                   BIT             P3.5
  00B4                12     LED_3                   BIT             P3.4            
  0093                13     OUT_3                   BIT             P1.3
                      14     
  00B3                15     STB_LED                 BIT             P3.3
  0094                16     MODE_SW1                BIT             P1.4
  0096                17     MODE_SW2                BIT             P1.6
                      18     
                      19     ;********************************************内存分配
                      20     
  0020                21     OUT1_INT1               EQU             20H
  0021                22     OUT1_INT2               EQU             21H
                      23     
  0022                24     KEY_MODE                EQU             22H                     
  0023                25     INT_800mS               EQU             23H
  0024                26     INT_1S                  EQU             24H
  0025                27     INT_900mS               EQU             25H
  0026                28     INT_ONOFF               EQU             26H                     ;中断开关标记
  0027                29     OUT2_INT1               EQU             27H
  0028                30     OUT2_INT2               EQU             28H
  0029                31     OUT3_INT1               EQU             29H
  002A                32     OUT3_INT2               EQU             2AH
  002B                33     OUT3_INT3               EQU             2BH
                      34     
  002C                35     LED_NOTE                EQU             2CH                     ;记录LED状态
                      36                             
                      37     ;********************************************程序开始
                      38     
0000                  39                             ORG             0000H;
0000 803E             40                             JMP             START
0003                  41                             ORG             0003H
                      42                             
000B                  43                             ORG             000BH
000B 2100             44                             JMP             TIMER0
0013                  45                             ORG             0013H
                      46                             
001B                  47                             ORG             001BH                   
0023                  48                             ORG             0023H
                      49     
                      50     ;********************************************初始化程序
                      51     
0040                  52                             ORG             0040H           
0040 C2AF             53     START:                  CLR             EA                      ;禁止所有中断
0042 758160           54                             MOV             SP,#60H                 ;设置堆栽
                      55                             
0045 D2A9             56                             SETB            ET0                     ;允许定时中断0
0047 758911           57                             MOV             TMOD,#00010001B         ;设置定时工作方式为16位计时
004A 75B808           58                             MOV             IP,#00001000B           ;设置定时中断1为最高级
A51 MACRO ASSEMBLER  _每_制                                                               12/09/2003 20:54:33 PAGE     2

004D 758C15           59                             MOV             TH0,#15H                ;设置定时中断0为每60ms中断