📄 5-1.lst
字号:
065D 753E14 891 MOV Led2, #Blk_Led
0660 A3 892 IU2: INC DPTR
0661 E525 893 MOV A, Hour
0663 23 894 RL A
0664 93 895 MOVC A, @A+DPTR
0665 200102 896 JB FL_500ms, IU1
0668 240A 897 ADD A, #10D
066A F53F 898 IU1: MOV Led3, A
066C 12026E 899 LCALL Led_Min
066F 900 Time_24_End:
066F 22 901 RET
A51 MACRO ASSEMBLER 5-1 09/12/2004 21:30:19 PAGE 15
902 ;-----------------------------------------------------------------------------------------
0670 0B021501 903 ASC_12: DB 11D,2D,21D,1D,21D,2D,21D,3D,21D,4D,21D,5D,21D,6D,21D,7D
0674 15021503
0678 15041505
067C 15061507
0680 15081509 904 DB 21D,8D,21D,9D,11D,0D,11D,1D
0684 0B000B01
0688 01020001 905 DB 1D,2D,0D,1D,0D,2D,0D,3D,0D,4D,0D,5D,0D,6D,0D,7D,0D,8D,0D,9D
068C 00020003
0690 00040005
0694 00060007
0698 00080009
069C 01000101 906 DB 1D,0,1D,1D
907 ;-----------------------------------------------------------------------------------------
06A0 C0E0 908 T1INT: PUSH ACC
06A2 C0D0 909 PUSH PSW
06A4 C0F0 910 PUSH B
06A6 C20D 911 CLR FL_MS_F
06A8 D50C07 912 DJNZ T_1S, T1_End
06AB C20E 913 CLR FL_S_F
06AD 0523 914 INC SEC
06AF 1206B9 915 LCALL Adj_W
06B2 D0F0 916 T1_End: POP B
06B4 D0D0 917 POP PSW
06B6 D0E0 918 POP ACC
06B8 32 919 RETI
920 ;-----------------------------------------------------------------------------------------
06B9 C28E 921 Adj_W: CLR TR1
06BB 747F 922 MOV A, #T_L_100ms
06BD 2529 923 ADD A, W_Adj
06BF F58B 924 MOV TL1, A
06C1 745D 925 MOV A, #T_H_100MS
06C3 3400 926 ADDC A, #00H
06C5 F58D 927 MOV TH1, A
06C7 750C08 928 MOV T_1S, #Timer_NO
06CA D28E 929 SETB TR1
06CC 22 930 RET
931 ;-----------------------------------------------------------------------------------------
06CD 200D1A 932 FL_OUT: JB FL_MS_F, FL_OUT_End
06D0 D20D 933 SETB FL_MS_F
06D2 E50C 934 MOV A, T_1S
06D4 75F002 935 MOV B, #02D
06D7 84 936 DIV AB
06D8 E5F0 937 MOV A, B
06DA 7002 938 JNZ TO_D1
06DC B200 939 CPL FL_250ms
06DE E50C 940 TO_D1: MOV A, T_1S
06E0 75F004 941 MOV B, #04D
06E3 84 942 DIV AB
06E4 E5F0 943 MOV A, B
06E6 7002 944 JNZ TO_D2
06E8 B201 945 CPL FL_500ms
06EA 946 TO_D2:
06EA 947 FL_OUT_End:
06EA 1206EE 948 LCALL SEC_OUT
06ED 22 949 RET
950 ;-----------------------------------------------------------------------------------------
06EE 200E14 951 SEC_OUT:JB FL_S_F, SEC_OUT_End
06F1 D20E 952 SETB FL_S_F
06F3 E523 953 MOV A, SEC
06F5 75F007 954 MOV B, #07D
06F8 300503 955 JNB FL_3S, ZA1
06FB 75F002 956 MOV B, #02D
06FE 84 957 ZA1: DIV AB
06FF E5F0 958 MOV A, B
0701 7002 959 JNZ SEC_OUT_End
A51 MACRO ASSEMBLER 5-1 09/12/2004 21:30:19 PAGE 16
0703 B205 960 CPL FL_3S
0705 961 SEC_OUT_End:
0705 22 962 RET
963 ;-----------------------------------------------------------------------------------------
0706 E508 964 Key_Del: MOV A, Key_Data
0708 7010 965 JNZ KL_12
070A E53C 966 MOV A, Frist
070C 7001 967 JNZ KL_13
070E 22 968 RET
969 ;-----------------------------------------------------------------------------------------
070F 853C08 970 KL_13: MOV Key_Data,Frist
0712 753C00 971 MOV Frist, #0
0715 C20F 972 CLR Key_OVER
0717 020778 973 LJMP SF_Beep
071A 300F12 974 KL_12: JNB Key_OVER, KL11
071D E50A 975 MOV A, T_30ms
071F 2403 976 ADD A, #03
0721 75F03C 977 MOV B, #60D
0724 84 978 DIV AB
0725 E523 979 MOV A, SEC
0727 B5F00A 980 CJNE A, B, Key_Del_End
072A C20F 981 CLR Key_OVER
072C 020750 982 LJMP SET_Key
072F 85230A 983 KL11: MOV T_30ms, SEC
0732 D20F 984 SETB Key_OVER
0734 985 Key_Del_End:
0734 1207C3 986 LCALL SF_A
0737 B40605 987 CJNE A, #Key_DA, SFG_12
073A C20F 988 CLR Key_OVER
073C 020778 989 JMP SF_Beep
073F 85083C 990 SFG_12: MOV Frist, Key_Data
0742 750800 991 MOV Key_Data, #0
0745 22 992 RET
993 ;-----------------------------------------------------------------------------------------
0746 120780 994 Key_Bord: LCALL RE_K
0749 E508 995 MOV A, Key_Data
074B 6000 996 JZ Key_Bord1_End
074D 997 Key_Bord1_End:
074D D2B0 998 SETB Key_F
074F 22 999 RET
1000 ;-----------------------------------------------------------------------------------------
0750 E508 1001 SET_Key: MOV A, Key_Data
0752 B40105 1002 CJNE A, #01H, SET_CC1
0755 D203 1003 SETB Set_AL4_F
0757 02075F 1004 LJMP SF23
075A B40202 1005 SET_CC1: CJNE A, #02H, SF23
075D D202 1006 SETB Set_Clk_F
075F 22 1007 SF23: RET
1008 ;-----------------------------------------------------------------------------------------
0760 1200BB 1009 SF_Key: LCALL Clock
0763 12014E 1010 LCALL Week_Auto
0766 1201A4 1011 LCALL AL_Out
0769 D2B0 1012 SETB Key_F
076B 1202A5 1013 LCALL Led
076E 1207C3 1014 LCALL SF_A
0771 B406EC 1015 CJNE A, #Key_DA, SF_Key
0774 120778 1016 LCALL SF_Beep
0777 22 1017 RET
1018 ;-----------------------------------------------------------------------------------------
0778 C2B7 1019 SF_Beep: CLR Beep_F
077A 120311 1020 LCALL Timer_20ms
077D D2B7 1021 SETB Beep_F
077F 22 1022 RET
1023 ;-----------------------------------------------------------------------------------------
0780 750800 1024 RE_K: MOV Key_Data, #00H
0783 759000 1025 MOV P1, #00H
A51 MACRO ASSEMBLER 5-1 09/12/2004 21:30:19 PAGE 17
0786 E5B0 1026 MOV A, P3
0788 447F 1027 ORL A, #01111111B
078A F5B0 1028 MOV P3, A
078C C2B0 1029 CLR Key_F
078E E5B0 1030 MOV A, P3
0790 D2B0 1031 SETB Key_F
0792 7590FF 1032 MOV P1, #0FFH
0795 5406 1033 ANL A, #00000110B
0797 B40601 1034 CJNE A, #00000110B,You_Key
079A 22 1035 RE_K_End:RET
1036 ;-----------------------------------------------------------------------------------------
079B 120311 1037 You_Key: LCALL Timer_20ms
079E 759000 1038 MOV P1, #00H
07A1 E5B0 1039 MOV A, P3
07A3 447F 1040 ORL A, #01111111B
07A5 F5B0 1041 MOV P3, A
07A7 C2B0 1042 CLR Key_F
07A9 E5B0 1043 MOV A, P3
07AB D2B0 1044 SETB Key_F
07AD 7590FF 1045 MOV P1, #0FFH
07B0 5406 1046 ANL A, #Key_DA
07B2 B40601 1047 CJNE A, #Key_DA, You_Key1
07B5 22 1048 RET
1049 ;-----------------------------------------------------------------------------------------
07B6 20E103 1050 You_Key1:JB ACC.1, Key_KB
07B9 750802 1051 MOV Key_Data, #02H
07BC 20E203 1052 Key_KB: JB ACC.2, SF_Key0
07BF 750801 1053 MOV Key_Data, #01H
07C2 22 1054 SF_Key0: RET
1055 ;-----------------------------------------------------------------------------------------
07C3 759000 1056 SF_A: MOV P1, #00H
07C6 E5B0 1057 MOV A, P3
07C8 447F 1058 ORL A, #01111111B
07CA F5B0 1059 MOV P3, A
07CC C2B0 1060 CLR Key_F
07CE E5B0 1061 MOV A, P3
07D0 D2B0 1062 SETB Key_F
07D2 5406 1063 ANL A, #Key_DA
07D4 22 1064 RET
1065 ;-----------------------------------------------------------------------------------------
1066 END
A51 MACRO ASSEMBLER 5-1 09/12/2004 21:30:19 PAGE 18
SYMBOL TABLE LISTING
------ ----- -------
N A M E T Y P E V A L U E ATTRIBUTES
ACC. . . . . . . . D ADDR 00E0H A
ADJ_W. . . . . . . C ADDR 06B9H A
AL1. . . . . . . . N NUMB 0013H A
AL1_F. . . . . . . B ADDR 0020H.6 A
AL1_H. . . . . . . N NUMB 002BH A
AL1_M. . . . . . . N NUMB 002CH A
AL2. . . . . . . . N NUMB 0014H A
AL2_F. . . . . . . B ADDR 0020H.7 A
AL2_H. . . . . . . N NUMB 002DH A
AL2_M. . . . . . . N NUMB 002EH A
AL3. . . . . . . . N NUMB 0015H A
AL3_F. . . . . . . B ADDR 0021H.0 A
AL3_H. . . . . . . N NUMB 002FH A
AL3_M. . . . . . . N NUMB 0030H A
AL4. . . . . . . . N NUMB 0016H A
AL4_F. . . . . . . B ADDR 0021H.1 A
AL4_H. . . . . . . N NUMB 0031H A
AL4_M. . . . . . . N NUMB 0032H A
AL5. . . . . . . . N NUMB 0017H A
AL5_H. . . . . . . N NUMB 0033H A
AL5_M. . . . . . . N NUMB 0034H A
AL6. . . . . . . . N NUMB 0018H A
AL6_H. . . . . . . N NUMB 0035H A
AL6_M. . . . . . . N NUMB 0036H A
AL7. . . . . . . . N NUMB 0019H A
AL7_H. . . . . . . N NUMB 0037H A
AL7_M. . . . . . . N NUMB 0038H A
AL8. . . . . . . . N NUMB 001AH A
AL8_H. . . . . . . N NUMB 0039H A
AL8_M. . . . . . . N NUMB 003AH A
ALL1 . . . . . . . C ADDR 0222H A
AL_1 . . . . . . . C ADDR 0071H A
AL_ASC . . . . . . C ADDR 00ABH A
AL_CH. . ⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -