我的汇编语言作品.txt

单片机写的程序都含有Protues仿真结果

	ORG	0000H
	LJMP	TO1
	ORG	0050
	LJMP	TO2
	ORG	0100
	LJMP	TO3
	ORG	0150
	LJMP	TO4
	ORG	0200
	LJMP	TO5
	ORG	0250
	LJMP	TO61
	ORG	0300
	LJMP	TO62
	ORG	0350
	LJMP	TO7
	ORG	0400
	LJMP	TO8
	ORG	0450
	LJMP	TO9
	ORG	0500H
	LJMP	TO10
	ORG	0550
	LJMP	TO11
	ORG	0600
	
TO1:	MOV P3,#0F8H	;全亮以等待哦
		MOV P0,#0FFH
		MOV	60H,#200
		LCALL	DELAY 


TO2:	MOV	R7,	#0AH		;抖动
LOOP:	MOV P3,#0F8H
		MOV P0,#0AAH
		MOV	60H,#20H
		LCALL	DELAY  
		MOV P0,#55H
		MOV	60H,#20H
		LCALL	DELAY
		DJNZ	R7,LOOP


TO3:	MOV	 R7,#04H   ;一亮一灭4次
LOOP2:	MOV	P0,#0FFH
		MOV 60H,#20H
		LCALL DELAY
		MOV	P0,#00H
		LCALL DELAY
		DJNZ	R7,LOOP2


TO4:	MOV	R7,#03H	 ;牵尾闪烁3次
LOOP3:	MOV	P3,#0F8H
		MOV	P0,0AAH
		MOV	60,#20H
		LCALL	DELAY
		MOV	P0,#55H
		MOV	60H,#40H
		LCALL	DELAY
		DJNZ	R7,LOOP3


TO5:	MOV	R7,#15H	 ;加速牵尾闪15次
LOOP4:	MOV	P3,#0F8H
		MOV	P0,0AAH
		MOV	60,#01H
		LCALL	DELAY
		MOV	P0,#55H
		MOV	60H,#08H
		LCALL	DELAY
		DJNZ	R7,LOOP4
		
TO61:	MOV	R2,#04H
		MOV	P3,#0FEH ;P3.0速度变化闪烁前进
		MOV	A,#80H
LOOP5:	MOV	P0,A
		MOV	60H,#10H
		LCALL DELAY
		RR	A
		MOV	P0,A
		MOV	60H,#40H
		LCALL	DELAY
		RR	A
		DJNZ	R2,LOOP5

		MOV	R2,#04H
		MOV	P3,#0FDH ;P3.1速度变化闪烁前进
		MOV	A,#80H 
LOOP6:	MOV	P0,A
		MOV	60H,#10H
		LCALL DELAY
		RR	A
		MOV	P0,A
		MOV	60H,#40H
		LCALL	DELAY
		RR	A
		DJNZ	R2,LOOP6

		MOV	R2,#04H
		MOV	P3,#0FBH ;P3.2速度变化闪烁前进
		MOV	A,#80H 
LOOP7:	MOV	P0,A
		MOV	60H,#10H
		LCALL DELAY
		RR	A
		MOV	P0,A
		MOV	60H,#40H
		LCALL	DELAY
		RR	A
		DJNZ	R2,LOOP7


TO62:	MOV	R2,#06H
		MOV	P3,#0FEH ;P3.0加速牵尾闪前进
		MOV	A,#80H
LOOP621:MOV	P0,A
		MOV	60H,#10
		LCALL DELAY
		RR	A
		RR	A
		MOV	P0,A
		MOV	60H,#40
		LCALL	DELAY
		RL	A
		DJNZ	R2,LOOP621

		MOV	R2,#06H
		MOV	P3,#0FDH ;P3.1加速牵尾闪前进
		MOV	A,#80H 
LOOP622:MOV	P0,A
		MOV	60H,#10
		LCALL DELAY
		RR	A
		RR	A
		MOV	P0,A
		MOV	60H,#40
		LCALL	DELAY
		RL	A
		DJNZ	R2,LOOP622

		MOV	R2,#06H
		MOV	P3,#0FBH ;P3.2加速牵尾闪前进
		MOV	A,#80H 
LOOP623:MOV	P0,A
		MOV	60H,#10
		LCALL DELAY
		RR	A
		RR	A
		MOV	P0,A
		MOV	60H,#40H
		LCALL	DELAY
		RL	A
		DJNZ	R2,LOOP623


	
TO7:	MOV	R0,#03H
		MOV	R1,#0FEH
