LED    EQU     P1.0    ;設定LED所接的腳位
LED1   EQU     P1.1    ;第二顆LED
;
       ORG     0000H
START: MOV     R1,#00H ;系統開始前先作一小段延遲, 12個 clock   
$:     DJNZ    R1,$    ;若R1-1<>0 則跳到 $，延遲256*24個 clock
       MOV     SP,#06H ;宣告堆疊
;      
       CLR     LED     ;將 bit P1.0 設為 0, active low, 燈亮
       SETB    LED1
       CALL    DELAY   ;呼叫 DELAY 副程式
       SETB    LED     ;將 bit P1.0 設為 1, activ low, 燈滅
       CALL    DELAY
       CLR     LED1    
       CALL    DELAY   ;再呼叫 DELAY，延遲一小段
;Delay 副程式---------------------------------------
DELAY:  MOV     R0,#00H ;外層回圈用的暫存器 R0 給值 00H
$1:     MOV     R1,#00H ;內層回圈用的 R1 設為 00H
$2:     DJNZ    R1,$2   ;內層回圈跑 256 次
       DJNZ    R0,$1   ;外層回圈減一，再進入內層回圈
       RET             ;跳回原呼叫處