📄 wnlbak.lst
字号:
600 00C5 2800 R jmp buzzer_off
601 00C6 2800 R jmp buzzer_on
602 00C7
603 00C7
604 00C7 buzzer_on:
605 00C7 3014 set pbuzzer
606 00C8 0003 ret
607 00C9
608 00C9 buzzer_flash:
609 00C9 3000 R set buzzerflash
610 00CA 2800 R jmp buzzer_off
611 00CB ;;**********************************************************
612 00CB sub_checkwork:
613 00CB 3C00 R sz nowork
614 00CC 2800 R jmp checkwork_1
615 00CD 3C94 sz pwork
616 00CE 0003 ret
617 00CF 2000 R call delay5ms
618 00D0 3C94 sz pwork
619 00D1 0003 ret
620 00D2 3000 R set nowork
621 00D3 ;mov a,0ffh
622 00D3 ;mov pb,a
623 00D3
624 00D3 0FFF mov a,0ffh ;; pa no pull high
625 00D4 0093 mov pac,a
626 00D5 0092 mov pa,a
627 00D6 0F02 mov a,02h
628 00D7 0095 mov pbc,a
629 00D8 0094 mov pb,a
630 00D9
631 00D9 0F00 mov a,0h
632 00DA 0096 mov pc,a
633 00DB 0098 mov pd,a
634 00DC 009A mov pe,a
635 00DD 3414 clr pbuzzer
636 00DE 3400 R clr b_buzzer
637 00DF 3400 R clr zhengdianflag
638 00E0
639 00E0 1F00 R clr set_flag
640 00E1 1F00 R clr r_setalm
641 00E2
642 00E2 ;clr tmrc.4
643 00E2 ;mov a,90h
644 00E2 ;mov tmrc,a
645 00E2 0003 ret
646 00E3
647 00E3 checkwork_1:
648 00E3 3894 snz pwork
649 00E4 0003 ret
650 00E5 2000 R call delay5ms
651 00E6 3894 snz pwork
652 00E7 0003 ret
653 00E8 3400 R clr nowork
654 00E9 3014 set pbuzzer
655 00EA 3000 R set b_workbuzzer
656 00EB 0F02 mov a,02h
657 00EC 0095 mov pbc,a
658 00ED 0FF2 mov a,0f2h
659 00EE 0094 mov pb,a
"File: WNLBAK.ASM Holtek Cross-Assembler Version 2.86 Page 12
660 00EF 0FE0 mov a,0e0h
661 00F0 0093 mov pac,a
662 00F1 0FFF mov a,0ffh
663 00F2 0092 mov pa,a
664 00F3
665 00F3 0003 ret
666 00F4
667 00F4
668 00F4 delay5ms:
669 00F4 0F01 mov a,1
670 00F5 0080 R mov temp1,a
671 00F6 sub_delay:
672 00F6 1F00 R clr temp
673 00F7 1780 R sdz temp
674 00F8 2800 R jmp $-1
675 00F9 1780 R sdz temp1
676 00FA 2800 R jmp $-4
677 00FB 0003 ret
678 00FC
679 00FC
680 00FC main1_1:
681 00FC 3000 R set flash1
682 00FD 3400 R clr dot1
683 00FE 3400 R clr dot2
684 00FF 2800 R jmp sub_getbitnum4
685 0100
686 0100
687 0100
688 0100 sub_main1:
689 0100 1080 R sz r_setalm
690 0101 0003 ret
691 0102 1080 R sz set_flag
692 0103 2800 R jmp main1_2
693 0104 3800 R snz b_05s2
694 0105 0003 ret
695 0106 3400 R clr b_05s2
696 0107 3800 R snz flash1
697 0108 2800 R jmp main1_1
698 0109 main1_2:
699 0109 3400 R clr flash1
700 010A
701 010A 3000 R set dot1
702 010B 3000 R set dot2
703 010C 2800 R jmp sub_getbitnum4
704 010D ;;*****************************************************************8
705 010D sub_main:
706 010D ;snz b_f250ms1
707 010D ;ret
708 010D ;clr b_f250ms1
709 010D main_xxx:
710 010D
711 010D
712 010D 2000 R call sub_getbitnum
713 010E 2000 R call sub_runled
714 010F
715 010F 0700 R mov a,bitnum2a
716 0110 0580 R orm a,bitnum2
717 0111 0700 R mov a,bitnum1a
718 0112 0580 R orm a,bitnum1
719 0113 0700 R mov a,bitnum3a
"File: WNLBAK.ASM Holtek Cross-Assembler Version 2.86 Page 13
720 0114 0580 R orm a,bitnum3
721 0115
722 0115 1080 R sz r_setalm
723 0116 2800 R jmp main_alarm ;;set alarm mode
724 0117
725 0117 3C00 R sz flash
726 0118 2800 R jmp main_clock_flash ;; flash
727 0119 main_clock_1:
728 0119 3000 R set flash
729 011A main_clock_2:
730 011A
731 011A 2000 R call sub_gethournum
732 011B
733 011B
734 011B
735 011B 0700 R mov a,r_temper
736 011C 0A0A sub a,10
737 011D 3C0A sz c
738 011E 2800 R jmp main_clock_2_1
739 011F 0F0A mov a,10
740 0120 0200 R sub a,r_temper
741 0121 0DA0 or a,0a0h
742 0122 2800 R jmp $+2
743 0123 main_clock_2_1:
744 0123 2000 R call sub_hex2t
745 0124
746 0124 0080 R mov r_numtemp,a
747 0125
748 0125 0700 R mov a,year
749 0126 2000 R call sub_hex2t
750 0127 0080 R mov r_numyear,a
751 0128
752 0128
753 0128 0700 R mov a,min
754 0129 2000 R call sub_hex2t
755 012A 0080 R mov r_nummin,a
756 012B
757 012B 0700 R mov a,nmonth_1
758 012C 2000 R call sub_hex2t
759 012D
760 012D 0080 R mov r_numnlmonth,a
761 012E
762 012E 0700 R mov a,month
763 012F 2000 R call sub_hex2t
764 0130 0080 R mov r_nummonth,a
765 0131
766 0131 0700 R mov a,sec
767 0132 2000 R call sub_hex2t
768 0133 0080 R mov r_numsec,a
769 0134
770 0134 0700 R mov a,ndate_1
771 0135 2000 R call sub_hex2t
772 0136 0080 R mov r_numnldate,a
773 0137
774 0137 0700 R mov a,date
775 0138 2000 R call sub_hex2t
776 0139 0080 R mov r_numdate,a
777 013A
778 013A 0700 R mov a,remainday
779 013B 2000 R call sub_hex2t
"File: WNLBAK.ASM Holtek Cross-Assembler Version 2.86 Page 14
780 013C 0080 R mov r_numremain,a
781 013D 0700 R mov a,week
782 013E 0080 R mov r_numweek,a
783 013F
784 013F 0003 ret
785 0140
786 0140 main_clock_flash:
787 0140
788 0140
789 0140 3400 R clr flash
790 0141
791 0141 3C00 R sz autolednum.0
792 0142 2800 R jmp main_clock_flash_x
793 0143 2000 R call sub_getbitnum
794 0144
795 0144 0700 R mov a,bitnum2
796 0145 0CFF xor a,0ffh
797 0146 0600 R and a,bitnum2a
798 0147 0080 R mov bitnum2,a
799 0148 0700 R mov a,bitnum1
800 0149 0CFF xor a,0ffh
801 014A 0600 R and a,bitnum1a
802 014B 0080 R mov bitnum1,a
803 014C 0700 R mov a,bitnum3
804 014D 0CFF xor a,0ffh
805 014E 0600 R and a,bitnum3a
806 014F 0080 R mov bitnum3,a
807 0150 main_clock_flash_x:
808 0150
809 0150
810 0150
811 0150 3C00 R sz upfast
812 0151 0003 ret
813 0152 3C00 R sz downfast
814 0153 0003 ret
815 0154
816 0154 0FFF mov a,0ffh
817 0155 3C00 R sz set_flag.0 ;; year
818 0156 0080 R mov r_numyear,a
819 0157 3C00 R sz set_flag.1 ;; month
820 0158 0080 R mov r_nummonth,a
821 0159 3C00 R sz set_flag.2 ;; date
822 015A 0080 R mov r_numdate,a
823 015B 3C00 R sz set_flag.3 ;; hour
824 015C 0080 R mov r_numhour,a
825 015D 3C00 R sz set_flag.4 ;; min
826 015E 0080 R mov r_nummin,a
827 015F 0003 ret
828 0160
829 0160
830 0160
831 0160 main_alarm:
832 0160 3C00 R sz flash
833 0161 2800 R jmp main_alarm_flash
834 0162 main_alarm_1:
835 0162 2000 R call sub_getbitnum4
836 0163 3400 R clr bitnum4.3
837 0164 3000 R set bitnum4.2
838 0165 main_alarm_2:
839 0165
"File: WNLBAK.ASM Holtek Cross-Assembler Version 2.86 Page 15
840 0165
841 0165
842 0165 3000 R set flash
843 0166 0FFF mov a,0ffh
844 0167 0080 R mov r_numyear,a
845 0168 0080 R mov r_numnldate,a
846 0169 0080 R mov r_numnlmonth,a
847 016A 0080 R mov r_numsec,a
848 016B 0080 R mov r_nummonth,a
849 016C 0080 R mov r_numtemp,a
850 016D 0080 R mov r_numdate,a
851 016E 0FAA mov a,0aah ;; show "--"
852 016F 3C00 R sz b_alarmflag
853 0170 0F0B mov a,0bh ;; show "ON"
854 0171 0080 R mov r_nummonth,a
855 0172
856 0172 0700 R mov a,r_almnum
857 0173 0080 R mov r_numweek,a
858 0174 2000 R call sub_getalmhournum
859 0175
860 0175 0700 R mov a,remainday
861 0176 2000 R call sub_hex2t
862 0177 0080 R mov r_numremain,a
863 0178
864 0178 0700 R mov a,almmin
865 0179 2000 R call sub_hex2t
866 017A 0080 R mov r_nummin,a
867 017B 0003 ret
868 017C main_alarm_flash:
869 017C 3400 R clr flash
870 017D 3C00 R sz autolednum.0
871 017E 2800 R jmp main_alarm_flash_x
872 017F 2000 R call sub_getbitnum
873 0180
874 0180 0700 R mov a,bitnum2
875 0181 0CFF xor a,0ffh
876 0182 0600 R and a,bitnum2a
877 0183 0080 R mov bitnum2,a
878 0184 0700 R mov a,bitnum1
879 0185 0CFF xor a,0ffh
880 0186 0600 R and a,bitnum1a
881 0187 0080 R mov bitnum1,a
882 0188 0700 R mov a,bitnum3
883 0189 0CFF xor a,0ffh
884 018A 0600 R and a,bitnum3a
885 018B 0080 R mov bitnum3,a
886 018C main_alarm_flash_x:
887 018C
888 018C 3C00 R sz upfast
889 018D 2800 R jmp main_alarm_flash_2
890 018E 3C00 R sz downfast
891 018F 2800 R jmp main_alarm_flash_2
892 0190
893 0190 0FFF mov a,0ffh
894 0191 3C00 R sz r_setalm.1
895 0192 0080 R mov r_numhour,a
896 0193 3C00 R sz r_setalm.2
897 0194 0080 R mov r_nummin,a
898 0195 3C00 R sz r_setalm.0
899 0196 0080 R mov r_numweek,a
"File: WNLBAK.ASM Holtek Cross-Assembler Version 2.86 Page 16
900 0197 3C00 R sz r_setalm.3
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -