📄 text1.lst
字号:
0131 22 238 HH2: RET
239
0132 E532 240 HH1: MOV A,32H
0134 7007 241 JNZ HH3
0136 753280 242 MOV 32H,#80H ;32H为0则显示－
0139 753170 243 MOV 31H,#70H ;31H则不显示
013C 22 244 RET
013D 753180 245 HH3: MOV 31H,#80H ;31H显示－
A51 MACRO ASSEMBLER TEXT1 05/11/2009 10:12:46 PAGE 5
0140 22 246 RET
247
0141 248 TAB:
0141 0000 249 DB 00H,00H
0143 06251250 250 DB 06H,25H,12H,50H,18H,75H,25H,00H,31H,25H,37H,50H,43H,75H,50H,00H
0147 18752500
014B 31253750
014F 43755000
0153 56256250 251 DB 56H,25H,62H,50H,68H,75H,75H,00H,81H,25H,87H,50H,93H,75H
0157 68757500
015B 81258750
015F 9375
252
253
254 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
255 ;; 时钟置数据 ;;
256 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
0161 00 257 WRITE:NOP
0162 748E 258 MOV A,#8EH ;写保护寄存器写
0164 757F00 259 MOV 7FH,#00H ;写保护寄存器内容
0167 1202BF 260 LCALL WBYTE
261
016A 7490 262 MOV A,#90H ;充电寄存器写
016C 757FA5 263 MOV 7FH,#0A5H ;充电寄存器内容
016F 1202BF 264 LCALL WBYTE
265
0172 7481 266 MOV A,#81H ;秒寄存器读操作，检查1302是
否第一次工作
0174 782F 267 MOV R0,#2FH
0176 1202E8 268 LCALL RBYTE
269
0179 207F02 270 JB 7FH,YUZHI
017C 801A 271 SJMP READ
272
017E 00 273 YUZHI:NOP
017F 7480 274 MOV A,#80H ;秒寄存器写
0181 757F00 275 MOV 7FH,#00H ;秒寄存器内容
0184 1202BF 276 LCALL WBYTE
277
0187 7482 278 MOV A,#82H ;分寄存器写
0189 757F00 279 MOV 7FH,#00H ;分寄存器内容
018C 1202BF 280 LCALL WBYTE
281
018F 7484 282 MOV A,#84H ;时寄存器写
0191 757F12 283 MOV 7FH,#12H ;时寄存器内容
0194 1202BF 284 LCALL WBYTE
0197 22 285 RET
286
287
288 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
289 ;; 从内部寄存器读数据 ;;
290 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
291
0198 00 292 READ: NOP
0199 7481 293 MOV A,#81H ;秒寄存器读
019B 7850 294 MOV R0,#50H
019D 1202E8 295 LCALL RBYTE
296
01A0 7483 297 MOV A,#83H ;分寄存器读
01A2 7851 298 MOV R0,#51H
01A4 1202E8 299 LCALL RBYTE
300
01A7 7485 301 MOV A,#85H ;时寄存器读
01A9 7852 302 MOV R0,#52H
01AB 1202E8 303 LCALL RBYTE
01AE 22 304 RET
A51 MACRO ASSEMBLER TEXT1 05/11/2009 10:12:46 PAGE 6
305
306 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
307 ;; 时钟数据处理 ;;
308 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
01AF E550 309 DONE:MOV A,50H
01B1 53500F 310 ANL 50H,#0FH
01B4 855047 311 MOV 47H,50H
01B7 C4 312 SWAP A
01B8 540F 313 ANL A,#0FH
01BA F546 314 MOV 46H,A
315
01BC E551 316 MOV A,51H
01BE 53510F 317 ANL 51H,#0FH
01C1 855144 318 MOV 44H,51H
01C4 C4 319 SWAP A
01C5 540F 320 ANL A,#0FH
01C7 F543 321 MOV 43H,A
322
01C9 E552 323 MOV A,52H
01CB 53520F 324 ANL 52H,#0FH
01CE 855241 325 MOV 41H,52H
01D1 C4 326 SWAP A
01D2 540F 327 ANL A,#0FH
01D4 F540 328 MOV 40H,A
01D6 22 329 RET
330
331
332
333
334
335
336
337
338
339
340
01D7 757E01 341 DISP: MOV DAT,#01H ;显示清屏
01DA 12033B 342 LCALL LCDWC
343
01DD 757E80 344 MOV DAT,#080H ;显示第一行地址
01E0 12033B 345 LCALL LCDWC
346
01E3 757E54 347 MOV DAT,#"T"
01E6 12034C 348 LCALL LCDWD
349
01E9 757E69 350 MOV DAT,#"i"
01EC 12034C 351 LCALL LCDWD
352
01EF 757E6D 353 MOV DAT,#"m"
01F2 12034C 354 LCALL LCDWD
355
01F5 757E65 356 MOV DAT,#"e"
01F8 12034C 357 LCALL LCDWD
358
01FB 757E3A 359 MOV DAT,#":"
01FE 12034C 360 LCALL LCDWD
361
362
0201 E540 363 MOV A,40H
0203 2430 364 ADD A,#30H
0205 F57E 365 MOV DAT,A
0207 12034C 366 LCALL LCDWD
367
020A E541 368 MOV A,41H
A51 MACRO ASSEMBLER TEXT1 05/11/2009 10:12:46 PAGE 7
020C 2430 369 ADD A,#30H
020E F57E 370 MOV DAT,A
0210 12034C 371 LCALL LCDWD
372
0213 757E2D 373 MOV DAT,#"-"
0216 12034C 374 LCALL LCDWD
375
376
0219 E543 377 MOV A,43H
021B 2430 378 ADD A,#30H
021D F57E 379 MOV DAT,A
021F 12034C 380 LCALL LCDWD
381
0222 E544 382 MOV A,44H
0224 2430 383 ADD A,#30H
0226 F57E 384 MOV DAT,A
0228 12034C 385 LCALL LCDWD
386
022B 757E2D 387 MOV DAT,#"-"
022E 12034C 388 LCALL LCDWD
389
0231 E546 390 MOV A,46H
0233 2430 391 ADD A,#30H
0235 F57E 392 MOV DAT,A
0237 12034C 393 LCALL LCDWD
394
023A E547 395 MOV A,47H
023C 2430 396 ADD A,#30H
023E F57E 397 MOV DAT,A
0240 12034C 398 LCALL LCDWD
399
400
0243 757EC0 401 MOV DAT,#0C0H ;显示第二行地址
0246 12033B 402 LCALL LCDWC
403
0249 757E54 404 MOV DAT,#"T"
024C 12034C 405 LCALL LCDWD
406
024F 757E65 407 MOV DAT,#"e"
0252 12034C 408 LCALL LCDWD
409
0255 757E6D 410 MOV DAT,#"m"
0258 12034C 411 LCALL LCDWD
412
025B 757E70 413 MOV DAT,#"p"
025E 12034C 414 LCALL LCDWD
415
0261 757E3A 416 MOV DAT,#":"
0264 12034C 417 LCALL LCDWD
418
419
0267 E531 420 MOV A,31H
0269 2430 421 ADD A,#30H
026B F57E 422 MOV DAT,A
026D 12034C 423 LCALL LCDWD
424
0270 E532 425 MOV A,32H
0272 2430 426 ADD A,#30H
0274 F57E 427 MOV DAT,A
0276 12034C 428 LCALL LCDWD
429
0279 E533 430 MOV A,33H
027B 2430 431 ADD A,#30H
027D F57E 432 MOV DAT,A
027F 12034C 433 LCALL LCDWD
434
A51 MACRO ASSEMBLER TEXT1 05/11/2009 10:12:46 PAGE 8
0282 757E2E 435 MOV DAT,#"."
0285 12034C 436 LCALL LCDWD
437
0288 E534 438 MOV A,34H
028A 2430 439 ADD A,#30H
028C F57E 440 MOV DAT,A
028E 12034C 441 LCALL LCDWD
442
0291 E535 443 MOV A,35H
0293 2430 444 ADD A,#30H
0295 F57E 445 MOV DAT,A
0297 12034C 446 LCALL LCDWD
447
029A E536 448 MOV A,36H
029C 2430 449 ADD A,#30H
029E F57E 450 MOV DAT,A
02A0 12034C 451 LCALL LCDWD
452
02A3 E537 453 MOV A,37H
02A5 2430 454 ADD A,#30H
02A7 F57E 455 MOV DAT,A
02A9 12034C 456 LCALL LCDWD
457
02AC 757E20 458 MOV DAT,#" "
02AF 12034C 459 LCALL LCDWD
460
02B2 757EDF 461 MOV DAT,#0DFH
02B5 12034C 462 LCALL LCDWD
463
02B8 757E43 464 MOV DAT, #"C"
02BB 12034C 465 LCALL LCDWD
466
02BE 22 467 RET
468
469
470 ;;;;;;;;;;;;;;;;;;;;;;;;
471 ;; 1302单字节写操作 ;;
472 ;;;;;;;;;;;;;;;;;;;;;;;;
02BF C2A2 473 WBYTE:CLR RST
02C1 00 474 NOP
02C2 C2A1 475 CLR SCLK
02C4 00 476 NOP
02C5 D2A2 477 SETB RST
02C7 00 478 NOP
02C8 7908 479 MOV R1,#08H
02CA 13 480 LOOP: RRC A ;从D0位开始传送命令
02CB 92A0 481 MOV DIO,C
02CD 00 482 NOP
02CE D2A1 483 SETB SCLK
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -