📄 wan nian li.lst
字号:
160 0062 2866 JMP L_SHOWALON_OFF
161 0063 0FFF MOV A,0FFH
162 0064 0080 R MOV R_LEDSMONTH,A
163 0065 2878 JMP L_SHOWADJUSTALARMMODE
164 0066 L_SHOWALON_OFF:
165 0066 0F01 MOV A,01H
166 0067 0400 R XOR A,R_ALARMNUMBER
167 0068 3D0A SZ Z
168 0069 286F JMP L_SHOWALON_OFF1
169 006A 0F02 MOV A,02H
170 006B 0400 R XOR A,R_ALARMNUMBER
171 006C 3D0A SZ Z
172 006D 2874 JMP L_SHOWALON_OFF2
173 006E 2878 JMP L_SHOWADJUSTALARMMODE
174 006F L_SHOWALON_OFF1:
175 006F 0FAA MOV A,0AAH
176 0070 3C00 R SZ F_ALARM1
177 0071 0F0B MOV A,0BH
"File: WAN NIAN LI.ASM Holtek Cross-Assembler Version 2.86 Page 4
178 0072 0080 R MOV R_LEDSMONTH,A
179 0073 2878 JMP L_SHOWADJUSTALARMMODE
180 0074 L_SHOWALON_OFF2:
181 0074 0FAA MOV A,0AAH
182 0075 3C00 R SZ F_ALARM2
183 0076 0F0B MOV A,0BH
184 0077 0080 R MOV R_LEDSMONTH,A
185 0078 ; JMP L_SHOWADJUSTALARMMODE
186 0078 L_SHOWADJUSTALARMMODE:
187 0078 3000 R SET R_LEDFLAG.6 ;;TURN OFF 20 YEAR
188 0079 0FFF MOV A,0FFH
189 007A 0080 R MOV R_LEDSYEAR,A
190 007B 0080 R MOV R_LEDSDATE,A
191 007C 0080 R MOV R_LEDSECOND,A
192 007D 0080 R MOV R_LEDTEMPERATURE,A
193 007E 0080 R MOV R_LEDLMONTH,A
194 007F 0080 R MOV R_LEDLDATE,A
195 0080 0080 R MOV R_LEDDELTADAYS,A
196 0081 22DC CALL SBR_LEDSCAN
197 0082 280F JMP MLP_MAIN
198 0083 L_CHECKADJUSTALARMEXIT:
199 0083 3400 R CLR R_LEDFLAG.6
200 0084 ; JMP L_CHECKSETYEAR
201 0084 ;;************************************************
202 0084 L_CHECKSETYEAR:
203 0084 3800 R SNZ R_SETMODE1.0
204 0085 288B JMP L_CONVERTYEARDATA
205 0086 3800 R SNZ F_LEDFLASH
206 0087 288B JMP L_CONVERTYEARDATA
207 0088 0FFF MOV A,0FFH
208 0089 0080 R MOV R_LEDSYEAR,A
209 008A 288E JMP L_CHECKSETMONTH
210 008B L_CONVERTYEARDATA:
211 008B 0700 R MOV A,R_YEAR_SOLAR
212 008C 22C9 CALL SBR_HEXTODEC
213 008D 0080 R MOV R_LEDSYEAR,A
214 008E ;;-----------------------------------------------
215 008E L_CHECKSETMONTH:
216 008E 3800 R SNZ R_SETMODE1.1
217 008F 2895 JMP L_CONVERTMONTHDATA
218 0090 3800 R SNZ F_LEDFLASH
219 0091 2895 JMP L_CONVERTMONTHDATA
220 0092 0FFF MOV A,0FFH
221 0093 0080 R MOV R_LEDSMONTH,A
222 0094 2898 JMP L_CHECKSETDATE
223 0095 L_CONVERTMONTHDATA:
224 0095 0700 R MOV A,R_MONTH_SOLAR
225 0096 22C9 CALL SBR_HEXTODEC
226 0097 0080 R MOV R_LEDSMONTH,A
227 0098 ;;------------------------------------------------
228 0098 L_CHECKSETDATE:
229 0098 3800 R SNZ R_SETMODE1.2
230 0099 289F JMP L_CONVERTDATEDATA
231 009A 3800 R SNZ F_LEDFLASH
232 009B 289F JMP L_CONVERTDATEDATA
233 009C 0FFF MOV A,0FFH
234 009D 0080 R MOV R_LEDSDATE,A
235 009E 28A2 JMP L_CONVERTWEEKDATA
236 009F L_CONVERTDATEDATA:
237 009F 0700 R MOV A,R_DATE_SOLAR
"File: WAN NIAN LI.ASM Holtek Cross-Assembler Version 2.86 Page 5
238 00A0 22C9 CALL SBR_HEXTODEC
239 00A1 0080 R MOV R_LEDSDATE,A
240 00A2 ;;------------------------------------------------
241 00A2 L_CONVERTWEEKDATA:
242 00A2 0700 R MOV A,R_WEEK
243 00A3 0C07 XOR A,07H
244 00A4 0700 R MOV A,R_WEEK
245 00A5 3D0A SZ Z ;;IS SUNDAY OR NOT,IF IT IS SUNDAY THEN SHOW 8
246 00A6 0F08 MOV A,08H ;;IT IS SUNDAY
247 00A7 0080 R MOV R_LEDWEEK,A
248 00A8 ;;------------------------------------------------
249 00A8 L_CHECKSETHOUR:
250 00A8 3800 R SNZ R_SETMODE1.3
251 00A9 28AF JMP L_CONVERTHOURDATA
252 00AA 3800 R SNZ F_LEDFLASH
253 00AB 28AF JMP L_CONVERTHOURDATA
254 00AC 0FFF MOV A,0FFH
255 00AD 0080 R MOV R_LEDHOUR,A
256 00AE 28B3 JMP L_CHECKSETMINUTE
257 00AF L_CONVERTHOURDATA:
258 00AF 0700 R MOV A,R_HOUR
259 00B0 2548 CALL SBR_CONVERTCLOCKMODE
260 00B1 22C9 CALL SBR_HEXTODEC
261 00B2 0080 R MOV R_LEDHOUR,A
262 00B3 ;;------------------------------------------------
263 00B3 L_CHECKSETMINUTE:
264 00B3 3800 R SNZ R_SETMODE1.4
265 00B4 28BA JMP L_CONVERTMINUTEDATA
266 00B5 3800 R SNZ F_LEDFLASH
267 00B6 28BA JMP L_CONVERTMINUTEDATA
268 00B7 0FFF MOV A,0FFH
269 00B8 0080 R MOV R_LEDMINUTE,A
270 00B9 28BD JMP L_CONVERTSECONDDATA
271 00BA L_CONVERTMINUTEDATA:
272 00BA 0700 R MOV A,R_MINUTE
273 00BB 22C9 CALL SBR_HEXTODEC
274 00BC 0080 R MOV R_LEDMINUTE,A
275 00BD ;;------------------------------------------------
276 00BD L_CONVERTSECONDDATA:
277 00BD 0700 R MOV A,R_SECOND
278 00BE 22C9 CALL SBR_HEXTODEC
279 00BF 0080 R MOV R_LEDSECOND,A
280 00C0
281 00C0 0700 R MOV A,R_TEMPERATURE
282 00C1 0A09 SUB A,09H
283 00C2 3C0A SZ C
284 00C3 28C6 JMP L_CONVERTTEMPERATURE
285 00C4 0700 R MOV A,R_TEMPERATURE
286 00C5 0DA0 OR A,0A0H
287 00C6 ; JMP L_CONVERTTEMPERATURE
288 00C6 ;;------------------------------------------------
289 00C6 L_CONVERTTEMPERATURE:
290 00C6 22C9 CALL SBR_HEXTODEC
291 00C7 0080 R MOV R_LEDTEMPERATURE,A
292 00C8
293 00C8 0700 R MOV A,R_MONTH_LUNAR
294 00C9 22C9 CALL SBR_HEXTODEC
295 00CA 0080 R MOV R_LEDLMONTH,A
296 00CB
297 00CB 0700 R MOV A,R_DATE_LUNAR
"File: WAN NIAN LI.ASM Holtek Cross-Assembler Version 2.86 Page 6
298 00CC 22C9 CALL SBR_HEXTODEC
299 00CD 0080 R MOV R_LEDLDATE,A
300 00CE
301 00CE 0700 R MOV A,R_DELTADAYS
302 00CF 22C9 CALL SBR_HEXTODEC
303 00D0 0080 R MOV R_LEDDELTADAYS,A
304 00D1 ;;-----------------------------------------------
305 00D1 L_SHOWLED:
306 00D1 22DC CALL SBR_LEDSCAN
307 00D2 L_CALCULATETEMPERATURE:
308 00D2 2275 CALL SBR_GETTEMPERATURE
309 00D3
310 00D3 280F JMP MLP_MAIN
311 00D4 #INCLUDE SUBROUTINE.ASM
312 05F9 #INCLUDE TABLE.ASM
313 00FA ;;************************************************
0 Errors⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -