📄 count.lst
字号:
315:
316: 01C0 74 30 MOV A,#30H
317: 01C2 12 02 CC LCALL SEND_DATA
318: 01C5 12 02 AC LCALL CHK_BUSY
319:
320: 01C8 74 30 MOV A,#30H
321: 01CA 12 02 CC LCALL SEND_DATA
322: 01CD 12 02 AC LCALL CHK_BUSY
323:
ASEM-51 V1.3 Copyright (c) 2002 by W.W. Heinz PAGE 7
Line I Addr Code Source
324: 01D0 74 CB MOV A,#0CBH
325: 01D2 12 02 BF LCALL SEND_CMD
326: 01D5 12 02 AC LCALL CHK_BUSY
327:
328: 01D8 74 30 MOV A,#30H
329: 01DA 12 02 CC LCALL SEND_DATA
330: 01DD 12 02 AC LCALL CHK_BUSY
331:
332: 01E0 74 30 MOV A,#30H
333: 01E2 12 02 CC LCALL SEND_DATA
334: 01E5 12 02 AC LCALL CHK_BUSY
335:
336:
337: 01E8 74 30 RST_CNTR: MOV A,#30H
338: 01EA F5 6C MOV CHAR29,A
339: 01EC F5 6B MOV CHAR28,A
340: 01EE F5 69 MOV CHAR26,A
341: 01F0 F5 68 MOV CHAR25,A
342:
343: 01F2 80 A5 SJMP PROCESS
344:
345: 01F4 B2 20 STRT_STP: CPL RUNFLG
346: 01F6 75 41 00 MOV KEY_ID,#00H
347: 01F9 75 40 00 MOV TEMP_KEY,#00H
348: 01FC 20 20 08 JB RUNFLG,MODIFY
349: 01FF 12 04 52 LCALL MESSAGE1
350: 0202 12 02 D9 LCALL DISP1
351: 0205 80 92 SJMP PROCESS
352: 0207 12 04 83 MODIFY: LCALL MESSAGE2
353: 020A 12 02 D9 LCALL DISP1
354: 020D 80 8A SJMP PROCESS
355:
356: 020F 20 20 08 PULSE_KEY: JB RUNFLG,INCR
357: 0212 75 41 00 MOV KEY_ID,#00H
358: 0215 75 40 00 MOV TEMP_KEY,#00H
359: 0218 21 99 AJMP PROCESS
360:
361: 021A 12 04 00 INCR: LCALL COUNTER
362: 021D 74 C8 MOV A,#0C8H
363: 021F 12 02 BF LCALL SEND_CMD
364: 0222 12 02 AC LCALL CHK_BUSY
365:
366: 0225 E5 68 MOV A,CHAR25
367: 0227 12 02 CC LCALL SEND_DATA
368: 022A 12 02 AC LCALL CHK_BUSY
369:
370: 022D E5 69 MOV A,CHAR26
371: 022F 12 02 CC LCALL SEND_DATA
372: 0232 12 02 AC LCALL CHK_BUSY
373:
374: 0235 74 CB MOV A,#0CBH
375: 0237 12 02 BF LCALL SEND_CMD
376: 023A 12 02 AC LCALL CHK_BUSY
377:
378: 023D E5 6B MOV A,CHAR28
379: 023F 12 02 CC LCALL SEND_DATA
ASEM-51 V1.3 Copyright (c) 2002 by W.W. Heinz PAGE 8
Line I Addr Code Source
380: 0242 12 02 AC LCALL CHK_BUSY
381:
382: 0245 E5 6C MOV A,CHAR29
383: 0247 12 02 CC LCALL SEND_DATA
384: 024A 12 02 AC LCALL CHK_BUSY
385:
386: 024D 75 41 00 MOV KEY_ID,#00H
387: 0250 75 40 00 MOV TEMP_KEY,#00H
388: 0253 02 01 99 LJMP PROCESS
389:
390:
391: ;********************************************************************
392: ; FUNCTIONS/SUBROUTINES
393:
394: 0256 78 30 RAM_INIT: MOV R0,#30H
395: 0258 E4 CLR A
396: 0259 F6 REPEAT3: MOV @R0,A
397:
398: 025A 08 INC R0
399: 025B B8 00 FB CJNE R0,#00H,REPEAT3
400: 025E 22 RET
401:
402: 025F 71 EB LCD_INIT: ACALL DELAY
403: 0261 71 EB ACALL DELAY
404: 0263 71 EB ACALL DELAY
405: 0265 71 EB ACALL DELAY
406:
407: 0267 74 30 MOV A,#30h
408: 0269 51 BF ACALL SEND_CMD
409: 026B 71 EB ACALL DELAY
410: 026D 71 EB ACALL DELAY
411:
412: 026F 74 30 MOV A,#30h
413: 0271 51 BF ACALL SEND_CMD
414: 0273 7F FF MOV R7,#0FFh
415: 0275 DF FE DJNZ R7,$
416: 0277 7F FF MOV R7,#0FFh
417: 0279 DF FE DJNZ R7,$
418: 027B 51 AC ACALL CHK_BUSY
419:
420: 027D 74 30 MOV A,#30h
421: 027F 51 BF ACALL SEND_CMD
422: 0281 51 AC ACALL CHK_BUSY
423:
424: 0283 74 38 MOV A,#38h
425: 0285 51 BF ACALL SEND_CMD
426: 0287 51 AC ACALL CHK_BUSY
427:
428: 0289 74 08 MOV A,#08h
429: 028B 51 BF ACALL SEND_CMD
430: 028D 51 AC ACALL CHK_BUSY
431:
432: 028F 74 0E MOV A,#0Eh
433: 0291 51 BF ACALL SEND_CMD
434: 0293 51 AC ACALL CHK_BUSY
435:
ASEM-51 V1.3 Copyright (c) 2002 by W.W. Heinz PAGE 9
Line I Addr Code Source
436: 0295 74 06 MOV A,#06h
437: 0297 51 BF ACALL SEND_CMD
438: 0299 51 AC ACALL CHK_BUSY
439:
440: 029B 74 01 MOV A,#01h
441: 029D 51 BF ACALL SEND_CMD
442: 029F 51 AC ACALL CHK_BUSY
443:
444: 02A1 74 0C MOV A,#0CH
445: 02A3 51 BF ACALL SEND_CMD
446: 02A5 51 AC ACALL CHK_BUSY
447:
448: 02A7 71 EB ACALL DELAY
449: 02A9 71 EB ACALL DELAY
450: 02AB 22 RET
451: ;
452: ;
453: 02AC 75 90 FF CHK_BUSY: MOV LCD_DATA,#0FFh
454: 02AF C2 B7 CLR LCD_RS
455: 02B1 D2 B6 SETB LCD_RW
456: 02B3 00 NOP
457: 02B4 C2 B5 CHECK: CLR LCD_EN
458: 02B6 D2 B5 SETB LCD_EN
459: 02B8 00 NOP
460: 02B9 20 97 F8 JB LCD_D7,CHECK
461: 02BC C2 B5 CLR LCD_EN
462: 02BE 22 RET
463: ;
464: ;
465: 02BF F5 90 SEND_CMD: MOV LCD_DATA,A
466: 02C1 C2 B7 CLR LCD_RS
467: 02C3 C2 B6 CLR LCD_RW
468: 02C5 D2 B5 SETB LCD_EN
469: 02C7 00 NOP
470: 02C8 00 NOP
471: 02C9 C2 B5 CLR LCD_EN
472: 02CB 22 RET
473: ;
474: ;
475: 02CC F5 90 SEND_DATA: MOV LCD_DATA,A
476: 02CE D2 B7 SETB LCD_RS
477: 02D0 C2 B6 CLR LCD_RW
478: 02D2 D2 B5 SETB LCD_EN
479: 02D4 00 NOP
480: 02D5 00 NOP
481: 02D6 C2 B5 CLR LCD_EN
482: 02D8 22 RET
483: ;
484: ;
485: 02D9 74 80 DISP1: MOV A,#80h
486: 02DB 12 02 BF LCALL SEND_CMD
487: 02DE 12 02 AC LCALL CHK_BUSY
488:
489: 02E1 E5 50 MOV A,CHAR1
490: 02E3 12 02 CC LCALL SEND_DATA
491: 02E6 12 02 AC LCALL CHK_BUSY
ASEM-51 V1.3 Copyright (c) 2002 by W.W. Heinz PAGE 10
Line I Addr Code Source
492:
493: 02E9 E5 51 MOV A,CHAR2
494: 02EB 12 02 CC LCALL SEND_DATA
495: 02EE 12 02 AC LCALL CHK_BUSY
496:
497: 02F1 E5 52 MOV A,CHAR3
498: 02F3 12 02 CC LCALL SEND_DATA
499: 02F6 12 02 AC LCALL CHK_BUSY
500:
501: 02F9 E5 53 MOV A,CHAR4
502: 02FB 12 02 CC LCALL SEND_DATA
503: 02FE 12 02 AC LCALL CHK_BUSY
504:
505: 0301 E5 54 MOV A,CHAR5
506: 0303 12 02 CC LCALL SEND_DATA
507: 0306 12 02 AC LCALL CHK_BUSY
508:
509: 0309 E5 55 MOV A,CHAR6
510: 030B 12 02 CC LCALL SEND_DATA
511: 030E 12 02 AC LCALL CHK_BUSY
512:
513: 0311 E5 56 MOV A,CHAR7
514: 0313 12 02 CC LCALL SEND_DATA
515: 0316 12 02 AC LCALL CHK_BUSY
516:
517: 0319 E5 57 MOV A,CHAR8
518: 031B 12 02 CC LCALL SEND_DATA
519: 031E 12 02 AC LCALL CHK_BUSY
520:
521: 0321 E5 58 MOV A,CHAR9
522: 0323 12 02 CC LCALL SEND_DATA
523: 0326 12 02 AC LCALL CHK_BUSY
524:
525: 0329 E5 59 MOV A,CHAR10
526: 032B 12 02 CC LCALL SEND_DATA
527: 032E 12 02 AC LCALL CHK_BUSY
528:
529: 0331 E5 5A MOV A,CHAR11
530: 0333 12 02 CC LCALL SEND_DATA
531: 0336 12 02 AC LCALL CHK_BUSY
532:
533: 0339 E5 5B MOV A,CHAR12
534: 033B 12 02 CC LCALL SEND_DATA
535: 033E 12 02 AC LCALL CHK_BUSY
536:
537: 0341 E5 5C MOV A,CHAR13
538: 0343 12 02 CC LCALL SEND_DATA
539: 0346 12 02 AC LCALL CHK_BUSY
540:
541: 0349 E5 5D MOV A,CHAR14
542: 034B 12 02 CC LCALL SEND_DATA
543: 034E 12 02 AC LCALL CHK_BUSY
544:
545: 0351 E5 5E MOV A,CHAR15
546: 0353 12 02 CC LCALL SEND_DATA
547: 0356 12 02 AC LCALL CHK_BUSY
ASEM-51 V1.3 Copyright (c) 2002 by W.W. Heinz PAGE 11
Line I Addr Code Source
548:
549: 0359 E5 5F MOV A,CHAR16
550: 035B 12 02 CC LCALL SEND_DATA
551: 035E 12 02 AC LCALL CHK_BUSY
552:
553: 0361 22 RET
554: ;
555: ;
556: 0362 74 C0 DISP2: MOV A,#0C0h
557: 0364 12 02 BF LCALL SEND_CMD
558: 0367 12 02 AC LCALL CHK_BUSY
559:
560: 036A 74 20 MOV A,#20H
561: 036C 12 02 CC LCALL SEND_DATA
562: 036F 12 02 AC LCALL CHK_BUSY
563:
564: 0372 74 20 MOV A,#20H
565: 0374 12 02 CC LCALL SEND_DATA
566: 0377 12 02 AC LCALL CHK_BUSY
567:
568: 037A 74 20 MOV A,#20H
569: 037C 12 02 CC LCALL SEND_DATA
570: 037F 12 02 AC LCALL CHK_BUSY
571:
572: 0382 74 20 MOV A,#20H
573: 0384 12 02 CC LCALL SEND_DATA
574: 0387 12 02 AC LCALL CHK_BUSY
575:
576: 038A 74 20 MOV A,#20H
577: 038C 12 02 CC LCALL SEND_DATA
578: 038F 12 02 AC LCALL CHK_BUSY
579:
580: 0392 74 20 MOV A,#20H
581: 0394 12 02 CC LCALL SEND_DATA
582: 0397 12 02 AC LCALL CHK_BUSY
583:
584: 039A 74 20 MOV A,#20H
585: 039C 12 02 CC LCALL SEND_DATA
586: 039F 12 02 AC LCALL CHK_BUSY
587:
588: 03A2 74 20 MOV A,#20H
589: 03A4 12 02 CC LCALL SEND_DATA
590: 03A7 12 02 AC LCALL CHK_BUSY
591:
592: 03AA 74 30 MOV A,#30H
593: 03AC 12 02 CC LCALL SEND_DATA
594: 03AF 12 02 AC LCALL CHK_BUSY
595:
596: 03B2 74 30 MOV A,#30H
597: 03B4 12 02 CC LCALL SEND_DATA
598: 03B7 12 02 AC LCALL CHK_BUSY
599:
600: 03BA 74 3A MOV A,#3AH
601: 03BC 12 02 CC LCALL SEND_DATA
602: 03BF 12 02 AC LCALL CHK_BUSY
603:
ASEM-51 V1.3 Copyright (c) 2002 by W.W. Heinz PAGE 12
Line I Addr Code Source
604: 03C2 74 30 MOV A,#30H
605: 03C4 12 02 CC LCALL SEND_DATA
606: 03C7 12 02 AC LCALL CHK_BUSY
607:
608: 03CA 74 30 MOV A,#30H
609: 03CC 12 02 CC LCALL SEND_DATA
610: 03CF 12 02 AC LCALL CHK_BUSY
611:
612: 03D2 74 73 MOV A,#73H
613: 03D4 12 02 CC LCALL SEND_DATA
614: 03D7 12 02 AC LCALL CHK_BUSY
615:
616: 03DA 74 65 MOV A,#65H
617: 03DC 12 02 CC LCALL SEND_DATA
618: 03DF 12 02 AC LCALL CHK_BUSY
619:
620: 03E2 74 63 MOV A,#63H
621: 03E4 12 02 CC LCALL SEND_DATA
622: 03E7 12 02 AC LCALL CHK_BUSY
623:
624: 03EA 22 RET
625:
626: 03EB 7E 00 DELAY: MOV R6,#00H
627: 03ED 7F 00 MOV R7,#00H
628: 03EF DE FE WAIT: DJNZ R6,$
629: 03F1 DF FC DJNZ R7,WAIT
630: 03F3 22 RET
631:
632: 03F4 93 REPEAT4: MOVC A,@A+DPTR
633: 03F5 F6 MOV @R0,A
634: 03F6 08 INC R0
635: 03F7 09 INC R1
636: 03F8 E9 MOV A,R1
637: 03F9 B9 10 F8 CJNE R1,#10H,REPEAT4
638: 03FC E4 CLR A
639: 03FD F8 MOV R0,A
640: 03FE F9 MOV R1,A
641: 03FF 22 RET
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -