单片机综合花样流水灯.doc

ORG 0000H LJMP MAIN ORG 0100HMAIN: MOV R3,#8BS0: MOV P0,#0FFH MOV P1,#0FFH MOV P2,#0FFH MOV P3,#0FFH LCALL DELAY4 MOV P0,#00H MOV P1,#00H MOV P2,#00H MOV P3,#00H LCALL DELAY4 DJNZ R3,BS0 MOV R3,#8BS10:MOV P0,#0AAH MOV P1,#0AAH MOV P2,#0AAH MOV P3,#0AAH LCALL DELAY4 MOV P0,#55H MOV P1,#55H MOV P2,#55H MOV P3,#55H LCALL DELAY4 DJNZ R3,BS10 MOV P0,#00H MOV P1,#00H MOV P2,#00H MOV P3,#00H;-流水部分1- MOV R3,#3LS: MOV P0,#00H MOV P1,#00H MOV P2,#00H MOV P3,#00H MOV R2,#9 MOV A,#00HKK: SETB C MOV P3,A RLC A LCALL DELAY DJNZ R2,KK MOV A,#00H MOV R2,#9KK1: SETB C MOV P2,A RRC A LCALL DELAY DJNZ R2,KK1 MOV A,#00H MOV R2,#9KK2: SETB C MOV P1,A RLC A LCALL DELAY DJNZ R2,KK2 MOV A,#00H MOV R2,#9KK3: SETB C MOV P0,A RLC A LCALL DELAY DJNZ R2,KK3 DJNZ R3,LS;-流水部分2- MOV R3,#3LS2: MOV P0,#00H MOV P1,#00H MOV P2,#00H MOV P3,#00H MOV A,#00H MOV R2,#9KK32: SETB C MOV P0,A RRC A LCALL DELAY DJNZ R2,KK32MOV A,#00H MOV R2,#9KK22: SETB C MOV P1,A RRC A LCALL DELAY DJNZ R2,KK22 MOV A,#00H MOV R2,#9KK12: SETB C MOV P2,A RLC A LCALL DELAY DJNZ R2,KK12 MOV R2,#9 MOV A,#00HKK222: SETB C MOV P3,A RRC A LCALL DELAY DJNZ R2,KK222 DJNZ R3,LS2;-流水部分3- MOV R3,#3LS3: MOV P0,#00H MOV P1,#00H MOV P2,#00H MOV P3,#00H MOV A,#00H MOV R2,#9KKI: SETB C MOV P3,A RLC A LCALL DELAY DJNZ R2,KKI MOV A,#00H MOV R2,#9KKI1: SETB C MOV P2,A RRC A LCALL DELAY DJNZ R2,KKI1 MOV A,#00H MOV R2,#9KKI2: SETB C MOV P1,A RLC A LCALL DELAY DJNZ R2,KKI2 MOV A,#00H MOV R2,#9KKI3: SETB C MOV P0,A RLC A LCALL DELAY DJNZ R2,KKI3 MOV A,#0FFH MOV R2,#9IK3: CLR C MOV P3,A RLC A LCALL DELAY DJNZ R2,IK3 MOV A,#0FFH MOV R2,#9IK2: CLR C MOV P2,A RRC A LCALL DELAY DJNZ R2,IK2 MOV A,#0FFH MOV R2,#9KI1: CLR C MOV P1,A RLC A LCALL DELAY DJNZ R2,KI1MOV A,#0FFH MOV R2,#9KI: CLR C MOV P0,A RLC A LCALL DELAY DJNZ R2,KI DJNZ R3,LS3;-跑马灯- MOV R3,#3; 跑马灯循环次数PM1: MOV P0,#00H MOV P1,#00H MOV P2,#00H MOV P3,#00H MOV A,#00H MOV R2,#9 SETB CKKP: MOV P3,A RLC A LCALL DELAY DJNZ R2,KKP MOV P3,#00H MOV A,#00H MOV R2,#9 SETB CKK1P: MOV P2,A RRC A LCALL DELAY DJNZ R2,KK1P MOV P2,#00H MOV A,#00H MOV R2,#9 SETB CKK2P: MOV P1,A RLC A LCALL DELAY DJNZ R2,KK2P MOV P1,#00H MOV A,#00H MOV R2,#9 SETB CKK3P: MOV P0,A RLC A LCALL DELAY DJNZ R2,KK3P MOV P0,#00H DJNZ R3,PM1;-双向对顶跑马灯- MOV R3,#10;双跑马灯循环次数SPM: MOV 50H,#20 A0: MOV R4,50H MOV P0,#00H MOV P1,#00H MOV P2,#00H MOV P3,#00H MOV 30H,#80H MOV 31H,#01H MOV R2,#8 B0: MOV A,30H MOV P0,A RR A MOV 30H,A MOV A,31H MOV P3,A RL A MOV 31H,A LCALL DELAY DJNZ R2,B0 MOV P0,#00H MOV P3,#00H MOV A,#80H MOV R2,#8 B1: MOV P1,A MOV P2,A RR A LCALL DELAY DJNZ R2,B1 MOV P1,#00H MOV P2,#00H DEC 50H DEC 50H DJNZ R3,SPM;-变速走马- MOV R2,#5BPM :MOV 30H,#100 MOV P0,#00H MOV P1,#00H MOV P2,#00H MOV P3,#00H MOV A,#80H MOV R3,#8B0B: MOV P0,A LCALL DELAY3 RR A DEC 30H DEC 30H DEC 30H DJNZ R3,B0B MOV P0,#00H MOV A,#80H MOV R3,#8B1B: MOV P1,A LCALL DELAY3 RR A DEC 30H DEC 30H DEC 30H DJNZ R3,B1B MOV P1,#00H MOV A,#01H MOV R3,#8B2B: MOV P2,A LCALL DELAY3 RL A DEC 30H DEC 30H DEC 30H DJNZ R3,B2B MOV P2,#00H MOV A,#80H MOV R3,#8B3B: MOV P3,A LCALL DELAY3 RR A DEC 30H DEC 30H DEC 30H DJNZ R3,B3B MOV P3,#00H DJNZ R2,BPM;-双向对顶跑马灯- MOV R2,#2SBPM: MOV 50H,#12 MOV 40H,#6 SA0: MOV R4,50H MOV P0,#00H MOV P1,#00H MOV P2,#00H MOV P3,#00H MOV 30H,#80H MOV 31H,#01H MOV R3,#8 SB0: MOV A,30H MOV P0,A RR A MOV 30H,A MOV A,31H MOV P3,A RL A MOV 31H,A LCALL DELAY2 DJNZ R3,SB0 MOV P0,#00H MOV P3,#00H MOV A,#80H MOV R3,#8 SB1: MOV P1,A MOV P2,A RR A LCALL DELAY2 DJNZ R3,SB1 MOV P1,#00H MOV P2,#00H DEC 50H DEC 50H DJNZ 40H,SA0 DJNZ R2,SBPM;-对撞部分- MOV P0,#00H MOV P1,#00H MOV P2,#00H MOV P3,#00H MOV R3,#3DZLS:MOV A,#00H MOV R2,#9 MOV R7,#00H MOV R6,#00H MOV R5,#00H MOV R4,#00Hdzk: MOV A,R7 MOV P0,A SETB C RRC A MOV R7,A MOV A,R6 MOV P3,A SETB C RLC A MOV R6,A LCALL DELAY DJNZ R2,dzk MOV R2,#9dzk1: MOV A,R5 MOV P1,A SETB C RRC A MOV R5,A MOV A,R4 MOV P2,A SETB C RRC A MOV R4,A LCALL DELAY DJNZ R2,dzk1 MOV R2,#9 MOV R7,#0FFH MOV R6,#0FFH MOV R5,#0FFH MOV R4,#0FFHdz1: MOV A,R5 MOV P1,A CLR C RLC A MOV R5,A MOV A,R4 MOV P2,A CLR C RLC A MOV R4,A LCALL DELAY DJNZ R2,dz1 MOV R2,#9dz: MOV A,R7 MOV P0,A CLR C RLC A MOV R7,A MOV A,R6 MOV P3,A CLR C RRC A MOV R6,A LCALL DELAY DJNZ R2,dz DJNZ R3,DZLS MOV R3,#3DZLS1:MOV A,#00H MOV R7,#00H MOV R6,#00H MOV R5,#00H MOV R4,#00H MOV R2,#9dzs1:MOV A,R5 MOV P1,A setb C RLC A MOV R5,A MOV A,R4 MOV P2,A setb C RLC A MOV R4,A LCALL DELAY DJNZ R2,dzs1 MOV R2,#9dz11:MOV A,R7 MOV P0,A setb C RLC A MOV R7,A MOV A,R6 MOV P3,A setb C RRC A MOV R6,A LCALL DELAY DJNZ R2,dz11 MOV R7,#0FFH MOV R6,#0FFH MOV R5,#0FFH MOV R4,#0FFH MOV R2,#9dzsk: MOV A,R7 MOV P0,A CLR C RRC A MOV R7,A MOV A,R6 MOV P3,A CLR C RLC A MOV R6,A LCALL DELAY DJNZ R2,dzsk MOV R2,#9dzks1: MOV A,R5 MOV P1,A CLR C RRC A MOV R5,A MOV A,R4 MOV P2,A CLR C RRC A MOV R4,A LCALL DELAY DJNZ R2,dzks1 DJNZ R3,DZLS1 MOV R3,#3DZLS2:MOV A,#00H MOV R2,#9 MOV R7,#00H MOV R6,#00H MOV R5,#00H MOV R4,#00Hdzk2:MOV A,R7 MOV P0,A SETB C RRC A MOV R7,A MOV A,R6 MOV P3,A SETB C RLC A MOV R6,A LCALL DELAY DJNZ R2,dzk2 MOV R2,#9dzk12:MOV A,R5 MOV P1,A SETB C RRC A MOV R5,A MOV A,R4 MOV P2,A SETB C RRC A MOV R4,A LCALL DELAY DJNZ R2,dzk12 MOV R2,#9 MOV R7,#0FFH MOV R6,#0FFH MOV R5,#0FFH MOV R4,#0FFHdz12: MOV A,R5 MOV P3,A CLR C RLC A MOV R5,A MOV A,R4 MOV P0,A CLR C RRC A MOV R4,A LCALL DELAY DJNZ R2,dz12 MOV R2,#9dz2: MOV A,R7 MOV P1,A CLR C RRC A MOV R7,A MOV A,R6 MOV P2,A CLR C RRC A MOV R6,A LCALL DELAY DJNZ R2,dz2 DJNZ R3,DZLS2 MOV R3,#3DZLS3:MOV A,#00H MOV R2,#9 MOV R7,#00H MOV R6,#00H MOV R5,#00H MOV R4,#00Hdzk3: MOV A,R7 MOV P1,A SETB C RLC A MOV R7,A MOV A,R6 MOV P2,A SETB C RLC A MOV R6,A LCALL DELAY DJNZ R2,dzk3 MOV R2,#9dzk13: MOV A,R5 MOV P3,A SETB C RRC A MOV R5,A MOV A,R4 MOV P0,A SETB C RLC A MOV R4,A LCALL DELAY DJNZ R2,dzk13 MOV R2,#9 MOV R7,#0FFH MOV R6,#0FFH MOV R5,#0FFH MOV R4,#0FFHdz13:MOV A,R5 MOV P1,A CLR C RLC A MOV R5,A MOV A,R4 MOV P2,A CLR C RLC A MOV R4,A LCALL DELAY DJNZ R2,dz13 MOV R2,#9dz3:MOV A,R7 MOV P0,A CLR C RLC A MOV R7,A MOV A,R6 MOV P3,A CLR C RRC A MOV R