ORG	0000H
STA:	MOV	P0,#11011011B    ;干線亮綠燈，支線亮紅燈
		MOV	P2,#00010000B	  ;選通LED
		                        
MOV	P3,#11101111B	  ;K1列線置0
		MOV	R7,#3
STA1:	JB	P3.3,$		 		  ;無按鍵等待
		LCALL	DELAY30MS	  ;去抖動
		JB	P3.3,STA1
		JNB	P3.3,$		 	   ;等鍵釋放
		DJNZ	R7,STA1
		MOV	R6,#200
STA2:	LCALL	DELAY30MS	   ;延時30MS
		DJNZ	R6,STA2		   ;延時6秒
		MOV	P0,#10111011B	   ;干線亮黃燈，支線亮紅燈
		MoV	R6,#100
STA3:	LCALL	DELAY30MS
		DJNZ	R6,STA3		   ;延時3秒
		MOV	P0,#01111110B	   ;干線亮紅燈，支線亮綠燈
		MOV	R5,#4
STA4:	MOV	R6,#200
STA5:	LCALL	DELAY30MS
		DJNZ	R6,STA5
		DJNZ	R5,STA4	       ;延時24秒
		MOV	P0,#01111101B	   ;干線亮綠燈，支線亮黃燈
		MOV	R6,#100
STA6:	LCALL	DELAY30MS
		DJNZ	R6,STA6		   ;延時3秒
		LJMP	STA
DELAY30MS:MOV	R4,#55
DELAY:MOV	R3,#250
		DJNZ	R3,$  	          ;1.085us（指令周期）*2*250+2=547.5us
		DJNZ	R4,DELAY
		RET
		end