;长沙菊阳微电子有限公司 www.jywdz.com

;P4              DATA    0d8h;   Winbond 78
;P4              DATA    0A5h;   Winbond 77

;P4              DATA    0E8h;   STC RC/RD+
;P4              DATA    0c0h;   STC AD

P4              DATA    0C0H    ;AT89C51ED2
P5              DATA    0D8H
                ORG     0000H

                JMP    START
                ORG     0030H

Start:
                MOV     p0,#0ffh
                MOV     p1,#0ffh
                MOV     p2,#0FFH
                MOV     p3,#0FFH
                MOV     p4,#0FFH

                LCALL   DELAY

TestP0:
                MOV     P0,#01111111B   ;P0.7
                LCALL   DELAY
                MOV     P0,#10111111B   ;P0.6
                LCALL   DELAY
                MOV     P0,#11011111B   ;P0.5
                LCALL   DELAY
                MOV     P0,#11101111B   ;P0.4
                LCALL   DELAY
                MOV     P0,#11110111B   ;P0.3
                LCALL   DELAY
                MOV     P0,#11111011B   ;P0.2
                LCALL   DELAY
                MOV     P0,#11111101B   ;P0.1
                LCALL   DELAY;
                MOV     P0,#11111110B   ;P0.0
                LCALL   DELAY
                MOV     P0,#11111111B   ;P0

TestP1:
                MOV     P1,#11111110B   ;P1.0
                LCALL   DELAY
                MOV     P1,#11111101B   ;P1.1
                LCALL   DELAY;
                MOV     P1,#11111011B   ;P1.2
                LCALL   DELAY
                MOV     P1,#11110111B   ;P1.3
                LCALL   DELAY
                MOV     P1,#11101111B   ;P1.4
                LCALL   DELAY
                MOV     P1,#11011111B   ;P1.5
                LCALL   DELAY
                MOV     P1,#10111111B   ;P1.6
                LCALL   DELAY
                MOV     P1,#01111111B   ;P1.7
                LCALL   DELAY
                MOV     P1,#11111111B   ;P1

TestP4:
                MOV     P4,#11111110B   ;P4.0
                LCALL   DELAY
                MOV     P4,#11111101B   ;P4.1
                LCALL   DELAY
                MOV     P4,#11111011B   ;P4.2
                LCALL   DELAY
                MOV     P4,#11110111B   ;P4.3
                LCALL   DELAY
                MOV     P4,#11101111B   ;P4.4
                LCALL   DELAY
                MOV     P4,#11011111B   ;P4.5
                LCALL   DELAY
                MOV     P4,#10111111B   ;P4.6
                LCALL   DELAY
                MOV     P4,#01111111B   ;P4.7
                LCALL   DELAY
                MOV     P4,#11111111B
TestP3:
                MOV     P3,#11111110B   ;P3.0
                LCALL   DELAY
                MOV     P3,#11111101B   ;P3.1
                LCALL   DELAY;
                MOV     P3,#11111011B   ;P3.2
                LCALL   DELAY
                MOV     P3,#11110111B   ;P3.3
                LCALL   DELAY
                MOV     P3,#11101111B   ;P3.4
                LCALL   DELAY
                MOV     P3,#11011111B   ;P3.5
                LCALL   DELAY
                MOV     P3,#10111111B   ;P3.6
                LCALL   DELAY
                MOV     P3,#01111111B   ;P3.7
                LCALL   DELAY
                MOV     P3,#11111111B   ;P3.7

TestP2:       ;  ljmp    start
                MOV     p2,#11111110B   ;P2.0
                LCALL   DELAY
                MOV     p2,#11111101B   ;P2.1
                LCALL   DELAY
                MOV     p2,#11111011B   ;P2.2
                LCALL   DELAY
                MOV     p2,#11110111B   ;P2.3
                LCALL   DELAY
                MOV     p2,#11101111B   ;P2.4
                LCALL   DELAY
                MOV     p2,#11011111B   ;P2.5
                LCALL   DELAY
                MOV     p2,#10111111B   ;P2.6
                LCALL   DELAY
                MOV     p2,#01111111B   ;P2.7
                LCALL   DELAY
                MOV     p2,#11111111B   ;P2
                LCALL   DELAY

                AJMP    START          ;反复循环

;延时子程序，12M晶振延时约250毫秒
DELAY:
                MOV     R4,#4
L3:             MOV     R2,#250
L1:             MOV     R3,#250
L2:             DJNZ    R3,L2
                DJNZ    R2,L1
                DJNZ    R4,L3
                RET

                END