📄 mnapp.lst
字号:
196 000000
197 000000 ;************************************************
198 000000 tenminkey:
199 000000 ;-----
200 000000 b0bts1 settimeflag
201 000000 jmp checkkey90 ;在某些功能下无效
202 000000 ;---
203 000000 bset refurbishflag
204 000000 bset timekeyflag
205 000000 mov a,timerbuf
206 000000 and a,#0f0h
207 000000 sub a,#90h
208 000000 b0bts0 fc
209 000000 jmp turnoffnum1
210 000000 ;-----
211 000000 mov a,#10h
212 000000 add timerbuf,a
213 000000 jmp checkkey90
214 000000 ;---------------------
215 000000 turnoffnum1:
216 000000 mov a,#0fh
217 000000 and timerbuf,a
218 000000 jmp checkkey90
219 000000 ;************************************************
220 000000 oneminkey:
221 000000 ;-----
222 000000 b0bts1 settimeflag
223 000000 jmp checkkey90 ;在某些功能下无效
224 000000 ;---
225 000000 bset refurbishflag
226 000000 bset timekeyflag
227 000000 mov a,timerbuf
228 000000 and a,#0fh
229 000000 sub a,#9
230 000000 b0bts0 fc
231 000000 jmp backzeronum0
232 000000 ;-----
233 000000 mov a,#1
234 000000 add timerbuf,a
235 000000 jmp checkkey90
236 000000 ;-----
237 000000 backzeronum0:
238 000000 mov a,#0f0h
239 000000 and timerbuf,a
240 000000 jmp checkkey90
241 000000 ;************************************************
242 000000 inckey:
243 000000 ;----
244 000000 b0bts1 operateflag
245 000000 jmp checkkey90
246 000000 ;----
247 000000 mov a,flag3
248 000000 and a,#01111000b
249 000000 b0bts1 fz
250 000000 jmp checkkey90
251 000000 ;-----
252 000000 mov a,stepbuf ;0~8
253 000000 sub a,#8
254 000000 b0bts0 fc
255 000000 jmp checkkey90
256 000000 ;----
257 000000 incms stepbuf
258 000000 nop
259 000000 bset parameterflag
260 000000 bset tempkeyflag
261 000000 ;-------------------
262 000000 lightled:
263 000000 b0mov y,#ledtbl$m
264 000000 b0mov z,#ledtbl$l
265 000000 mov a,stepbuf
266 000000 add z,a
267 000000 mov a,#0
268 000000 adc y,a
269 000000 ;---
270 000000 movc
271 000000 mov seg4buf,a
272 000000 jmp checkkey90
273 000000 ;************************************************
274 000000 deckey:
275 000000 ;----
276 000000 b0bts1 operateflag
277 000000 jmp checkkey90
278 000000 ;-----
279 000000 mov a,flag3
280 000000 and a,#01111000b
281 000000 b0bts1 fz
282 000000 jmp checkkey90
283 000000 ;-----
284 000000 b0bts1 barbecueflag
285 000000 jmp checkstep50
286 000000 ;---
287 000000 mov a,stepbuf
288 000000 cmprs a,#3
289 000000 jmp stepdec
290 000000 jmp checkkey90
291 000000 ;-------------
292 000000 checkstep50:
293 000000 mov a,stepbuf
294 000000 b0bts0 fz
295 000000 jmp checkkey90
296 000000 ;----
297 000000 stepdec:
298 000000 decms stepbuf
299 000000 nop
300 000000 bset parameterflag
301 000000 bset tempkeyflag
302 000000 jmp lightled
303 000000 ;************************************************
304 000000 offkey:
305 000000 ;----
306 000000 call clearallflag
307 000000 bset Igbtstartupflag
308 000000 bset stoprunflag
309 000000 call mnstopheat
310 000000 mov a,#0ffh
311 000000 mov seg1buf,a
312 000000 mov seg2buf,a
313 000000 mov seg3buf,a
314 000000 mov seg4buf,a
315 000000 jmp checkkey90
316 000000 ;*************************************************
317 000000 canceltimekey:
318 000000 bclr timekeyflag
319 000000 mov a,#01000000b
320 000000 mov seg1buf,a
321 000000 mov seg2buf,a
322 000000 clr timerbuf
323 000000 bclr t1mflag
324 000000 mov_ timer1m,#60 ;reset 1 minute
325 000000 ;*************************************************
326 000000 checkkey90:
327 000000 clr aplcode
328 000000 ;----
329 000000 ;有按键,重新刷新时间
330 000000 bclr t2hflag
331 000000 mov_ timer2h,#2 ;两小时定时控制
332 000000 checkkey100:
333 000000 ret
334 000000
335 000000 ;**********************************************
336 000000 ;Name :getinitparameter
337 000000 ;Function:控制参数获得
338 000000 ;Input :
339 000000 ;Output :
340 000000 ;Register Used:var3
341 000000 ;**********************************************
342 000000 getinitparameter:
343 000000 b0bts0 stoprunflag
344 000000 jmp getinitparameter90
345 000000 b0bts1 operateflag
346 000000 jmp getinitparameter90
347 000000 b0bts1 parameterflag
348 000000 jmp getinitparameter90
349 000000 ;-----
350 000000 bclr parameterflag
351 000000 ;---------------------------------------------
352 000000 mov_ var3,stepbuf
353 000000 bclr fc
354 000000 rlcm var3
355 000000 b0mov y,#steptbl2$m
356 000000 b0mov z,#steptbl2$l
357 000000 ;---
358 000000 mov a,var3
359 000000 add z,a
360 000000 mov a,#0
361 000000 adc y,a
362 000000 ;---
363 000000 movc
364 000000 mov powervaluel,a
365 000000 mov_ powervaluem,r
366 000000 incms z
367 000000 jmp searchnexttbl
368 000000 incms y
369 000000 nop
370 000000 ;---
371 000000 searchnexttbl:
372 000000 movc
373 000000 mov powervalueh,a ;功率参数
374 000000 ;---------------------------------------------
375 000000 b0mov y,#temptbl$m
376 000000 b0mov z,#temptbl$l
377 000000 ;---
378 000000 mov a,stepbuf
379 000000 add z,a
380 000000 mov a,#0
381 000000 adc y,a
382 000000 ;---
383 000000 movc
384 000000 mov ADCtempbufl,a
385 000000 mov_ ADCtempbufh,r ;温度参数
386 000000 ;----------------------------------------------
387 000000 mov a,stepbuf
388 000000 sub a,#3
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -