📄 wnlbak.lst
字号:
300 0057
301 0057 endm
302 0057
303 0057
304 0057
305 0057
306 0057
307 0057 ;******************************
308 0000 code .section 'code'
309 0000 org 00h
310 0000 0000 nop
311 0001 0000 nop
312 0002 0000 nop
313 0003 2800 R jmp start
314 0004 org 04h
315 0004 0004 reti
316 0005 org 08h
317 0008 ;jmp tmr_int
318 0008
319 0008
320 0008 ;org 0dh
321 0008 tmr_int:
322 0008 ;sz nowork
323 0008 ;jmp tmr_int_2
324 0008 3000 R set b_f125ms
325 0009 3000 R set b_f125ms1
326 000A 3C00 R sz b_250msnum
327 000B 2800 R jmp tmr_int_1
328 000C 3000 R set b_250msnum
329 000D 0004 reti
330 000E tmr_int_1:
331 000E 3400 R clr b_250msnum
332 000F 3000 R set b_f250ms1
333 0010 3000 R set b_f250ms2
334 0011
335 0011 3C00 R sz b_05snum
336 0012 2800 R jmp tmr_int_2
337 0013 3000 R set b_05snum
338 0014 0004 reti
339 0015 tmr_int_2:
340 0015 3400 R clr b_05snum
341 0016 3000 R set b_05s1
342 0017 3000 R set b_05s2
343 0018 0004 reti
344 0019
345 0019
346 0019 start:
347 0019 1F0B clr intc
348 001A 0F60 mov a,60h
349 001B 0080 R mov temp,a
350 001C 0F29 mov a, 29h
351 001D 0081 mov mp0,a
352 001E ram_clr: ;清除内存
353 001E 1F00 clr r0
354 001F 1481 inc mp0
355 0020 1780 R sdz temp
356 0021 2800 R jmp ram_clr
357 0022
358 0022 0F02 mov a,02h
359 0023 0095 mov pbc,a
"File: WNLBAK.ASM Holtek Cross-Assembler Version 2.86 Page 7
360 0024 0FF2 mov a,0f2h
361 0025 0094 mov pb,a
362 0026 0FE0 mov a,0e0h
363 0027 0093 mov pac,a
364 0028 0FFF mov a,0ffh
365 0029 0092 mov pa,a
366 002A 0FFF mov a,0ffh
367 002B 0096 mov pc,a
368 002C 0098 mov pd,a
369 002D 009A mov pe,a
370 002E
371 002E ; set b_setampm
372 002E 3414 clr pbuzzer
373 002F
374 002F 3000 R set buzzernum.0
375 0030 0F80 mov a,128
376 0031 008D mov tmr,a
377 0032 0F90 mov a,90h
378 0033 008E mov tmrc,a
379 0034
380 0034 300B set intc.0
381 0035 310B set intc.2
382 0036
383 0036 3000 R set autolednum.2
384 0037 3000 R set b_setampm ;;12 hour
385 0038
386 0038 2000 R call sub_checkwork
387 0039 3C00 R sz nowork
388 003A 2800 R jmp start_reset
389 003B ledtest:
390 003B 0F01 mov a,01h
391 003C 0080 R mov temp,a
392 003D ledtest_0:
393 003D 0700 R mov a,temp
394 003E 0CFF xor a,0ffh
395 003F 0096 mov pc,a
396 0040 0098 mov pd,a
397 0041 009A mov pe,a
398 0042 1F12 clr pa
399 0043 3694 clr pcom5
400 0044 3714 clr pcom6
401 0045 3794 clr pcom7
402 0046 ;mov a,00h
403 0046 ;mov pb,a
404 0046 ledtest_1:
405 0046 3800 R snz b_05s1
406 0047 2800 R jmp $-1
407 0048 3400 R clr b_05s1
408 0049 3C00 R sz flash
409 004A 2800 R jmp ledtest_2
410 004B 3000 R set flash
411 004C 2800 R jmp ledtest_1
412 004D ledtest_2:
413 004D 3400 R clr flash
414 004E
415 004E 3C00 R sz temp.7
416 004F 2800 R jmp ledtest_end
417 0050
418 0050 1880 R rl temp
419 0051 2800 R jmp ledtest_0
"File: WNLBAK.ASM Holtek Cross-Assembler Version 2.86 Page 8
420 0052 ledtest_end:
421 0052 1F92 set pa
422 0053 3294 set pcom5
423 0054 3314 set pcom6
424 0055 3394 set pcom7
425 0056 1F16 clr pc
426 0057 1F18 clr pd
427 0058 1F1A clr pe
428 0059
429 0059 2800 R jmp start_reset
430 005A
431 005A
432 005A
433 005A
434 005A
435 005A
436 005A start_000:
437 005A
438 005A 2800 R jmp start_3_2
439 005B
440 005B
441 005B start_1:
442 005B start_3:
443 005B 3800 R snz nowork
444 005C 2800 R jmp start_nohold
445 005D 3095 set pworkc
446 005E 2000 R call sub_checkwork
447 005F 0000 nop
448 0060 0002 halt
449 0061 0000 nop
450 0062 start_nohold:
451 0062
452 0062
453 0062
454 0062 start_notinit:
455 0062 2000 R call sub_clock
456 0063 2000 R call sub_checkwork
457 0064
458 0064 3C00 R sz nowork
459 0065 2800 R jmp start_3_1
460 0066
461 0066 2000 R call sub_led
462 0067 2000 R call sub_main1
463 0068
464 0068 2000 R call sub_dealkey
465 0069 2000 R call sub_buzzer
466 006A 2000 R call sub_checkzhengdian
467 006B 3800 R snz b_f250ms1
468 006C 2800 R jmp start_notinit_1
469 006D 3400 R clr b_f250ms1
470 006E 2000 R call sub_checkalm
471 006F
472 006F 2000 R call sub_zhengdian
473 0070 2000 R call sub_main
474 0071 2000 R call sub_stopset
475 0072 3800 R snz b_workbuzzer
476 0073 2800 R jmp start_notinit_1
477 0074 3400 R clr b_workbuzzer
478 0075 3414 clr pbuzzer
479 0076 start_notinit_1:
"File: WNLBAK.ASM Holtek Cross-Assembler Version 2.86 Page 9
480 0076 2000 R call sub_dealtemper
481 0077
482 0077 0F01 mov a,1
483 0078 0080 R mov temp1,a
484 0079 2000 R call sub_delay
485 007A start_3_1:
486 007A 3800 R snz datechange
487 007B 2800 R jmp start_1
488 007C 3400 R clr datechange
489 007D start_3_2:
490 007D 2000 R call sub_getnongli
491 007E 2000 R call sub_getweek
492 007F 2000 R call sub_get24jie
493 0080
494 0080 2000 R call main_xxx
495 0081 2800 R jmp start_1
496 0082
497 0082 ;;*************************************************************
498 0082
499 0082
500 0082
501 0082
502 0082
503 0082
504 0082 ;;-------------------------------------------------
505 0082
506 0082 start_reset:
507 0082
508 0082 0F01 mov a,1
509 0083 0080 R mov year,a
510 0084 0080 R mov r_almnum,a
511 0085
512 0085 0080 R mov month,a
513 0086 0080 R mov date,a
514 0087 1F00 R clr hour
515 0088 1F00 R clr min
516 0089 3000 R set b_initflag
517 008A
518 008A 0F00 mov a,00h
519 008B 2000 R call sub_num
520 008C 2800 R jmp start_000
521 008D
522 008D sub_zhengdian:
523 008D ; snz b_f250ms2
524 008D ; ret
525 008D ; clr b_f250ms2
526 008D 3800 R snz zhengdianflag
527 008E 0003 ret
528 008F 1480 R inc zhengdiantime
529 0090 0700 R mov a,zhengdiantime
530 0091 0A2A sub a,42
531 0092 1085 sz acc
532 0093 2800 R jmp zhengdian_1
533 0094 1F00 R clr zhengdiantime
534 0095 3414 clr pbuzzer
535 0096 3400 R clr zhengdianflag
536 0097 0003 ret
537 0098 zhengdian_1:
538 0098 3C00 R sz zhengdiantime.0
539 0099 2800 R jmp buzzer_off
"File: WNLBAK.ASM Holtek Cross-Assembler Version 2.86 Page 10
540 009A 2800 R jmp buzzer_on
541 009B
542 009B ;;***********************************************
543 009B
544 009B sub_stopset:
545 009B 1080 R sz set_flag
546 009C 2800 R jmp stopset_1
547 009D 1080 R sz r_setalm
548 009E 2800 R jmp stopset_1
549 009F 0003 ret
550 00A0 stopset_1:
551 00A0 1480 R inc r_settime
552 00A1 0700 R mov a,r_settime
553 00A2 0A78 sub a,120
554 00A3 380A snz c
555 00A4 0003 ret
556 00A5 1F00 R clr r_settime
557 00A6 stopset_1_1:
558 00A6 1080 R sz r_setalm
559 00A7 2800 R jmp stopset_2
560 00A8 1F00 R clr set_flag
561 00A9 0003 ret
562 00AA stopset_2:
563 00AA
564 00AA 1F00 R clr r_setalm
565 00AB 2800 R jmp dealkey_kr_setalm0
566 00AC
567 00AC
568 00AC ;;-----------------------------------------------
569 00AC
570 00AC sub_buzzer:
571 00AC 3800 R snz b_buzzer
572 00AD 0003 ret
573 00AE 3800 R snz b_f125ms
574 00AF 0003 ret
575 00B0 3400 R clr b_f125ms
576 00B1 1480 R inc buzzertime
577 00B2 3800 R snz buzzertime.3
578 00B3 2800 R jmp buzzer_000
579 00B4 1F00 R clr buzzertime
580 00B5
581 00B5 3800 R snz buzzerflash
582 00B6 2800 R jmp buzzer_flash
583 00B7 3400 R clr buzzerflash
584 00B8 3014 set pbuzzer
585 00B9 1480 R inc buzzer1s
586 00BA 0700 R mov a,buzzer1s
587 00BB 0A0A sub a,10
588 00BC 1085 sz acc
589 00BD 0003 ret
590 00BE 1F00 R clr buzzer1s
591 00BF 3400 R clr b_buzzer
592 00C0 ;; jmp buzzer_off
593 00C0 buzzer_off:
594 00C0 3414 clr pbuzzer
595 00C1 0003 ret
596 00C2 buzzer_000:
597 00C2 3C00 R sz buzzerflash
598 00C3 0003 ret
599 00C4 3C00 R sz buzzertime.0
"File: WNLBAK.ASM Holtek Cross-Assembler Version 2.86 Page 11
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -