📄 48&24.lst
字号:
文件：48&24.ASM 盛群编译器版本 2.86 页次1
1 0000
2 0000
3 0000 include ht48ra0-2.inc
4 0000
5 0000 ;----------------------------
6 0000 ;equ定义区间
7 0000 scl equ pb.1 ;时钟信号引脚定义
8 0000 sda equ pb.0 ;串行数据引脚定义
9 0000 read_out equ [30h] ;写暂存器
10 0000 write_in equ [31h] ;读暂存器
11 0000 word_address equ [32h]
12 0000 data_8 equ [33h]
13 0000 ;----------------------------
14 0000
15 0000 ;----------------------------
16 0000 ;宏定义
17 0000 ;延迟宏,延迟100微秒
18 0000 d_1 macro
19 0000 local label
20 0000 mov a,64h
21 0000 mov delay,a
22 0000 label:
23 0000 sdz delay
24 0000 jmp label
25 0000 endm
26 0000 ;---------------------------
27 0000
28 0000 ;---------------------------
29 0000 ;数据区
30 0000 e2prom .section 'data'
31 0000 00 delay db ?
32 0001 ;----------------------------
33 0001
34 0001 ;----------------------------
35 0001 ;代码段
36 0000 eepromc .section 'code'
37 0000 org 00h
38 0000 2800 R jmp start
39 0001 start:
40 0001 0F66 mov a,066h ;设写入值为055H
41 0002 00B1 mov write_in,a
42 0003 0F14 mov a,14h ;写入14H为要操作的eeprom的地址
43 0004 00B2 mov word_address,a
44 0005 random_write_cycle:
45 0005 3014 set sda
46 0006 d_1
47 000A 3094 set scl
48 000B d_1
49 000F 3414 clr sda ;起始信号
50 0010
51 0010 3494 clr scl
52 0011 3014 set sda ;1
53 0012 d_1
54 0016 3094 set scl
55 0017 d_1
56 001B
57 001B 3494 clr scl
文件：48&24.ASM 盛群编译器版本 2.86 页次2
58 001C 3414 clr sda ;0
59 001D 3094 set scl
60 001E d_1
61 0022
62 0022 3494 clr scl
63 0023 3014 set sda ;1
64 0024 d_1
65 0028 3094 set scl
66 0029 d_1
67 002D
68 002D 3494 clr scl
69 002E 3414 clr sda ;0
70 002F 3094 set scl
71 0030 d_1
72 0034
73 0034 3494 clr scl
74 0035 3414 clr sda ;a2,a1,a0=0
75 0036 3094 set scl
76 0037 d_1
77 003B
78 003B 3494 clr scl
79 003C 3094 set scl
80 003D d_1
81 0041
82 0041 3494 clr scl
83 0042 3094 set scl
84 0043 d_1
85 0047
86 0047 3494 clr scl
87 0048 3414 clr sda ;0 write mode
88 0049 3094 set scl
89 004A d_1
90 004E
91 004E 3494 clr scl
92 004F 3014 set sda ;1 for ack, 设为输入口，接收应答信号
93 0050 d_1
94 0054 3094 set scl ;read_modify_write
95 0055 d_1
96 0059
97 0059 skch:
98 0059 3C14 sz sda ;应答信号
99 005A 2800 R jmp skch
100 005B 3494 clr scl
101 005C 0F08 mov a,08h
102 005D 00B3 mov data_8,a ;一个字节八位
103 005E write_address_in:
104 005E 3414 clr sda
105 005F 3FB2 sz word_address.7
106 0060 3014 set sda
107 0061 d_1
108 0065 3094 set scl
109 0066 d_1
110 006A
111 006A 3494 clr scl
112 006B 18B2 rl word_address
113 006C 17B3 sdz data_8
114 006D 2800 R jmp write_address_in
115 006E 3014 set sda
116 006F d_1
117 0073 3094 set scl
文件：48&24.ASM 盛群编译器版本 2.86 页次3
118 0074 d_1
119 0078
120 0078 wdow:
121 0078 3C14 sz sda
122 0079 2800 R jmp wdow
123 007A 3494 clr scl
124 007B 0F08 mov a,08h
125 007C 00B3 mov data_8,a
126 007D write_data_in:
127 007D 3414 clr sda
128 007E 3FB1 sz write_in.7
129 007F 3014 set sda
130 0080 d_1
131 0084 3094 set scl
132 0085 d_1
133 0089
134 0089 3494 clr scl
135 008A 18B1 rl write_in
136 008B 17B3 sdz data_8
137 008C 2800 R jmp write_data_in
138 008D
139 008D 3414 clr sda
140 008E 3094 set scl
141 008F d_1
142 0093 3494 clr scl
143 0094 3094 set scl
144 0095 d_1
145 0099 3014 set sda ;停止信号
146 009A d_1
147 009E 3494 clr scl
148 009F ;－－－－－－－－－－－读
149 009F read_random_1:
150 009F 3014 set sda
151 00A0 d_1
152 00A4 3094 set scl
153 00A5 d_1
154 00A9 3414 clr sda ;开始信号
155 00AA
156 00AA 3494 clr scl
157 00AB 3014 set sda ;1
158 00AC d_1
159 00B0 3094 set scl
160 00B1 d_1
161 00B5
162 00B5 3494 clr scl
163 00B6 3414 clr sda ;0
164 00B7 3094 set scl
165 00B8 d_1
166 00BC
167 00BC 3494 clr scl
168 00BD 3014 set sda ;1
169 00BE d_1
170 00C2
171 00C2 3094 set scl
172 00C3 d_1
173 00C7
174 00C7 3494 clr scl
175 00C8 3414 clr sda ;0
176 00C9 3094 set scl
177 00CA d_1
文件：48&24.ASM 盛群编译器版本 2.86 页次4
178 00CE
179 00CE 3494 clr scl
180 00CF 3414 clr sda ;a2,a1,a0=0,0,0
181 00D0 3094 set scl
182 00D1 d_1
183 00D5
184 00D5 3494 clr scl
185 00D6 3094 set scl
186 00D7 d_1
187 00DB
188 00DB 3494 clr scl
189 00DC 3094 set scl
190 00DD d_1
191 00E1
192 00E1 3494 clr scl
193 00E2 3414 clr sda ;0 write mode
194 00E3 3094 set scl
195 00E4 d_1
196 00E8
197 00E8 3494 clr scl
198 00E9 3014 set sda ;for ack
199 00EA d_1
200 00EE 3094 set scl
201 00EF d_1
202 00F3 flel:
203 00F3 3C14 sz sda
204 00F4 2800 R jmp read_random_1
205 00F5 3494 clr scl
206 00F6 0F08 mov a,08h
207 00F7 00B3 mov data_8,a
208 00F8 read_address_in:
209 00F8 3414 clr sda
210 00F9 3FB2 sz word_address.7
211 00FA 3014 set sda
212 00FB d_1
213 00FF 3094 set scl
214 0100 d_1
215 0104 3494 clr scl
216 0105 18B2 rl word_address
217 0106 17B3 sdz data_8
218 0107 2800 R jmp read_address_in
219 0108
220 0108 3014 set sda ;for ack
221 0109 d_1
222 010D 3094 set scl
223 010E d_1
224 0112
225 0112 skco:
226 0112 3C14 sz sda
227 0113 2800 R jmp skco
228 0114 3494 clr scl
229 0115 restart:
230 0115 3014 set sda
231 0116 d_1
232 011A 3094 set scl
233 011B d_1
234 011F 3414 clr sda ;起始信号
235 0120
236 0120 3494 clr scl
237 0121 3014 set sda ;1
文件：48&24.ASM 盛群编译器版本 2.86 页次5
238 0122 d_1
239 0126 3094 set scl
240 0127 d_1
241 012B
242 012B 3494 clr scl
243 012C 3414 clr sda ;0
244 012D 3094 set scl
245 012E d_1
246 0132
247 0132 3494 clr scl
248 0133 3014 set sda ;1
249 0134 d_1
250 0138 3094 set scl
251 0139 d_1
252 013D
253 013D 3494 clr scl
254 013E 3414 clr sda ;0
255 013F 3094 set scl
256 0140 d_1
257 0144
258 0144 3494 clr scl
259 0145 3414 clr sda ;a2,a1,a0=0
260 0146 3094 set scl
261 0147 d_1
262 014B
263 014B 3494 clr scl
264 014C 3094 set scl
265 014D d_1
266 0151
267 0151 3494 clr scl
268 0152 3094 set scl
269 0153 d_1
270 0157
271 0157 3494 clr scl
272 0158 3014 set sda ;1 read mode
273 0159 d_1
274 015D 3094 set scl
275 015E d_1
276 0162
277 0162 3494 clr scl
278 0163 3014 set sda ;for ack
279 0164 d_1
280 0168 3094 set scl
281 0169 d_1
282 016D ewfp:
283 016D 3C14 sz sda
284 016E 2800 R jmp ewfp
285 016F 0F08 mov a,08h
286 0170 00B3 mov data_8,a
287 0171 flow_out:
288 0171 3494 clr scl
289 0172 3014 set sda ;设定为输入口
290 0173 d_1
291 0177 37B0 clr read_out.7
292 0178 3C14 sz sda
293 0179 33B0 set read_out.7
294 017A d_1
295 017E 3094 set scl
296 017F d_1
297 0183 18B0 rl read_out
文件：48&24.ASM 盛群编译器版本 2.86 页次6
298 0184 17B3 sdz data_8
299 0185 2800 R jmp flow_out
300 0186
301 0186 3494 clr scl
302 0187 3414 clr sda
303 0188 3094 set scl
304 0189 d_1
305 018D 3014 set sda ;停止信号
306 018E d_1
307 0192
308 0192 0F66 mov a,066h ;将读出数据与55H比较
309 0193 0430 xor a,read_out
310 0194 390A snz z
311 0195 2800 R jmp fail_out
312 0196 2800 R jmp ok_end
313 0197
314 0197 fail_out:
315 0197 2800 R jmp $ ;操作失败
316 0198 ok_end:
317 0198 2800 R jmp $ ;操作成功
318 0199
319 0199 ;HT49R30A-1通过
320 0199
0 Errors⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -