ORG 00H

MAIN:



	MOV R1,#08H
	MOV A,#7FH
DAN2:	MOV P2,A
	CALL DELAY
	RR A	
	DJNZ R1,DAN2
        MOV  P0,#0FFH
	MOV  P1,#0FFH
	MOV  P2,#0FFH
	MOV  P3,#0FFH
	MOV R1,#08H
	MOV A,#7FH
DAN3:	MOV P3,A
	CALL DELAY
	RR A	
	DJNZ R1,DAN3
        MOV  P0,#0FFH
	MOV  P1,#0FFH
	MOV  P2,#0FFH
	MOV  P3,#0FFH
	MOV R1,#08H
	MOV A,#7FH
DAN4:	MOV P1,A
	CALL DELAY
	RR A	
	DJNZ R1,DAN4
        MOV  P0,#0FFH
	MOV  P1,#0FFH
	MOV  P2,#0FFH
	MOV  P3,#0FFH
	MOV R1,#08H	
	MOV A,#0FEH
DAN1:	MOV P0,A
	ACALL DELAY
	RL A
	DJNZ R1,DAN1
	MOV  P0,#0FFH
	MOV  P1,#0FFH
	MOV  P2,#0FFH
	MOV  P3,#0FFH
	;單個跑馬燈




	MOV R1,#08H
	MOV A,#7FH
DAN22:	MOV P2,A
	CALL DELAY1
	RR A	
	DJNZ R1,DAN22
        MOV  P0,#0FFH
	MOV  P1,#0FFH
	MOV  P2,#0FFH
	MOV  P3,#0FFH
	
	MOV R1,#08H
	MOV A,#7FH
DAN33:	MOV P3,A
	CALL DELAY1
	RR A	
	DJNZ R1,DAN33
        MOV  P0,#0FFH
	MOV  P1,#0FFH
	MOV  P2,#0FFH
	MOV  P3,#0FFH
	MOV R1,#08H
	MOV A,#7FH
DAN44:	MOV P1,A
	CALL DELAY1
	RR A	
	DJNZ R1,DAN44
        MOV  P0,#0FFH
	MOV  P1,#0FFH
	MOV  P2,#0FFH
	MOV  P3,#0FFH
	MOV R1,#08H	
	MOV A,#0FEH
DAN11:	MOV P0,A
	ACALL DELAY1
	RL A
	DJNZ R1,DAN11
	MOV  P0,#0FFH
	MOV  P1,#0FFH
	MOV  P2,#0FFH
	MOV  P3,#0FFH
	;單個跑馬燈




	MOV R1,#08H
	MOV A,#7FH
DAN222:	MOV P2,A
	CALL DELAY2
	RR A	
	DJNZ R1,DAN222
        MOV  P0,#0FFH
	MOV  P1,#0FFH
	MOV  P2,#0FFH
	MOV  P3,#0FFH
	
	MOV R1,#08H
	MOV A,#7FH
DAN333:	MOV P3,A
	CALL DELAY2
	RR A	
	DJNZ R1,DAN333
        MOV  P0,#0FFH
	MOV  P1,#0FFH
	MOV  P2,#0FFH
	MOV  P3,#0FFH

	MOV R1,#08H
	MOV A,#7FH
DAN444:	MOV P1,A
	CALL DELAY2
	RR A	
	DJNZ R1,DAN444
        MOV  P0,#0FFH
	MOV  P1,#0FFH
	MOV  P2,#0FFH
	MOV  P3,#0FFH

	MOV R1,#08H	
	MOV A,#0FEH
DAN111:	MOV P0,A
	ACALL DELAY2
	RL A
	DJNZ R1,DAN111
	MOV  P0,#0FFH
	MOV  P1,#0FFH
	MOV  P2,#0FFH
	MOV  P3,#0FFH
	;單個跑馬燈


	MOV R1,#08H
	MOV A,#7FH
D1AN22:	MOV P2,A
	CALL DELAY3
	RR A	
	DJNZ R1,D1AN22
        MOV  P0,#0FFH
	MOV  P1,#0FFH
	MOV  P2,#0FFH
	MOV  P3,#0FFH
	
	MOV R1,#08H
	MOV A,#7FH
D1AN33:	MOV P3,A
	CALL DELAY3
	RR A	
	DJNZ R1,D1AN33
        MOV  P0,#0FFH
	MOV  P1,#0FFH
	MOV  P2,#0FFH
	MOV  P3,#0FFH

	MOV R1,#08H
	MOV A,#7FH
D1AN44:	MOV P1,A
	CALL DELAY3
	RR A	
	DJNZ R1,D1AN44
        MOV  P0,#0FFH
	MOV  P1,#0FFH
	MOV  P2,#0FFH
	MOV  P3,#0FFH
	MOV R1,#08H
	MOV A,#0FEH
D1AN11:	MOV P0,A
	ACALL DELAY3
	RL A
	DJNZ R1,D1AN11
	MOV  P0,#0FFH
	MOV  P1,#0FFH
	MOV  P2,#0FFH
	MOV  P3,#0FFH
	;單個跑馬燈
MOV R1,#08H
	MOV A,#7FH
DAN2A:	MOV P2,A
	CALL DELAY4
	RR A	
	DJNZ R1,DAN2A
        MOV  P0,#0FFH
	MOV  P1,#0FFH
	MOV  P2,#0FFH
	MOV  P3,#0FFH
	
	MOV R1,#08H
	MOV A,#7FH
DAN3A:	MOV P3,A
	CALL DELAY4
	RR A	
	DJNZ R1,DAN3A
        MOV  P0,#0FFH
	MOV  P1,#0FFH
	MOV  P2,#0FFH
	MOV  P3,#0FFH

	MOV R1,#08H
	MOV A,#7FH
DAN4A:	MOV P1,A
	CALL DELAY4
	RR A	
	DJNZ R1,DAN4A
        MOV  P0,#0FFH
	MOV  P1,#0FFH
	MOV  P2,#0FFH
	MOV  P3,#0FFH
MOV R1,#08H	;單個跑馬燈
	MOV A,#0FEH
DAN1A:	MOV P0,A
	ACALL DELAY4
	RL A
	DJNZ R1,DAN1A
	MOV  P0,#0FFH
	MOV  P1,#0FFH
	MOV  P2,#0FFH
	MOV  P3,#0FFH

	MOV R1,#08H
	MOV A,#7FH
DAN2A1:	MOV P2,A
	CALL DELAY4
	RR A	
	DJNZ R1,DAN2A1
        MOV  P0,#0FFH
	MOV  P1,#0FFH
	MOV  P2,#0FFH
	MOV  P3,#0FFH
	
	MOV R1,#08H
	MOV A,#7FH
DAN3A1:	MOV P3,A
	CALL DELAY4
	RR A	
	DJNZ R1,DAN3A1
        MOV  P0,#0FFH
	MOV  P1,#0FFH
	MOV  P2,#0FFH
	MOV  P3,#0FFH

	MOV R1,#08H
	MOV A,#7FH
DAN4A1:	MOV P1,A
	CALL DELAY4
	RR A	
	DJNZ R1,DAN4A1
        MOV  P0,#0FFH
	MOV  P1,#0FFH
	MOV  P2,#0FFH
	MOV  P3,#0FFH

	MOV R1,#12H
	MOV  P0,#0FFH
	MOV  P1,#0FFH
	MOV  P2,#0FFH
	MOV  P3,#0FFH


	MOV R1,#08H	;單個跑馬燈
	MOV A,#0FEH
DAN1A1:	MOV P0,A
	ACALL DELAY4
	RL A
	DJNZ R1,DAN1A1
	MOV  P0,#0FFH
	MOV  P1,#0FFH
	MOV  P2,#0FFH
	MOV  P3,#0FFH
	

	MOV R1,#4
JIAOTI:			;交替閃爍
	MOV P0,#01010101B
	MOV P1,#01010101B
	MOV P2,#01010101B
	MOV P3,#01010101B
	CALL DELAY
	MOV P0,#10101010B
	MOV P1,#10101010B
	MOV P2,#10101010B
	MOV P3,#10101010B
	CALL DELAY
	DJNZ R1,JIAOTI
	MOV  P0,#0FFH
	MOV  P1,#0FFH
	MOV  P2,#0FFH
	MOV  P3,#0FFH







MOV R1,#08H
QUAN: 			;閃爍的頻率由慢變快
	MOV P0,#00H
	MOV P1,#00H
	MOV P2,#00H
	MOV P3,#00H
	CALL DELAY
	MOV P0,#0FFH
	MOV P1,#0FFH
	MOV P2,#0FFH
	MOV P3,#0FFH
	CALL DELAY
	DJNZ R1,QUAN

	MOV  P0,#0FFH
	MOV  P1,#0FFH
	MOV  P2,#0FFH
	MOV  P3,#0FFH



	MOV R1,#08H ;漸漸變亮，然后熄滅
	MOV A,#07FH
JIAN2:	MOV P2,A
	ACALL DELAY1
	RR A
	ANL A,P2
	DJNZ R1,JIAN2
	MOV  P0,#0FFH
	MOV  P1,#0FFH
	MOV  P2,#00H
	MOV  P3,#0FFH
	
	MOV R1,#08H 
	MOV A,#07FH
JIAN3:	MOV P3,A
	ACALL DELAY1
	RR A
	ANL A,P3
	DJNZ R1,JIAN3
	MOV  P0,#0FFH
	MOV  P1,#0FFH
	MOV  P2,#00H
	MOV  P3,#00H

	MOV R1,#08H 
	MOV A,#07FH

JIAN4:	MOV P1,A
	ACALL DELAY1
	RR A
	ANL A,P1
	DJNZ R1,JIAN4
	MOV  P0,#0FFH
	MOV  P1,#00H
	MOV  P2,#00H
	MOV  P3,#00H  

        MOV R1,#08H 
	MOV A,#0FEH
JIAN1:	MOV P0,A
	ACALL DELAY1
	RL A
	ANL A,P0
	DJNZ R1,JIAN1
	MOV  P0,#00H
	MOV  P1,#00H
	MOV  P2,#00H
	MOV  P3,#00H

	MOV P0,#10101010B
	MOV P1,#01010101B
	MOV P2,#01010101B
	MOV P3,#01010101B

	ANL P2,#00010101B
	CALL DELAY
	ANL P2,#00000101B
	CALL DELAY
	ANL P2,#00000001B
	CALL DELAY
	ANL P2,#00000000B
	CALL DELAY
	ANL P3,#00010101b
	CALL DELAY
	ANL P3,#00000101b
	CALL DELAY
	ANL P3,#00000001b
	CALL DELAY
	ANL P3,#00000000b
	CALL DELAY
	ANL P1,#00010101b
	CALL DELAY
  	ANL P1,#00000101b
	CALL DELAY
	ANL P1,#00000001b
	CALL DELAY
	ANL P1,#00000000b
	CALL DELAY
	ANL P0,#10101000B
	CALL DELAY
	ANL P0,#10100000B
	CALL DELAY
	ANL P0,#10000000B
	CALL DELAY
	ANL P0,#00000000B
	CALL DELAY


	ORL P0,#01000000b
	CALL DELAY
  	ORL P0,#01010000b
	CALL DELAY
	ORL P0,#01010100b
	CALL DELAY
	ORL P0,#01010101b
	CALL DELAY
        ORL P1,#00000010b
	CALL DELAY
  	ORL P1,#00001010b
	CALL DELAY
	ORL P1,#00101010b
	CALL DELAY
	ORL P1,#10101010b
	CALL DELAY
	ORL P3,#00000010b
	CALL DELAY
  	ORL P3,#00001010b
	CALL DELAY
	ORL P3,#00101010b
	CALL DELAY
	ORL P3,#10101010b
	CALL DELAY
   	ORL P2,#00000010b
	CALL DELAY
  	ORL P2,#00001010b
	CALL DELAY
	ORL P2,#00101010b
	CALL DELAY
	ORL P2,#10101010b
	CALL DELAY

ANL P0,#00010101B
ANL P2,#00101010B
CALL DELAY
ANL P0,#00000101B
ANL P2,#00001010B
CALL DELAY
ANL P0,#00000001B
ANL P2,#00000010B
CALL DELAY
ANL P0,#00000000B
ANL P2,#00000000B
CALL DELAY

ANL P1,#10101000B
ANL P3,#00101010B
CALL DELAY
ANL P1,#10100000B
ANL P3,#00001010B
CALL DELAY
ANL P1,#10000000B
ANL P3,#00000010B
CALL DELAY
ANL P1,#00000000B
ANL P3,#00000000B
CALL DELAY

ORL P1,#01000000B
ORL P3,#00000001B
CALL DELAY
ORL P1,#01010000B
ORL P3,#00000101B
CALL DELAY
ORL P1,#01010100B
ORL P3,#00010101B
CALL DELAY
ORL P1,#01010101B
ORL P3,#01010101B
CALL DELAY

ORL P0,#00000000B
ORL P2,#00000001B
CALL DELAY
ORL P0,#00001010B
ORL P2,#00000101B
CALL DELAY
ORL P0,#00101010B
ORL P2,#00010101B
CALL DELAY
ORL P0,#10101010B
ORL P2,#01010101B
CALL DELAY

ORL P0,#11000000B
ORL P2,#11000000B
CALL DELAY
ORL P0,#11110000B
ORL P2,#11110000B
CALL DELAY
ORL P0,#11111100B
ORL P2,#11111100B
CALL DELAY
ORL P0,#11111111B
ORL P2,#11111111B
CALL DELAY

ORL P1,#00000011B
ORL P3,#11000000B
CALL DELAY
ORL P1,#00001111B
ORL P3,#11110000B
CALL DELAY
ORL P1,#00111111B
ORL P3,#11111100B
CALL DELAY
ORL P1,#11111111B
ORL P3,#11111111B
CALL DELAY

ANL P1,#01111111B
ANL P3,#11111110B
CALL DELAY
ANL P1,#00111111B
ANL P3,#11111100B
CALL DELAY
ANL P1,#00011111B
ANL P3,#11111100B
CALL DELAY
ANL P1,#00001111B
ANL P3,#11110000B
CALL DELAY
ANL P1,#00000111B
ANL P3,#11100000B
CALL DELAY
ANL P1,#00000011B
ANL P3,#11000000B
CALL DELAY
ANL P1,#00000001B
ANL P3,#10000000B
CALL DELAY
ANL P1,#00000000B
ANL P3,#00000000B
CALL DELAY

ANL P0,#11111110B
ANL P2,#11111110B
CALL DELAY
ANL P0,#11111100B
ANL P2,#11111100B
CALL DELAY
ANL P0,#11111000B
ANL P2,#11111000B
CALL DELAY
ANL P0,#11110000B
ANL P2,#11110000B
CALL DELAY
ANL P0,#11100000B
ANL P2,#11100000B
CALL DELAY
ANL P0,#11000000B
ANL P2,#11000000B
CALL DELAY
ANL P0,#10000000B
ANL P2,#10000000B
CALL DELAY
ANL P0,#00000000B
ANL P2,#00000000B
CALL DELAY




























MOV R1,#4
JIAOT:			;交替閃爍
	MOV P0,#00110011B
	MOV P1,#00110011B
	MOV P2,#00110011B
	MOV P3,#00110011B
	CALL DELAY
	MOV P0,#11001100B
	MOV P1,#11001100B
	MOV P2,#11001100B
	MOV P3,#11001100B
	CALL DELAY
	DJNZ R1,JIAOT
	MOV  P0,#0FFH
	MOV  P1,#0FFH
	MOV  P2,#0FFH
	MOV  P3,#0FFH

