原创 流水灯+数码管

 流水灯+数码管主要实现功能是：在流水灯还未点亮前数码管显示“0”，8流水灯一次左移一次数码管计数一次。计数范围为0—9：      <?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" />

        ORG  0000h

             AJMP   0030h    

             ORG   0030H

MAIN:   MOV  R0,#11

             MOV  DPTR,#TAB

UP1:     CLR   A

            MOVC  A,@A+DPTR

            DJNZ  R0,UP11

            JMP   MAIN

UP11:    MOV   P3,A

           CALL  YANSHI

           INC   DPTR

UP2:    MOV    A,#00000001B

UP22:   MOV    P1,A

           CALL   YANSHI

           RL     A

          CJNE    A,#00000001B,UP22

         MOV     A,#00000000B

         MOV   P1,A

          CALL  YANSHI

         JMP   UP1

YANSHI:  MOV  R7,#25

D1:           MOV  R6,#50

D2:          MOV  R5,#200

                 DJNZ  R5,$

                 DJNZ  R6,D2

                DJNZ  R7,D1

                RET

TAB:    DB   0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90H

        DB   0C0H

END