LOOP71:	MOV	P3,R1
		MOV	A,R1
		RL	A
		MOV	R1,A
		MOV	R2,#08H
		MOV	A,#80H
LOOP72:	MOV	P0,A
		MOV	60H,#10H
		LCALL	DELAY
		RR	A
		DJNZ	R2,LOOP72
		DJNZ  R0,LOOP71	  ;一个从头亮到尾


TO8:	MOV	R0,#03H
		MOV	R1,#0FBH
LOOP81:	MOV	P3,R1
		MOV	A,R1
		RR	A
		MOV	R1,A
		MOV	R2,#08H
		MOV	A,#01H
LOOP82:	MOV	P0,A
		MOV	60H,#07H
		LCALL	DELAY
		RL	A
		DJNZ	R2,LOOP82
		DJNZ  R0,LOOP81	  ;一个从尾亮到头


TO9:	MOV	R0,#03H
		MOV	R1,#0FEH
LOOP91:	MOV	P3,R1
		MOV	A,R1
		RL	A
		MOV	R1,A
		MOV	R2,#07H
		MOV	A,#0C0H
LOOP92:	MOV	P0,A
		MOV	60H,#10H
		LCALL	DELAY
		RR	A
		DJNZ	R2,LOOP92
		DJNZ  R0,LOOP91	  ;两个从头亮到尾

     	MOV	R0,#03H
		MOV	R1,#0FBH
LOOP93:	MOV	P3,R1
		MOV	A,R1
		RR	A
		MOV	R1,A
		MOV	R2,#07H
		MOV	A,#03H
LOOP94:	MOV	P0,A
		MOV	60H,#07H
		LCALL	DELAY
		RL	A
		DJNZ	R2,LOOP94
		DJNZ  R0,LOOP93	  ;两个从尾亮到头

    	MOV	R0,#03H
		MOV	R1,#0FEH
LOOP95:	MOV	P3,R1
		MOV	A,R1
		RL	A
		MOV	R1,A
		MOV	R2,#04H
		MOV	A,#0F0H
LOOP96:	MOV	P0,A
		MOV	60H,#10H
		LCALL	DELAY
		RR	A
		DJNZ	R2,LOOP96
		DJNZ  R0,LOOP95	  ;两个从头亮到尾


     	MOV	R0,#03H
		MOV	R1,#0FBH
LOOP97:	MOV	P3,R1
		MOV	A,R1
		RR	A
		MOV	R1,A
		MOV	R2,#04H
		MOV	A,#0FH
LOOP98:	MOV	P0,A
		MOV	60H,#07H
		LCALL	DELAY
		RL	A
		DJNZ	R2,LOOP98
		DJNZ  R0,LOOP97	  ;两个从尾亮到头

TO10:	MOV	R2,#08H
		MOV P3,#0FEH	 ;给我打两个圈啦 
		MOV	A,#80H
LOOP101:MOV	P0,A
        MOV	60H,#10H
		LCALL	DELAY
		RR	A
		DJNZ	R2,LOOP101
		MOV	P3,#0FDH
		MOV	R2,#04H
		MOV	A,#80H
		MOV	R2,#04H
LOOP102:MOV	P0,A
		MOV	60H,#10H
		LCALL	DELAY
		RR	A
		DJNZ	R2,LOOP102
		

		MOV	P3,#0FBH
		MOV R0,#08H
		MOV	A,#01H
LOOP104:MOV	P0,A
		MOV	60H,#10H
		LCALL	DELAY
		RL	A
		DJNZ	R0,LOOP104
		MOV	P3,#0FDH
		MOV R0,#04H
		MOV	A,#01H
LOOP105:MOV	P0,A
		MOV	60H,#10H
		LCALL	DELAY
		RL	A
		DJNZ	R0,LOOP105

TO11:	MOV	R2,#04H
LOOP110:MOV	P3,#0F8H
		MOV	R0,#08H
		
		MOV	A,#80H
LOOP111:MOV	R1,#2	
LOOP112:MOV	P0,A
		MOV	60H,02H
		LCALL	DELAY
		MOV	P0,#00H
		LCALL	DELAY
		DJNZ	R1,LOOP112
		RR	A
		DJNZ	R0,LOOP111
		DJNZ	R2,LOOP110 




		





		LJMP	TO1
DELAY:  MOV	R6,60H		
DEL1:	MOV	R5,#0FH
DEL2:	MOV R4,#08FH
DEL3:	DJNZ	R4,DEL3
		DJNZ	R5,DEL2
		DJNZ	R6,DEL1
		RET
     	END