MOV R1,#6
SIGE:
	MOV P0,#11111110B
	MOV P1,#01111111B
	MOV P2,#01111111B
	MOV P3,#01111111B
	CALL DELAY1
	MOV P0,#11111100B
	MOV P1,#00111111B
	MOV P2,#00111111B
	MOV P3,#00111111B
	CALL DELAY1
	MOV P0,#11111000B
	MOV P1,#00011111B
	MOV P2,#00011111B
	MOV P3,#00011111B
	CALL DELAY1
	MOV P0,#11110000B
	MOV P1,#00001111B
	MOV P2,#00001111B
	MOV P3,#00001111B
	CALL DELAY1
	MOV P0,#11100000B
	MOV P1,#00000111B
	MOV P2,#00000111B
	MOV P3,#00000111B
	CALL DELAY1
	MOV P0,#11000000B
	MOV P1,#000000111B
	MOV P2,#00000011B
	MOV P3,#00000011B
	CALL DELAY1
	MOV P0,#10000000B
	MOV P1,#00000001B
	MOV P2,#00000001B
	MOV P3,#00000001B
	CALL DELAY1
	MOV P0,#00000000B
	MOV P1,#00000000B
	MOV P2,#00000000B
	MOV P3,#00000000B
	CALL DELAY1
	DJNZ R1,SIGE







	MOV P0,#11111110B
	MOV P1,#01111111B
	MOV P2,#01111111B
	MOV P3,#01111111B
	CALL DELAY1
	MOV P0,#11111100B
	MOV P1,#00111111B
	MOV P2,#00111111B
	MOV P3,#00111111B
	CALL DELAY1
	MOV P0,#11111000B
	MOV P1,#00011111B
	MOV P2,#00011111B
	MOV P3,#00011111B
	CALL DELAY1
	MOV P0,#11110000B
	MOV P1,#00001111B
	MOV P2,#00001111B
	MOV P3,#00001111B
	CALL DELAY1
	MOV P0,#11100000B
	MOV P1,#00000111B
	MOV P2,#00000111B
	MOV P3,#00000111B
	CALL DELAY1
	MOV P0,#11000000B
	MOV P1,#000000111B
	MOV P2,#00000011B
	MOV P3,#00000011B
	CALL DELAY1
	MOV P0,#10000000B
	MOV P1,#00000001B
	MOV P2,#00000001B
	MOV P3,#00000001B
	CALL DELAY1
	MOV P0,#00000000B
	MOV P1,#00000000B
	MOV P2,#00000000B
	MOV P3,#00000000B
	CALL DELAY2
	MOV P0,#10000000B
	MOV P1,#00000001B
	MOV P2,#00000001B
	MOV P3,#00000001B
	CALL DELAY2
	MOV P0,#11000000B
	MOV P1,#00000011B
	MOV P2,#00000011B
	MOV P3,#00000011B
	CALL DELAY2
	MOV P0,#11100000B
	MOV P1,#00000111B
	MOV P2,#00000111B
	MOV P3,#00000111B
	CALL DELAY2
	MOV P0,#11110000B
	MOV P1,#00001111B
	MOV P2,#00001111B
	MOV P3,#00001111B
	CALL DELAY2
	MOV P0,#11111000B
	MOV P1,#00011111B
	MOV P2,#00011111B
	MOV P3,#00011111B
	CALL DELAY2
	MOV P0,#11111100B
	MOV P1,#00111111B
	MOV P2,#00111111B
	MOV P3,#00111111B
	CALL DELAY2
	MOV P0,#11111110B
	MOV P1,#01111111B
	MOV P2,#01111111B
	MOV P3,#01111111B
	CALL DELAY2
	MOV P0,#11111111B
	MOV P1,#11111111B
	MOV P2,#11111111B
	MOV P3,#11111111B
	CALL DELAY2
	MOV P0,#11111110B
	MOV P1,#01111111B
	MOV P2,#01111111B
	MOV P3,#01111111B
	CALL DELAY2
	MOV P0,#11111100B
	MOV P1,#00111111B
	MOV P2,#00111111B
	MOV P3,#00111111B
	CALL DELAY
	MOV P0,#11111000B
	MOV P1,#00011111B
	MOV P2,#00011111B
	MOV P3,#00011111B
	CALL DELAY2
	MOV P0,#11110000B
	MOV P1,#00001111B
	MOV P2,#00001111B
	MOV P3,#00001111B
	CALL DELAY2
	MOV P0,#11100000B
	MOV P1,#00000111B
	MOV P2,#00000111B
	MOV P3,#00000111B
	CALL DELAY2
	MOV P0,#11000000B
	MOV P1,#000000111B
	MOV P2,#00000011B
	MOV P3,#00000011B
	CALL DELAY2
	MOV P0,#10000000B
	MOV P1,#00000001B
	MOV P2,#00000001B
	MOV P3,#00000001B
	CALL DELAY2
	MOV P0,#00000000B
	MOV P1,#00000000B
	MOV P2,#00000000B
	MOV P3,#00000000B
	CALL DELAY3
	MOV P0,#10000000B
	MOV P1,#00000001B
	MOV P2,#00000001B
	MOV P3,#00000001B
	CALL DELAY3
	MOV P0,#11000000B
	MOV P1,#00000011B
	MOV P2,#00000011B
	MOV P3,#00000011B
	CALL DELAY3
	MOV P0,#11100000B
	MOV P1,#00000111B
	MOV P2,#00000111B
	MOV P3,#00000111B
	CALL DELAY3
	MOV P0,#11110000B
	MOV P1,#00001111B
	MOV P2,#00001111B
	MOV P3,#00001111B
	CALL DELAY3
	MOV P0,#11111000B
	MOV P1,#00011111B
	MOV P2,#00011111B
	MOV P3,#00011111B
	CALL DELAY3
	MOV P0,#11111100B
	MOV P1,#00111111B
	MOV P2,#00111111B
	MOV P3,#00111111B
	CALL DELAY3
	MOV P0,#11111110B
	MOV P1,#01111111B
	MOV P2,#01111111B
	MOV P3,#01111111B
	CALL DELAY3
	MOV P0,#11111111B
	MOV P1,#11111111B
	MOV P2,#11111111B
	MOV P3,#11111111B
	CALL DELAY1










LJMP MAIN



DELAY: 	MOV R4,#255
D1:	MOV R2,#248
	DJNZ R2,$
	DJNZ R4,D1
	RET
DELAY1: MOV R4,#180
D2:	MOV R6,#248
	DJNZ R6,$
	DJNZ R4,D2
	RET
DELAY2: MOV R4,#90	
D3:	MOV R5,#248
	DJNZ R5,$
	DJNZ R4,D3
	RET
DELAY3: MOV R4,#60	
D4:	MOV R7,#248
	DJNZ R7,$
	DJNZ R4,D4
	RET
DELAY4: MOV R4,#30	
D5:	MOV R3,#248
	DJNZ R3,$
	DJNZ R4,D5
	RET
END