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

📄 wl-6622.lst

📁 按使用者调节温度来自动调节温度的直发器软件
💻 LST
📖 第 1 页 / 共 2 页
字号:
     1                     ;BANK_0
     2       0000          R0		EQU	00H
     3       0001          TCC	  	EQU	01H
     4       0002          PC	    	EQU	02H 
     5       0003          STATUS		EQU	03H
     6       0003          r3		equ	03h
     7       0004          RSR	   	EQU	04H
     8       0005          R5		EQU	05H
     9       0000          green_led	equ	00
    10       0001          blue_led	equ	01
    11       0002          yellow_led	equ	02
    12       0003          BUZZER		EQU	03H
    13                     
    14       0006          R6		EQU	06H
    15       0000          ON_OFF		EQU	0H
    16       0001          ADD_KEY		EQU	1H
    17       0007          red_led		equ	07h
    18       000F          RF		EQU	0FH
    19                     
    20                     ;BANK_1
    21       0001          CONT	  EQU	01H
    22       0005          IOC5	  EQU	05H
    23       0006          IOC6	  EQU	06H
    24                     
    25       000B          IOCB	  EQU	0X0B
    26       000C          IOCC	  EQU	0CH
    27       000D          IOCD	  EQU	0X0D
    28       000E          IOCE	  EQU	0EH
    29       000F          IOCF	  EQU	0FH
    30                     ;--------------------------
    31                     ;STATUS
    32       0000          C	EQU	00H
    33       0001          DC	EQU	01H
    34       0002          Z	EQU	02H
    35       0003          P       EQU	03H
    36       0004          T	EQU	04H
    37       0005          IOCPAGE EQU	05H
    38       0006          RPAGE0	EQU	06H
    39       0007          RPAGE1	EQU	07H
    40                     ;****************************
    41       0010          FLAG_T	EQU	10H
    42       0011          RC_TIMEL_SET_RAM	EQU	11H
    43       0012          RC_TIMEL_RAM	EQU	12H
    44       0013          KEY_TEMP_RAM	EQU	13H
    45       0014          KEY_RAM		EQU	14H
    46       0015          TIME_ON_RAM	EQU	15H
    47       0016          KEY_OLD_RAM	EQU	16H
    48       0017          OUT_TIME_RAM	EQU	17H
    49       0018          RC_TIMEH_RAM	EQU	18H
    50       0019          RC_TIMEL_SAVE_RAM   EQU	19H
    51       001A          RC_TIMEH_SAVE_RAM   EQU	1AH	
    52       001B          DLEAY_RAM	EQU	1BH
    53       001C          TEMP_RAM   	EQU	1CH
    54       001D          RC_TIMEH_SET_RAM	EQU	1DH
    55       001E          FLAG_T1		EQU	1EH
    56       001F          CLR_RAM		EQU	1FH
    57       0020          TIME_OUT_RAM1	EQU	20H
    58       0021          TIME_OUT_RAM	EQU	21H
    59       0022          KEY_TIME	EQU	22H
    60                     ;*****************************
    61                     ;FLAG_T
    62       0000          KEY_OK_FG	EQU	00H
    63       0001          KEY_FG		EQU	01H
    64       0002          OUT_PULL_FG     EQU	02H
    65       0003          OUT_ON_FG2      EQU	03H
    66       0004          OUT_ON_FG1	EQU	04H
    67       0005          OUT_ON_FG 	EQU	05H
    68       0006          OUT_OFF_FG	EQU	06H
    69       0007          AD_IN_FG	EQU	07H
    70                     ;*****************************
    71                     ;FLAG_T1
    72       0000          ON_FG		EQU	00H
    73       0001          TIME_OUT_FG	EQU	01H
    74       0002          KEY_OK_FG1	EQU	02H
    75       0003          KEY_ON_FG1	EQU	03H
    76       0023          FLAG_A		EQU	23H
    77       0000          SAME_KEY	EQU	00H
    78       0001          UP_KEY_F	EQU	01H
    79       0002          ON_OFF_F	EQU	02H
    80       0004          ON_FLAG		EQU	04H
    81       0005          beep_flag	equ	05h
    82       0006          FLASH_LED	EQU	06H
    83       0007          led_on		equ	07h
    84       0024          flash_time	equ	24h
    85       0025          beep_temp1	equ	25h
    86       0026          BEEP_TEMP2	EQU	26H
    87       0027          BEEP_TEMP3	EQU	27H
    88       0028          DELAY_NTC	EQU	28H	
    89                     	
    90                     ;****************************
    91                     	ORG	00H
    92 00000 150B          	JMP	RESET 
    93                     		
    94                     	ORG	08H
    95 00008 0000          	NOP
    96 00009 0013          	RETI
    97                     ;****************************
    98                     	
    99                     ;***************************************
   100                     ;Temperature_analyse
   101                     ;***************************************	
   102 0000A               Temperature_OUT:
   103 0000A 0F23          	JBS	FLAG_A,ON_FLAG
   104 0000B 145C          	JMP	Temperature_analyse_END
   105 0000C 180F          	MOV	A , @0B00001111
   106 0000D 02DE          	AND	FLAG_T1 , A
   107 0000E 0E93          	JBS	KEY_TEMP_RAM , 2	 ;100
   108 0000F 1413          	JMP	Temperature_OUT0
   109 00010 1822          	MOV	A , @0X22
   110 00011 0051          	MOV	RC_TIMEL_SET_RAM , A	 ;120
   111 00012 142F          	JMP	CONN_OUT
   112 00013               Temperature_OUT0:
   113 00013 0E53          	JBS	KEY_TEMP_RAM , 1	 ;00
   114 00014 0C13          	JBC	KEY_TEMP_RAM , 0
   115 00015 141A          	JMP	Temperature_OUT1
   116 00016 1807          	MOV	A , @0X07
   117 00017 0051          	MOV	RC_TIMEL_SET_RAM , A	 ;200
   118 00018 0BDE          	BS	 FLAG_T1 , 7
   119 00019 142F          	JMP	CONN_OUT
   120 0001A               Temperature_OUT1:
   121 0001A 0E53          	JBS	KEY_TEMP_RAM , 1	 ;01
   122 0001B 0E13          	JBS	KEY_TEMP_RAM , 0
   123 0001C 1421          	JMP	Temperature_OUT2	
   124 0001D 1815          	MOV	A , @0X15;0A;for 140c
   125 0001E 0051          	MOV	RC_TIMEL_SET_RAM , A	 ;180
   126 0001F 0B9E          	BS	 FLAG_T1 , 6
   127 00020 142F          	JMP	CONN_OUT
   128 00021               Temperature_OUT2:	
   129 00021 0C53          	JBC	KEY_TEMP_RAM , 1	 ;10
   130 00022 0C13          	JBC	KEY_TEMP_RAM , 0
   131 00023 1428          	JMP	Temperature_OUT3	
   132 00024 1810          	MOV	A , @0X10
   133 00025 0051          	MOV	RC_TIMEL_SET_RAM , A	 ;160
   134 00026 0B5E          	BS	 FLAG_T1 , 5
   135 00027 142F          	JMP	CONN_OUT
   136 00028               Temperature_OUT3:	
   137 00028 0C53          	JBC	KEY_TEMP_RAM , 1	 ;11
   138 00029 0E13          	JBS	KEY_TEMP_RAM , 0
   139 0002A 1428          	JMP	Temperature_OUT3	
   140 0002B 180A          	MOV	A , @0X0a;15 for 180c
   141 0002C 0051          	MOV	RC_TIMEL_SET_RAM , A	 ;140
   142 0002D 0B1E          	BS	 FLAG_T1 , 4
   143 0002E 142F          	JMP	CONN_OUT
   144 0002F               CONN_OUT:
   145 0002F 1802          	MOV	A,@0X02
   146 00030 0118          	SUB	A,RC_TIMEH_RAM
   147 00031 0E03          	JBS	STATUS,C
   148 00032 1438          	JMP	CONN_OUT0
   149                     ;	JZ	DELAY_NTC
   150                     ;	JMP	CONN_OUT011
   151 00033 0B86          	Bs 	R6,6;			 ;NTC断开 
   152 00034 0B46          	Bs	R6,5;
   153 00035 00E1          	CLR	TIME_OUT_RAM
   154 00036 00E0          	CLR	TIME_OUT_RAM1
   155 00037 145C          	JMP	Temperature_analyse_END	
   156 00038               CONN_OUT0:
   157                     ;	CLR	DELAY_NTC
   158 00038               CONN_OUT011:
   159 00038 0418          	MOV	A , RC_TIMEH_RAM
   160 00039 0C83          	JBC	STATUS , Z
   161 0003A 1440          	JMP	CONN_OUT1
   162 0003B 0B86          	BS	 R6 , 6
   163 0003C 0B46          	BS	 R6 , 5
   164 0003D 00E1          	CLR	TIME_OUT_RAM
   165 0003E 00E0          	CLR	TIME_OUT_RAM1
   166 0003F 145C          	JMP	Temperature_analyse_END
   167                     
   168 00040               CONN_OUT1:
   169 00040 0411          	MOV	A , RC_TIMEL_SET_RAM	 ;
   170 00041 0112          	SUB	A , RC_TIMEL_RAM    	 ;检测的时间底位与设置的时间底位比较 
   171 00042 0E03          	JBS	STATUS , C
   172 00043 144D          	JMP	CONN_OUT3
   173 00044 0411          	MOV	A , RC_TIMEL_SET_RAM
   174 00045 0412          	MOV	A , RC_TIMEL_RAM
   175 00046 0C83          	JBC	STATUS , Z
   176 00047 144D          	JMP	CONN_OUT3	
   177 00048 0B86          	BS	 R6 , 6			 ;温度还是没有到达控制点,全开 
   178 00049 0B46          	BS	 R6 , 5
   179 0004A 00E1          	CLR	TIME_OUT_RAM
   180 0004B 00E0          	CLR	TIME_OUT_RAM1
   181 0004C 145C          	JMP	Temperature_analyse_END
   182 0004D               CONN_OUT3:       			 ;控制温度相等,恒温 
   183 0004D 0FA3          	jbs	flag_a,FLASH_LED
   184 0004E 0B63          	bs	flag_a,beep_flag
   185 0004F 0BA3          	bs	flag_a,FLASH_LED
   186 00050 0986          	BC	R6,6;for
   187 00051 1806          	MOV	A,@0X06
   188 00052 0320          	XOR	A,TIME_OUT_RAM1
   189 00053 0C83          	JBC	STATUS,Z
   190 00054 0946          	BC	R6,5
   191 00055 180F          	MOV	A,@0X0F
   192 00056 0120          	SUB	A,TIME_OUT_RAM1
   193 00057 0E03          	JBS	STATUS,C
   194 00058 145C          	JMP	Temperature_analyse_END
   195 00059 0B46          	BS	R6,5
   196 0005A 00E0          	CLR	TIME_OUT_RAM1
   197 0005B 145C          	JMP	Temperature_analyse_END				
   198 0005C               Temperature_analyse_END:
   199 0005C 0012          	RET
   200                     ;-----------------------------
   201 0005D               beep_p:
   202 0005D 0F63          	jbs	flag_a,beep_flag
   203 0005E 0012          	ret	
   204 0005F 0963          	bc	flag_a,beep_flag
   205 00060 18FE          	MOV	A,@100h-2
   206 00061 0065          	MOV	BEEP_TEMP1,A
   207 00062               CON_BEEP1:	
   208 00062 1806          	MOV	A,@100h-250
   209 00063 0066          	MOV	BEEP_TEMP2,A
   210 00064               CON_BEEP:
   211 00064 18B0          	MOV	A,@100h-80
   212 00065 0067          	MOV	BEEP_TEMP3,A
   213 00066 0AC5          	bs	R5,BUZZER
   214 00067               TO_WAIT_DEC1:
   215 00067 07E7          	jz	BEEP_TEMP3	
   216 00068 1467          	JMP	TO_WAIT_DEC1
   217 00069 18B0          	MOV	A,@100h-80
   218 0006A 0067          	MOV	BEEP_TEMP3,A
   219 0006B 08C5          	bc	R5,BUZZER
   220 0006C               TO_WAIT_DEC2:
   221 0006C 07E7          	jz	BEEP_TEMP3
   222 0006D 146C          	JMP	TO_WAIT_DEC2
   223 0006E 07E6          	jz	BEEP_TEMP2
   224 0006F 1464          	JMP	CON_BEEP
   225 00070 07E5          	jz	BEEP_TEMP1
   226 00071 1462          	JMP	CON_BEEP1
   227 00072 0012          	RET
   228                     
   229                     ;******************************
   230 00073               SCAN_KEY:
   231 00073 0E06          	JBS	R6,ON_OFF
   232 00074 1479          	JMP	TO_HAVE_KEY
   233 00075 0E46          	JBS	R6,ADD_KEY
   234 00076 1479          	JMP	TO_HAVE_KEY
   235 00077 0823          	BC	FLAG_A,SAME_KEY
   236 00078 0012          	RET
   237 00079               TO_HAVE_KEY:
   238 00079 0C23          	JBC	FLAG_A,SAME_KEY
   239 0007A 0012          	RET
   240 0007B 0863          	bc	FLAG_A,UP_KEY_F

⌨️ 快捷键说明

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