;"探索式"方式   實(shí)驗(yàn)七  最小系統(tǒng)組成實(shí)驗(yàn)

        ORG 0000H

        MOV SP,#60H             ;送堆棧首址
MAIN:
        MOV R0,#10              ;LED閃亮次數(shù),亮滅5次
AGAIN:
        MOV A,#4                ;置延時(shí)初值(100ms*4)延時(shí)400ms
        setb P1.2               ;清P1.2,LED滅
        ACALL DELAY             ;調(diào)用延時(shí)子程序
        CPL P1.2                ;P1.2取反,LED 亮滅反轉(zhuǎn)
        MOV A,#4
        ACALL DELAY
        DJNZ R0,AGAIN           ;判閃亮結(jié)束否
        MOV R0,#5               ;LED閃亮次數(shù),亮滅5次
AGAIN1: setb P1.2               ;清P1.2,LED滅
        MOV A,#30               ;置延時(shí)初值(100ms*30)延時(shí)3s
        ACALL DELAY             ;調(diào)用延時(shí)子程序
        CPL P1.2                ;P1.2取反
        MOV A,#30               ;置延時(shí)初值(100ms*30)延時(shí)3s
        ACALL DELAY             ;調(diào)用延時(shí)子程序
        DJNZ R0,AGAIN1          ;判閃亮結(jié)束否
        AJMP MAIN               ;重復(fù)
DELAY:                          ;延時(shí)100ms子程序
        MOV R7,#200     ;500us*200=100ms
DLY0:
        MOV R6,#250     ;2us*250=500us
        DJNZ R6,$
        DJNZ R7,DLY0
        DJNZ ACC,DELAY     ;200ms*ACC
        RET
        END