📄 wnl.lst
字号:
"File: WNL.ASM Holtek Cross-Assembler Version 2.86 Page 1
1 0000 ;;*********************************************************************
2 0000 ;; File Name : wnl.asm
3 0000 ;;PROJECT NIAN: MILLION YEARS CALENDAR OF LED
4 0000 ;;MCU BODY: HT45R03
5 0000 ;;PRODUCT: 51PIN COB
6 0000 ;;VDD: 5V
7 0000 ;;FSYS: RC MODE(270K)
8 0000 ;;WAKE UP: NONE WAKE-UP
9 0000 ;;PULL-HIGH: PA, PC, PD, AND PE PORT
10 0000 ;;NONE PULL-HIGH: PB PORT
11 0000 ;;LVR: DISABLE
12 0000 ;;WDT: DISABLE
13 0000 ;;FS CLOCK SOURCE: RTC OSC
14 0000 ;;BZ FREQUENCY FS/8(4KHZ)
15 0000 ;;BZ OUTPUT: PB0(BZ),PB1(B\Z\)
16 0000 ;;LVR: 3V
17 0000 ;;TIMER CLOCK SOURCE: FSP
18 0000 ;;AUTHOR: Felix Chen
19 0000 ;;Version: v1.0
20 0000 ;;*********************************************************************
21 0000 ;#include ht45r03.inc
22 0000 r0 equ [00h]
23 0000 mp0 equ [01h]
24 0000 acc equ [05h]
25 0000 pcl equ [06h]
26 0000 tblp equ [07h]
27 0000 tblh equ [08h]
28 0000 status equ [0ah]
29 0000 intc equ [0bh]
30 0000 tmr equ [0dh]
31 0000 tmrc equ [0eh]
32 0000
33 0000 pa equ [12h]
34 0000 pac equ [13h]
35 0000 pb equ [14h]
36 0000 pbc equ [15h]
37 0000 pc equ [16h]
38 0000 pd equ [18h]
39 0000 PE EQU [1ah]
40 0000
41 0000 C EQU [0AH].0
42 0000 AC EQU [0AH].1
43 0000 Z EQU [0AH].2
44 0000 OV EQU [0AH].3
45 0000 PDF EQU [0AH].4
46 0000 TO EQU [0AH].5
47 0000 EMI EQU [0BH].0
48 0000 EEI EQU [0BH].1
49 0000 ETI EQU [0BH].2
50 0000 EIF EQU [0BH].4
51 0000 TF EQU [0BH].5
52 0000
53 0000
54 0000 pwork equ pb.1
55 0000 pbuzzer equ pb.0
56 0000
57 0000 ps equ pb.3 ;; for test temperature
58 0000 pr equ pb.4
59 0000 pin equ pb.2
"File: WNL.ASM Holtek Cross-Assembler Version 2.86 Page 2
60 0000
61 0000 psc equ pbc.3
62 0000 prc equ pbc.4
63 0000 pinc equ pbc.2
64 0000
65 0000 pworkc equ pbc.1
66 0000
67 0000 pup equ pa.6
68 0000 pdown equ pa.5
69 0000 pset equ pa.7
70 0000 P_REST EQU PA.5
71 0000 P_CLK EQU PA.6
72 0000 P_DATA EQU PA.7
73 0000
74 0000 pcom0 equ pa.0
75 0000 pcom1 equ pa.1
76 0000 pcom2 equ pa.2
77 0000 pcom3 equ pa.3
78 0000 pcom4 equ pa.4
79 0000 pcom5 equ pb.5
80 0000 pcom6 equ pb.6
81 0000 pcom7 equ pb.7
82 0000
83 0000 D_maxalmnum equ 3
84 0000
85 0000 data .section 'data'
86 0000 01 temp db 1
87 0001 01 year db 1
88 0002 01 month db 1
89 0003 01 date db 1
90 0004 01 hour db 1
91 0005 01 min db 1
92 0006 01 sec db 1
93 0007
94 0007 01 r_numyear db 1
95 0008 01 r_nummonth db 1
96 0009 01 r_numdate db 1
97 000A 01 r_numweek db 1
98 000B 01 r_numhour db 1
99 000C 01 r_nummin db 1
100 000D 01 r_numsec db 1
101 000E 01 r_numnlmonth db 1
102 000F 01 r_numnldate db 1
103 0010 01 r_numtemp db 1
104 0011 01 r_numremain db 1
105 0012
106 0012 01 r_settime db 1
107 0013 01 temp1 db 1
108 0014 01 temp2 db 1
109 0015 01 temp3 db 1
110 0016 01 year1 db 1
111 0017 01 month1 db 1
112 0018 01 date1 db 1
113 0019 01 almhour db 1
114 001A 01 almmin db 1
115 001B 01 r_almhour1 db 1 ;;THE HOUR OF ALARM FUNCTION 1
116 001C 01 r_almmin1 db 1 ;;THE MINUTE OF ALARM FUNCTION 1
117 001D 01 r_almhour2 db 1 ;;THE HOUR OF ALARM FUNCTION 2
118 001E 01 r_almmin2 db 1 ;;THE MINUTE OF ALARM FUNCTION 2
119 001F 01 r_almnum db 1
"File: WNL.ASM Holtek Cross-Assembler Version 2.86 Page 3
120 0020
121 0020 01 buzzer1s db 1
122 0021 R_ALARMTIME EQU buzzer1s ;;CALCULATE THE ALARMING TIME
123 0021
124 0021 01 flashnum db 1 ;;NO USED
125 0022 R_MUSICNUM EQU FLASHNUM ;;HT38A6 WORKING COMMAND
126 0022
127 0022 01 week db 1
128 0023 01 r_debouncenum db 1
129 0024 01 nmonth_1 db 1
130 0025 01 ndate_1 db 1
131 0026 01 dup1 db 1
132 0027 01 md db 1
133 0028 01 md1 db 1 ;;THE CURENT YEAR LUNAR CALENDAR MONTH(1~8) IS OR NOT BIG MONTH,THE BIT IS SETTING 1 IF IT IS BIG MONTH
134 0029 01 md2 db 1 ;;THE CURENT YEAR LUNAR CALENDAR MONTH(9~13) IS OR NOT BIG MONTH,THE BIT IS SETTING 1 IF IT IS BIG MONTH
135 002A
136 002A 01 R_comnum db 1
137 002B
138 002B 01 set_flag db 1 ;; .0 year
139 002C ;; .1 month
140 002C ;; .2 date
141 002C ;; .3 hour
142 002C ;; .4 min
143 002C
144 002C 01 r_setalm db 1 ;; .0 on/off
145 002D ;; .1 hour
146 002D ;; .2 min
147 002D 01 r_daynum1 db 1
148 002E 01 r_daynum2 db 1
149 002F
150 002F 01 r_temper db 1
151 0030
152 0030 01 r_tempnum db 1
153 0031
154 0031 01 tr00 db 1
155 0032 01 tr01 db 1
156 0033 01 tr02 db 1
157 0034 01 ts00 db 1
158 0035 01 ts01 db 1
159 0036 01 ts02 db 1
160 0037
161 0037 01 num db 1
162 0038 R_DELAYTIME EQU num
163 0038
164 0038 01 bitnum4 db 1 ;; .0
165 0039 ;; .1 pm led
166 0039 ;; .2 zhengdian
167 0039 ;; .3 alarm led
168 0039 ;; .4 sec dot1
169 0039 ;; .5 month high
170 0039 ;; .6 nmonth high
171 0039
172 0039 ;; .7 am led
173 0039
174 0039 01 buzzernum db 1 ;;NO USED
175 003A R_COMMANDCOUNT EQU buzzernum
176 003A 01 buzzertime db 1
177 003B R_COMMANDPARITY EQU buzzertime
178 003B
179 003B 01 r_temptimes db 1
"File: WNL.ASM Holtek Cross-Assembler Version 2.86 Page 4
180 003C
181 003C 01 flag250ms db 1
182 003D 01 zhengdiantime db 1
183 003E R_COMMANDBAK EQU zhengdiantime
184 003E 01 flag1 db 1
185 003F 01 flag2 db 1
186 0040 01 flag3 db 1
187 0041 01 flag4 db 1
188 0042
189 0042 01 keycode db 1
190 0043 01 r_tempernum db 1
191 0044
192 0044 01 r_temperbk db 1
193 0045
194 0045
195 0045
196 0045 01 jieh db 1 ;; THE FIRST JIEQI DATE CURRENT MONTH
197 0046 01 jiem db 1
198 0047 01 jiel db 1 ;; THE SECOND JIEQI DATE CURRENT MONTH
199 0048 01 jie1 db 1
200 0049 01 jie2 db 1
201 004A 01 jiedate db 1
202 004B 01 remainday db 1 ;; HOW MANY DAYS FROM CURRENT DATE TO NEXT JIEQI
203 004C
204 004C
205 004C
206 004C 01 autolednum db 1
207 004D 01 bitnum1a db 1
208 004E 01 bitnum2a db 1
209 004F 01 bitnum3a db 1
210 0050 01 bitnum1 db 1
211 0051 01 bitnum2 db 1
212 0052 01 bitnum3 db 1
213 0053
214 0053
215 0053 01 downnum db 1
216 0054 01 upnum db 1
217 0055 01 r_almflag db 1
218 0056 01 flag5 db 1
219 0057
220 0057 b_initflag equ flag1.0
221 0057 F_DELAY500MS EQU b_initflag ;;IF HT38A5 CAN RECEVIED COMMAND, THE FLAG IS SETTING 1(DELAY 500MS)
222 0057 b_chargeok equ flag1.1
223 0057 b_temperfirst equ flag1.2
224 0057 b_sensor equ flag1.4
225 0057 nowork equ flag1.5
226 0057 newkey equ flag1.6
227 0057 changed equ flag1.7 ;; in modify time mode,if modified ,then changed=1,else=0
228 0057
229 0057
230 0057 b_f1s equ flag2.0
231 0057 overmonth equ flag2.1
232 0057 overdate equ flag2.2
233 0057 b_05s1 equ flag2.3
234 0057 b_05s2 equ flag2.4
235 0057 rotaled equ flag2.5
236 0057 ;overmin equ flag2.5
237 0057 b_setampm equ flag2.6 ;; 0 24 hour
238 0057 ;; 1 12hour
239 0057 zhengdian equ flag2.7 ;;IF SET INT ALARM FUNCTION THEN THE FLAG IS SETTING 1
"File: WNL.ASM Holtek Cross-Assembler Version 2.86 Page 5
240 0057
241 0057 datechange equ flag3.0 ;; modified date,need cal
242 0057 flash equ flag3.1
243 0057 flash1 equ flag3.2
244 0057 fonemin equ flag3.3
245 0057 fonehour equ flag3.4
246 0057 flag_ampm equ flag3.5 ;;IT IS AFTERNOON OR MORNING,IF IF AFTERNOON IT IS SETTING 1
247 0057 b_f125ms1 equ flag3.6
248 0057 b_f250ms2 equ flag3.7
249 0057
250 0057 dot1 equ flag4.0
251 0057 dot2 equ flag4.1
252 0057 b_buzzer equ flag4.2 ;;B_BUZZER IS SETTING 1 IF BUZZER IS WORKING
253 0057 F_TRANFINISH EQU b_buzzer ;;IF TRANSMIT FINISHED THEN SETTING THE FLAG 1
254 0057 b_f125ms equ flag4.3
255 0057 buzzerflash equ flag4.4
256 0057 F_ALARMING EQU buzzerflash ;;IF IT IS ALARMING, THE FLAG IS SETTING 1
257 0057 b_workbuzzer equ flag4.5
258 0057 zhengdianflag equ flag4.6 ;;IF THE FLAG IS SETTING 1 THAT INDICATED IS ALARMING
259 0057 F_TCOMMANDFLAG EQU zhengdianflag ;;IF THE FLAG IS SETTING 1 THAT INDICATED TRANSMIT COMMAND ENABLE
260 0057 runledff equ flag4.7
261 0057
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -