📄 -=-
字号:
A51 MACRO ASSEMBLER 万年繽 09/17/2007 19:28:36 PAGE 1
MACRO ASSEMBLER A51 V7.10
OBJECT MODULE PLACED IN 万年历.OBJ
ASSEMBLER INVOKED BY: C:\Keil\C51\BIN\A51.EXE 万年历.ASM SET(SMALL) DEBUG EP
LOC OBJ LINE SOURCE
1 ;*****************************
2 ;* 万年历程序 *
3 ;*****************************
4 ;67H(高两位年)66H(低两位年)65H(月)64H(星期)
5 ;63H(日)62H(小时)61H(分)60H(秒)57H(农历月)56H(农历日)
6 ;显示缓冲单元7CH~7BH(4CH~4BH)年低位,7AH~79H(4AH~49H)月,
7 ;78H(48H)星期,77H~76H(47H~46H)日,75H~74H(45H~44H)时,
8 ;73H72H(43H~42H)分,71H~70H(41H~40H)秒,5EH~5DH(55H~54H)农历年
9 ;5CH~5BH(53H~52H)农历月,5AH~59H(51H~50H)农历日
10 ;闰年标志为F0,定时器T1为调整时候闪烁用
11 ;
12 ;
00B2 13 SCLK EQU P3.2
00B3 14 IO EQU P3.3
00B4 15 RST EQU P3.4
0066 16 TIME_YEAR DATA 66H
0065 17 TIME_MONTH DATA 65H
0064 18 WEEK DATA 64H
0063 19 TIME_DAY DATA 63H
0062 20 HOUR DATA 62H
0061 21 MINTUE DATA 61H
0060 22 SECOND DATA 60H
0032 23 DS1302_ADDR DATA 32H
0031 24 DS1302_DATA DATA 31H
0001 25 start_year EQU 01; 定义查询表起始年份 ,01--199 表示 1
901-2099 年
003A 26 week_byte1 DATA 3AH
003B 27 WEEK_BYTE2 DATA 3BH
003C 28 WEEK_BYTE3 DATA 3CH
003D 29 WEEK_BYTE4 DATA 3DH
003E 30 WEEK_BYTE5 DATA 3EH
31
006D 32 CONvert_year DATA 6dh
006E 33 CONvert_month DATA 6eh ;BIT7 为 1 表示闰月
006F 34 CONvert_date DATA 6fh
0068 35 temp_Byte1 DATA 68h
0069 36 temp_Byte2 DATA 69h
006A 37 temp_Byte3 DATA 6Ah
006B 38 temp_Byte4 DATA 6Bh
006C 39 temp_Byte5 DATA 6Ch
40
41
0000 42 ORG 0000H
0000 012C 43 AJMP START
0003 44 ORG 0003H
0003 32 45 RETI
000B 46 ORG 000BH
000B 32 47 RETI
0013 48 ORG 0013H
0013 32 49 RETI
001B 50 ORG 001BH
001B 02056E 51 LJMP INTT1
0023 52 ORG 0023H
0023 32 53 RETI
002B 54 ORG 002BH
002B 32 55 RETI
56 ;************************************
57 ;* 主程序 *
A51 MACRO ASSEMBLER 万年繽 09/17/2007 19:28:36 PAGE 2
58 ;************************************
002C 797E 59 start: mov r1,#7Eh
002E 7802 60 mov r0,#2
0030 7400 61 mov a,#0
0032 F6 62 clear: mov @r0,a
0033 08 63 inc r0
0034 D9FC 64 djnz r1,clear
0036 F8 65 mov r0,A
66
67
0037 759800 68 MOV SCON,#00H ;串行输出,方式0
003A 758910 69 MOV TMOD,#10H ;计势
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -