硬件實驗七  8255控制交通燈 ==========================
        ORG 0BB0H
JOD0:   MOV SP,#60H
        MOV DPTR,#0FFDBH
        MOV A,#88H
        MOVX @DPTR,A             ;8255初始化
        MOV DPTR,#0FFD8H
        MOV A,#0B6H
        MOVX @DPTR,A
        INC DPTR
        MOV A,#0DH
        MOVX @DPTR,A            ;點亮4個紅燈
        MOV R2,#25H             ;延時
        LCALL DELY
JOD3:   MOV DPTR,#0FFD8H
        MOV A,#75H
        MOVX @DPTR,A
        INC DPTR
        MOV A,#0DH
        MOVX @DPTR,A            ;東西綠燈亮,南北紅燈亮
        MOV R2,#55H
        LCALL DELY              ;延時
        MOV R7,#05H             ;閃爍次數(shù)
JOD1:   MOV DPTR,#0FFD8H
        MOV A,#0F3H
        MOVX @DPTR,A
        INC DPTR
        MOV A,#0CH
        MOVX @DPTR,A            ;東西黃燈亮,南北紅燈亮
        MOV R2,#20H
        LCALL DELY              ;延時
        MOV DPTR,#0FFD8H
        MOV A,#0F7H
        MOVX @DPTR,A
        INC DPTR
        MOV A,#0DH
        MOVX @DPTR,A            ;南北紅燈亮
        MOV R2,#20H
        LCALL DELY              ;延時
        DJNZ R7,JOD1            ;閃爍次數(shù)未到繼續(xù)
        MOV DPTR,#0FFD8H
        MOV A,#0AEH
        MOVX @DPTR,A
        INC DPTR
        MOV A,#0BH
        MOVX @DPTR,A            ;東西紅燈亮,南北綠燈亮
        MOV R2,#55H
        LCALL DELY              ;延時
        MOV R7,#05H             ;閃爍次數(shù)
JOD2:   MOV DPTR,#0FFD8H
        MOV A,#9EH
        MOVX @DPTR,A
        INC DPTR
        MOV A,#07H
        MOVX @DPTR,A            ;東西紅燈亮,南北黃燈亮
        MOV R2,#20H
        LCALL DELY              ;延時
        MOV DPTR,#0FFD8H
        MOV A,#0BEH
        MOVX @DPTR,A
        INC DPTR
        MOV A,#0FH
        MOVX @DPTR,A            ;東西紅燈亮
        MOV R2,#20H
        LCALL DELY              ;延時
        DJNZ R7,JOD2            ;閃爍次數(shù)未到繼續(xù)
        LJMP JOD3               ;循環(huán)
;---------------------------------------------
DELY:   PUSH 02H
DEL2:   PUSH 02H
DEL3:   PUSH 02H                ;延時
DEL4:   DJNZ R2,DEL4
        POP 02H
        DJNZ R2,DEL3
        POP 02H
        DJNZ R2,DEL2
        POP 02H
        DJNZ R2,DELY
        RET
;---------------------------------------------
        END