📄 4pled-a3.lst
字号:
519 00137 0AED BS MARK,EN_OUT
520 00138 0012 ret
521 ;*********************************************************************
522 ;显示输出子程序
523 ;*********************************************************************
524 00139 DATA_DISP:
525 00139 0011 DISI
526 0013A 0411 MOV A,DATA_A
527 0013B 100A CALL TAB_A
528 0013C 0055 MOV DOUT_A,A
529
530 0013D 0412 MOV A,DATA_B
531 0013E 100A CALL TAB_A
532 0013F 0056 MOV DOUT_B,A
533
534 00140 0413 MOV A,DATA_C
535 00141 101E CALL TAB_C
536 00142 0057 MOV DOUT_C,A
537 00143 0E29 JBS DP_MARK,RL_SH
538 00144 1547 JMP D1
539 00145 0EED JBS MARK,EN_OUT
540 00146 00D7 CLR DOUT_C
541 00147 D1:
542 00147 0414 MOV A,DATA_D
543 00148 101E CALL TAB_C
544 00149 0058 MOV DOUT_D,A
545 0014A 0E69 JBS DP_MARK,RR_SH
546 0014B 154E JMP D2
547 0014C 0EED JBS MARK,EN_OUT
548 0014D 00D8 CLR DOUT_D
549 0014E D2:
550 0014E 0010 ENI
551 0014F 0013 RETI
552 ;*********************************************************************
553 ;数据分析
554 ;数据入口: RXD_SA(显示数据)
555 ; DA_RA~DA_RD (后部四通道数据) 四字节
556 ; DA_FE~DA_FH (前部四通道数据) 四字节
557 ;数据出口: DATA_B (距离显示十位) DATA_A (距离显示个位)
558 ; DATA_C (左段码显示数据) DATA_D (右段码显示数据)
559 ; ALARM_PX (声音报警数据)
560 ;标志影响: MARK ALA_EN ALARM_PX=0 =0 ALARM_PX≠0 =1
561 ; MARK FLASH DP_MARK=0 =0 DP_MARK≠0 =1
562 ; DP_MARK SH_RR DATA_C>6 =0 DATA_C≤6 =1
563 ; DP_MARK SH_RL DATA_D>6 =0 DATA_D≤6 =1
564
565 ;*********************************************************************
566 00150 DT_AMP_SA:
567 00150 0430 MOV A,DA_RA
568 00151 0131 SUB A,DA_RB
569 00152 0430 MOV A,DA_RA
570 00153 0E03 JBS STATUS,C
571 00154 0431 MOV A,DA_RB
572 00155 006B mov l_count,a
573 00156 1192 CALL DISP_RANGE
574
575 00157 041E MOV A,TEMP2
576 00158 1A07 AND A,@0x07
577 00159 0053 MOV DATA_C,A
578 0015A 0829 BC DP_MARK,RL_SH
579 0015B 0DDE JBC TEMP2,7
580 0015C 0A29 BS DP_MARK,RL_SH
581
582 0015D 0432 MOV A,DA_RC
583 0015E 0133 SUB A,DA_RD
584 0015F 0432 MOV A,DA_RC
585 00160 0E03 JBS STATUS,C
586 00161 0433 MOV A,DA_RD
587 00162 006C mov h_count,a
588 00163 1192 CALL DISP_RANGE
589
590 00164 041E MOV A,TEMP2
591 00165 1A07 AND A,@0x07
592 00166 0054 MOV DATA_D,A
593 00167 0869 BC DP_MARK,RR_SH
594 00168 0DDE JBC TEMP2,7
595 00169 0A69 BS DP_MARK,RR_SH
596
597 0016A 042B mov a,l_count
598 0016B 012C sub a,h_count
599 0016C 042B mov a,l_count
600 0016D 0E03 jbs status,c
601 0016E 042C mov a,h_count
602 0016F 005C mov rxd_sa,a
603 00170 09AD BC MARK,ALA_EN
604 00171 041C MOV A,RXD_SA
605 00172 1192 CALL DISP_RANGE
606
607 00173 041E MOV A,TEMP2
608 00174 1A07 AND A,@0x07
609 00175 0065 MOV ALARM_PX,A
610 00176 0E83 JBS STATUS,Z
611 00177 0BAD BS MARK,ALA_EN
612
613 ; JBS RB,M_T
614 ; JMP DT_AMP_TA ;
615
616 00178 041C MOV A,RXD_SA
617 00179 1A1F AND A,@0x1F
618 0017A 1D18 SUB A,@24 ;18
619 0017B 0C03 JBC STATUS,C
620 0017C 1581 JMP DA_LOW
621 0017D 180A MOV A,@10
622 0017E 0051 MOV DATA_A,A
623 0017F 0052 MOV DATA_B,A
624 00180 158C JMP DA_NOML1 ;DA_OKS
625 00181 DA_LOW:
626 00181 041C MOV A,RXD_SA
627 00182 1A1F AND A,@0x1F
628 00183 1D03 SUB A,@3
629 00184 0E03 JBS STATUS,C
630 00185 1589 JMP DA_NOML
631 00186 00D1 CLR DATA_A
632 00187 00D2 CLR DATA_B
633 00188 158C JMP DA_NOML1 ; DA_OKS
634 00189 DA_NOML:
635 00189 041C MOV A,RXD_SA
636 0018A 1A1F AND A,@0x1F
637 0018B 11BB CALL DATA_DA
638 0018C DA_NOML1:
639 0018C 0429 MOV A,DP_MARK
640 0018D 1A0F AND A,@0x0F
641 0018E 09ED BC MARK,FLASH
642 0018F 0E83 JBS STATUS,Z
643 00190 0BED BS MARK,FLASH
644 00191 DA_OK_END:
645 00191 0012 RET
646
647 ;--------------------------------------------------------------------
648 /*DT_AMP_TA: ;
649 MOV A,RXD_SA
650 AND A,@0x7F
651 SUB A,@80 ;18
652 JBC STATUS,C
653 JMP DA_LOWT
654 MOV A,@10
655 MOV DATA_A,A
656 MOV DATA_B,A
657 JMP DA_NOML1 ;DA_OKS
658 DA_LOWT:
659 MOV A,RXD_SA
660 AND A,@0x7F
661 SUB A,@9
662 JBS STATUS,C
663 JMP DA_NOMLT
664 CLR DATA_A
665 CLR DATA_B
666 JMP DA_NOML1 ; DA_OKS
667 DA_NOMLT:
668 MOV A,RXD_SA
669 AND A,@0x7F
670 CALL DATA_DA
671 JMP DA_NOML1 ; DA_OKS */
672
673 ;*********************************************************************
674 ;数据分段
675 ;入口数据: A 出口数据: A
676 ;占用资源: A TEMP1 TEMP2 STATUS
677 ;*********************************************************************
678 00192 DISP_RANGE:
679 00192 00DE CLR TEMP2
680 ; JBC RB,M_T
681 00193 1A1F AND A,@0x1F
682 ; JBS RB,M_T
683 ; AND A,@0x7F
684 00194 005D MOV TEMP1,A
685
686 00195 1810 MOV A,@16
687 ; JBS RB,M_T
688 ; MOV A,@52
689 00196 011D SUB A,TEMP1
690 00197 0C03 JBC STATUS,C
691 00198 15B9 JMP DT_ADD_END ;S>16 关图形显示
692 ;15
693 00199 055E INC TEMP2 ;AL=1
694 0019A 180D MOV A,@13
695 ; JBS RB,M_T
696 ; MOV A,@42
697 0019B 011D SUB A,TEMP1 ;S>12?
698 0019C 0C03 JBC STATUS,C
699 0019D 15B9 JMP DT_ADD_END ;15>S>=13
700 ;12
701 0019E 055E INC TEMP2 ;AL=2
702 0019F 180B MOV A,@11
703 ; JBS RB,M_T
704 ; MOV A,@36
705 001A0 011D SUB A,TEMP1
706 001A1 0C03 JBC STATUS,C
707 001A2 15B9 JMP DT_ADD_END ;12>S>11
708 ;10
709 001A3 055E INC TEMP2 ;AL=3
710 001A4 1809 MOV A,@9
711 ; JBS RB,M_T
712 ; MOV A,@29
713 001A5 011D SUB A,TEMP1
714 001A6 0C03 JBC STATUS,C
715 001A7 15B9 JMP DT_ADD_END ;10>S>9
716 ;08
717 001A8 055E INC TEMP2 ;AL=4
718 001A9 1807 MOV A,@7
719 ; JBS RB,M_T
720 ; MOV A,@23
721 001AA 011D SUB A,TEMP1
722 001AB 0C03 JBC STATUS,C
723 001AC 15B9 JMP DT_ADD_END ;8>S>6
724 ;06
725 001AD 055E INC TEMP2 ;AL=5
726 001AE 1806 MOV A,@6
727 ; JBS RB,M_T
728 ; MOV A,@19
729 001AF 011D SUB A,TEMP1
730 001B0 0C03 JBC STATUS,C
731 001B1 15B9 JMP DT_ADD_END ;6>S>5
732 ;05
733 001B2 055E INC TEMP2 ;AL=6
734 001B3 0BDE BS TEMP2,7
735 001B4 1805 MOV A,@5
736 ; JBS RB,M_T
737 ; MOV A,@16
738 001B5 011D SUB A,TEMP1
739 001B6 0C03 JBC STATUS,C
740 001B7 15B9 JMP DT_ADD_END ;5>S>4
741 ;04
742 ; BS TEMP2,7
743 001B8 055E INC TEMP2 ;AL=7
744 001B9 DT_ADD_END:
745 001B9 041E MOV A,TEMP2
746 001BA 0012 RET
747 ;*********************************************************************
748 ;二进制-十进制转换子程序
749 ;入口数据:A,TEMP1
750 ;出口数据:十位在DATA_B; 个位在DATA_A
751 ;影响资源:A; TEMP1; TEMP2; DATA_A; DATA_B
752 ;最大指令周期:T=
753 ;*********************************************************************
754 001BB DATA_DA:
755 001BB 005D MOV TEMP1,A
756 001BC 00DE CLR TEMP2
757 001BD DA_LOOP1:
758 001BD 180A MOV A,@10
759 001BE 011D SUB A,TEMP1
760 001BF 0E03 JBS STATUS,C
761 001C0 15C4 JMP DA_END
762 001C1 005D MOV TEMP1,A
763 001C2 055E INC TEMP2
764 001C3 15BD JMP DA_LOOP1
765 001C4 DA_END:
766 001C4 041D MOV A,TEMP1
767 001C5 0051 MOV DATA_A,A
768 001C6 041E MOV A,TEMP2
769 001C7 0052 MOV DATA_B,A
770 001C8 0012 RET
771 ;---------------------------------------------------------------------*/
772
773
774 /*DT_ADD_TEMP:
775 MOV A,RXD_SA
776 JBS STATUS,Z
777 JMP DT15
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -